묻고답하기

안녕하세요...
요즘 한참 ASP배울려고 하는 꽝입니다..
다름 아니라 제가 보고 있는 책에..ybbs라는 게시판 소스가 있어서..
그거 그대로 따라 쳤거든요..ㅡㅡ;;;근데...리스트 보기만 쳤는데..
계속 에러가 납니다...고수분들의 지도 바랍니다..-0-;
에러나는 주소는...
http://kkwang.com/asphome/bbs/list.asp?table=freeboard&mode=qa&page=1

conn.inc
======================================================================
<?
'DSN연결 문자열 지정
ConnString = "DSN=*****;UID=********;PWD=*********;"
'
'모든 웹페이지에 전송되는 공통 입력 인수들 읽기

'Table : 테이블 이름을 읽는다.(다중)
strTable=Request.QueryString("Table")
CArg1 = "Table=" & strTable

'Mode : 게시물을 보여주는 방법을 정한다.(순서형,응답형)
strMode=Request.QueryString("Mode")
If (strMode = "") Then
strMode = "qa"
End If

CArg2 = Carg1 & "&Mode=" & strMode

'Page : 디스플레이할 현재 페이지 번호 읽기
strCPage = Request.QueryString("Page")
If (strCPage = "") Then
strCPage = "1"
End If
CArg3 = CArg2 & "&Page=" & strCPage
intCPage = CInt(strCPage)
%>
=======================================================================

list.asp
=======================================================================
<!-- #include file="conf.inc" -->
<%
'
'데이터 베이스에서 게시물들을 읽어올끼다~
'
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.CursorType = 3

sqlQuery = "SELECT * FROM " & strTable
'Mode에 따라 레코드셋을 정렬하도록 해뿌자~
IF strMode = "qa" Then
sqlQuery = sqlQuery & " ORDER BY MGrp DESC, MSeq"
Else
sqlQuery = sqlQuery & " ORDER BY MID DESC"
End If
objRS.Open sqlQuery, ConnString
'Configuration 상수 : 페이지 크기를 정의한다네~
objRS.PageSize = 10
'전체 게시물 갯수와 총 페이지수를 알아낼라꼬...
If (objRS.BOF and objRS.EOF) Then
intTRecord = 0
intTPage = 0
Else
intTRecord = objRS.RecordCount
intTPage = objRS.PageCount
End If
%>
<html>
<head>
<title>List</title>
</head>
<body bgcolor="#FFFFFF">
<br>
<center>
<!--
웹페이지의 기능과 메뉴를 븨줌
-->
<table cellspacing=0 cellpadding=0>
<tr>
<td width=100 align=left>
<b>게시물 목록</b>
</td>
<td width=300 align=center>
<%
If strMode="qa" Then
TArgs = CArg1 & "&Mode=se"
TArg = Targs & "&Page=" & strCPage
%>
<font size=2>
[<a href="list.asp?<%=TArgs %>">순서형보기</a>]
</font>

<%
Else
TArgs = CArg1 & "&Mode=qa"
TArg = TArgs & "&Page=" & strCPage
%>
<font size=2>
[<a href="list.asp?<%=TArgs %>">응답형보기</a>]
</font>

<%
End If
%>
<font size=2>
[<a href="write.asp?<%=CArg3 %>">새글쓰기</a>]
</font>
</td>
<td width=140 align=right>

Total <% = intTRecord %>   <% = intCPage %> / <% = intTPage %> 페이지

</td>
</tr>
</table>
<!--
게시물 목록 븨주기
-->
<table cellspacing=0 cellpadding=2 border=1 bordercolor="#FFFFFF">
<!-- 게시판 각 열의 이름 출력하는 부분이다~ -->
<!-- TR boadercolor="#bc7900" -->
<tr bordercolor="#AAAAFF">
<th width=40 bgcolor="#CCCCFF">
<font color="#0000FF" size=2>번호</font>
</th>
<th width=40 bgcolor="#CCCCFF">
<font color="#0000FF" size=2>제목</font>
</th>
<th width=40 bgcolor="#CCCCFF">
<font color="#0000FF" size=2>조회</font>
</th>
<th width=40 bgcolor="#CCCCFF">
<font color="#0000FF" size=2>등록자</font>
</th>
<th width=40 bgcolor="#CCCCFF">
<font color="#0000FF" size=2>등록일</font>
</th>
</tr>

<%
'글 있는지 확인
If (objRS.BOF and objRS.EOF) Then
Response.Write "<tr><td colspan=5>"
Response.Write "게시물이 하나도 없습니다."
Response.Write "</td></tr>"
Else
'보여줄 페이지의 처음으로 이동~
objRS.AbsolutePage = intCPage
'출력한 레코드 있는 한 반복 하면서 출력하쥐~
RCount = objRS.PageSize
Do While (NOT objRS.EOF) and (RCount > 0)
%>

<tr> align=center bgcolor="#EEEEEE">
<!-- 글 번호 출력 -->
<td align=right>
<font size=2>
<% = objRS("MID") %>  </font>
</td>
<!-- 제목 출력 -->
<td align=left>

<%
'응답형이면, 들여쓰기 하는 부분...나중에  대신 이미지 삽입하기
If strMode = "qa" Then
For I=1 To objRS("MLvl")
Response.Write ("    ")
Next
End If
%>
<a href="read.asp?<% = CArg3 %>&MID=<% = objRS("MID") %>">
<font size=2>
<% = objRS("kkwang_subject") %></font></a>
</td>
<!-- 조회수 출력(나중에 자리 옮기자~) -->
<td align=right>
<font size=2><% = objRS("kkwang_rnumber") %>   </font>
</td>
<!-- 글쓴이 출력 -->
<td align=left>
<font size=2> <% = objRS("kkwang_name") %> </font>
</td>
<!-- 글쓴날짜 -->
<%
strTime = objRS("kkwang_time")
strDate = Left(strTime,10)
%>
<td>
<font size=2><% = strDate %></font>
</td>
</tr>
<%
'커서를 담 레코드로 이동~
objRS.MoveNext
RCount = RCount - 1
Loop
End If
%>
</table>
<!--
페이지 메뉴 관리부분
-->
<table>
<tr>
<td>
<%
'Configuration 상수 : 페이지 그룹 크기를 정의한다네~
intGSize = 10
'+ '+ '전 페이지의 그룹 번호와 그룹 마지막 페이지 번호 구하기~
intPGNumber = (intCPage - 1) intGSize
intPGEnd = intPGNumber * intGSize
'이전 페이지 메뉴
If (intPGEnd > 0) Then
%>
[<a href="list.asp?<% = CArg2 %>&Page=<% = intPGEnd %>">이전</a>]
<% End If
'현재 페이지 그룹 넘버들을 보여주기~
LCount = intGSize
intI = intPGEnd + 1
Do While (LCount > 0) and (intI <= intTPage)
%>
[<a href="list.asp?<% = CArg2 %>&Page=<% = intI %>"><% = intI %></a>] 
<%
intI = intI + 1
LCount = LCount - 1
Loop
'+ '다음페이지 메뉴
intI = intPGEnd + (intGSize + 1)
If (intI <= intTPage ) Then
%>
[<a href="list.asp?<% = CArg2 %>&Page=<% = intI %>">다음</a>]
<% End If
%>
</td>
</tr>
</table>

<!--
검색메뉴 보여주는 부분
-->

<form method="get" action="list.asp">
<input type="hidden" name="Table" value="<% = strTable %>">
<input type="hidden" name="Mode" value="<% = strMode %>">
<select name="search">
<option value="kkwang_name" selected>등록자
<option value="kkwang_subject">제목
<option value="kkwang_content">내용
<option value="kkwang_time">등록일
<option value="kkwang_MID">번호
</select>
<input type="text" name="searchstring">
<input type=submit value"찾아라">
</form>
</center>
</body>
</html>
<%
objRS.Close
Set objRS = Nothing
%>
=========================================================================
글쓴이 제목 최종 글
XE 공지 글 쓰기,삭제 운영방식 변경 공지 [16] 2019.03.05 by 남기남
Jami 패밀리사이트 링크 관련 질문. [2] 2015.07.07 by Jami
하이유주 회원가입이 안됩니다  
hpsong 모바일 레이아웃 메뉴가 하단으로 노출됩니다. [2] file 2015.07.07 by hpsong
BG카모 댓글 정렬 방법!!! [3] 2015.07.07 by BG카모
헤모힘 브라우저제목을 수정하려는데 [2] 2015.07.07 by 헤모힘
전경국 내용 값 필수 입니다 오류 해결좀. [1] file 2015.07.07 by 전경국
nado0124 회원수와 오늘 방문자를 노출시키는 자료는 없는지요? [6] 2015.07.07 by nado0124
mcgomting 게시판 권한의 '선택 그룹 사용자'에 관한 질문입니다. [2] 2015.07.07 by mcgomting
썰레발리오 서명변경 불가 XE코어 최신버전(1.7.9) 회원모듈스킨은 SKETCHBOOK5 [1] 2015.07.07 by Chrow
PLS 네이버 모바일로 접속할 때 뜨는 녹색 첫 화면 어떻게 하나요? [6] 2015.07.07 by PLS
아이11 게시판 복사 [3] 2015.07.07 by 옆집옵하
홈페이지어려워요 홈페이지 코딩 기본적인 궁금한거 [4] 2015.07.07 by 홈페이지어려워요
SeWoong xe 회원가입할 때 폼에 입력된 데이터 추출 문의 [2] 2015.07.07 by SeWoong
페르난도_알론소 게시판 출력 질문입니다.(DB) [5] 2015.07.07 by Double'U'
복슬강아지 (통합검색) 확장변수를 합쳐서 xe_tags 테이블에 자동저장  
여행사진블로거 기본레이아웃 하단 카피라이터 수정방법 자세한 설명 부탁합니다 [4] file 2015.07.07 by Podongi
버엄 데이터 이전이 안돼는 경우가 있어요.... [1] 2015.07.07 by 휘즈
옆집옵하 게시판 스킨 복사 방법 좀 알려주세요~ [6] 2015.07.07 by 옆집옵하
선수 조회수 조작 프로그램 삭제해 주실 분^^  
웨다 xe 를 이용하여 홈피 디자인은 했는데요 [2] 2015.07.07 by 웨다
매실696e5 매장찾기 같은 게시판 모듈이나 스킨 없을까요? [2] 2015.07.07 by 매실696e5
모하니 닷홈에 계정만들고 로긴해서 [4] 2015.07.07 by BJ람보
처음인걸 썸네일이안되네요 [7] 2015.07.08 by 불금
리버즈 네비게이션 서브 메뉴가 가려집니다. [1] file 2015.07.08 by 불금
푸하라 광고 차단 때문에 ㅠㅠ  
홈페이지어려워요 게시판 높이 설정 file  
이온디 업글타일 설치했는데 글이왜 안 보일까요  
agust XE 1.7.3에서 모바일 유튜브 동영상이 빈칸으로 나올때  
thdwjdtjr 휴대폰에서 모바일이 아닌 PC화면으로 나타나게 [2] 2015.07.08 by MEGA
울프s 스크롤 따라다니는 퀵메뉴가 끝까지 안내려가요..ㅜㅜ