ASP3.0 기초 강의실

시삽: 레드플러스 님 
게시판 이동:
 제목 : 쿠키를 사용한 게시판 리스트 페이지 번호 유지 2(BoardView.asp에 적용)
글번호: 218
작성자: 레드플러스
작성일: 2004/10/14 오후 12:58:00
조회수: 6856
<%
Sub ShowRecordSet(objRs)'// 모양 출력 전담 함수
            If objRs.BOF Or objRs.EOF Then
            Else
                Do Until objRs.EOF
%>    
    <TABLE border="1" width="600" align="center">
    <TR>
        <TD>번호 : </TD><TD><%=objRs.Fields("Num")%></TD>
    </TR>
    <TR>
        <TD>제목 : </TD><TD><%=objRs.Fields("Title")%></TD>
    </TR>
    <TR>
        <TD>작성자 : </TD><TD><%=objRs.Fields("Name")%></TD>
    </TR>
    <TR>
        <TD>작성일 : </TD><TD><%=objRs.Fields("PostDate")%></TD>
    </TR>
    <TR>
        <TD>조회수 : </TD><TD><%=objRs.Fields("ReadCount")%></TD>
    </TR>
    <TR>
        <TD colspan="2" height="200" valign="top">
<%    
    Dim strContent
    '[!] HTML 태그 처리
    strContent = objRs.Fields("Content")
    If objRs.Fields("Encoding") = "Text" Then ' Text
        strContent = Replace(strContent, "&", "&")
        strContent = Replace(strContent, "<", "<")
        strContent = Replace(strContent, ">", ">")
        '[!] 엔터 처리
        strContent = Replace(strContent,Chr(13) & Chr(10),"<br>")
    ElseIf objRs("Encoding") = "Mixed" Then ' Mixed
        '[!] 엔터 처리
        strContent = Replace(strContent,Chr(13) & Chr(10),"<br>")
    End If
    Response.Write(strContent)
%>
        </TD>
    </TR>
    <TR>
        <TD colspan="2" align="right">
            <a href="./BoardModify.asp?Num=<%=objRs("Num")%>">[수정]</a>
            <a href="./BoardDelete.asp?Num=<%=objRs("Num")%>">[삭제]</a>

<!---------------------------수정할 부분----------------------------------------->

<a href="./BoardList.asp?Page=<%=Request.Cookies("Basic")("Page")%>">[리스트]</a>

<!---------------------------수정할 부분----------------------------------------->


        </TD>
    </TR>
    </TABLE>                
<%
                    objRs.MoveNext()
                Loop
            End If
End Sub
%>
 
이전 글   다음 글 삭제 수정 답변 글쓰기 리스트

(댓글을 남기려면 로그인이 필요합니다.)

관련 아티클 리스트
  제       목 파일 작성자 작성일 조회
이전글 24. 답변형 게시판 작성 프로젝트 - 레드플러스 2003-10-06 7169
  23. 쿠키 실습 예제 RequestResponseCookies.asp(860 Byte(s)) 레드플러스 2002-11-07 6873
  쿠키를 사용한 게시판 리스트 페이지 번호 유지 1(BoardList.asp에 적용) - 레드플러스 2004-10-14 6590
현재글 쿠키를 사용한 게시판 리스트 페이지 번호 유지 2(BoardView.asp에 적용) - 레드플러스 2004-10-14 6856
다음글 22. 자료실 게시판 작성 프로젝트 - Red+ 2002-05-12 7098
 
손님 사용자 Anonymous (손님)
로그인 Home