ASP3.0 기초 강의실

시삽: 레드플러스 님 
게시판 이동:
 제목 : (4)세부 출력 페이지(BoardView.asp)
글번호: 158
작성자: 레드플러스
작성일: 2004/04/22 오후 10:21:00
조회수: 5598
파일: boardview.asp (1 KB) / 전송수: 1727
<%
'--------------------------------------------------
' Title : Basic 보드
' Program Name : boardview.asp
' Program Description : 세부 글보기 페이지
' QueryString : 반드시 list.asp에서 Num=1 식으로 전송
' Include Files : None
' Copyright (C) 2004 Park Yong Jun
' E-mail: redplus@redplus.net
' Support: http://www.dotnetkorea.com/
'--------------------------------------------------
%>
<%
'[1] 변수 선언
Option Explicit
Dim Num: Num = Request("Num")
Dim objCon: Dim objRs: Dim strSql
'[2] 커넥션 인스턴스
Set objCon = Server.CreateObject("ADODB.Connection")
'[3] 열기
objCon.Open("Provider=SQLOLEDB.1;Password=Basic;Persist Security Info=True;User ID=Basic;Initial Catalog=Basic;Data Source=(local)")
'[4] 레코드셋 인스턴스
Set objRs = Server.CreateObject("ADODB.RecordSet")
'[5] 레코드셋 열기 : 명령 실행(select)
strSql = "Select * From Basic Where Num = " & Num
objRs.Open strSql, objCon
'[6] 출력
If objRs.BOF Or objRs.EOF Then
    Response.Write("해당 레코드가 존재하지 않습니다.")
Else 'HTML+ASP코드(스파게티코드)로 모양 만들어 출력
    Call ShowRecordSet(objRs)
End If
'[7] 닫기
objRs.Close(): objCon.Close()
'[8] 해제
Set objRs = Nothing: Set objCon = Nothing
%>
<%
Sub ShowRecordSet(objRs)
%>
    <center>
    게시물 읽기<br>
    <TABLE border=1 width=100%>
    <TR>
        <TD>글쓴이</TD>    <TD><%=objRs("Name")%></TD>
        <TD>날짜</TD>    <TD><%=objRs("PostDate")%></TD>
    </TR>
    <TR>
        <TD>Email</TD><TD><%=objRs("Email")%></TD>
        <TD>조회수</TD>    <TD><%=objRs("ReadCount")%></TD>
    </TR>
    <TR>
        <TD>제목</TD>    <TD colspan=3><%=objRs("Title")%></TD>
    </TR>
    <TR>
        <TD colspan=4><%=objRs("Content")%></TD>
    </TR>
    </TABLE>
    <a href="./boardlist.asp">[게시판리스트]</a>
    <a href="./boardmodify.asp?Num=<%=objRs("Num")%>">[수정]</a>
    <a href="./boarddelete.asp?Num=<%=objRs("Num")%>">[삭제]</a>
    </center>
<%
End Sub
%>
 
이전 글   다음 글 삭제 수정 답변 글쓰기 리스트

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

관련 아티클 리스트
  제       목 파일 작성자 작성일 조회
이전글 21. 파일 업로드 연습 - 관리자 2002-03-21 7257
  20. 기본형 게시판 작성 프로젝트 - 관리자 2001-07-08 7446
  1. 기본형 게시판 테이블 설계(Basic.sql) (1) Basic.sql(2 KB) 레드플러스 2004-04-20 5557
  2. 입력 페이지 설계 - 레드플러스 2004-04-22 5350
  (1)입력 폼(BoardWrite.asp) boardwrite.asp(861 Byte(s)) 레드플러스 2004-04-22 6185
  (2)입력 처리(BoardWriteProcess.asp) boardwriteprocess.asp(1 KB) 레드플러스 2004-04-22 5292
  입력 처리(BoardWriteProcess.asp) 기능 추가 : 태그/작은따옴표 등... boardwriteprocess(1).asp(2 KB) 레드플러스 2004-04-22 7150
  3. 출력 페이지 설계 - 레드플러스 2004-04-22 5204
  (3)출력 리스트(BoardList.asp) boardlist.asp(1 KB) 레드플러스 2004-04-22 5605
  페이징 연습 페이징.asp(966 Byte(s)) 레드플러스 2004-04-22 5188
  (3)출력 리스트(BoardList.asp) 기능 추가 : 페이징 처리(기본/고급) boardlist(1).asp(2 KB) 레드플러스 2004-04-27 7449
  (3)출력 리스트(BoardList.asp)에 사용되는 고급 페이징 함수 boardfunction.asp(1 KB) 레드플러스 2004-04-27 5587
  4. 세부 출력 페이지 설계 - 레드플러스 2004-04-22 5343
현재글 (4)세부 출력 페이지(BoardView.asp) boardview.asp(1 KB) 레드플러스 2004-04-22 5598
  세부 출력 페이지(BoardView.asp) 기능 추가 : 조회수 증가 boardview(1).asp(1 KB) 레드플러스 2004-04-27 8082
  5. 수정 페이지 설계 - 레드플러스 2004-04-22 5044
  (5)수정 폼 페이지(BoardModify.asp) boardmodify.asp(1 KB) 레드플러스 2004-04-22 5365
  (6)수정 처리 페이지(BoardModifyProcess.asp) boardmodifyprocess.asp(1 KB) 레드플러스 2004-04-22 5415
  6. 삭제 페이지 설계 - 레드플러스 2004-04-22 4986
  (7)삭제 폼 페이지(BoardDelete.asp) boarddelete.asp(774 Byte(s)) 레드플러스 2004-04-22 5209
  (8)삭제 처리 페이지(BoardDeleteProcess.asp) boarddeleteprocess.asp(1 KB) 레드플러스 2004-04-22 5117
  7. 검색 페이지 설계 - 레드플러스 2004-04-22 5102
  (9)검색 페이지(BoardSearchList.asp) boardsearchlist.asp(1 KB) 레드플러스 2004-04-22 5380
다음글 19. FSO(File System Object) : 파일(File) 처리 - 관리자 2001-03-03 9752
 
손님 사용자 Anonymous (손님)
로그인 Home