|
|
|
|
 |
|
문희철 / 2001-05-15 / 오전 10:37:27 / 61.75.33.217
조회수 : 129
|
| [질문] 이렇게 했거든여...< |
> > 다음과 같은 방식으로 메인 화면을 꾸몄습니다.물론 다중 게시판이구요...
> > 그런데 제목 부분은 출력이 되고 있는데,날짜와 작성자가 출력되지 않는군요.
> > subject=DbRec1("subject")
> > response.write "<br>"
> > response.write " <a href=content.asp?tb=board2&code=010305&num="&num&"&ref="&ref&"&page="&page&"&startpage="&startpage&" onMouseOver=""window.status=('게시물 읽기 "&subject&"'); return true;"">"
> >
> > if len(subject) > 25 then
> > subject=left(subject,26)&"..."
> > response.write "<br>"
> > response.write "</a>"
> > 'Response.Write " "&wdate&" "&writer&" "
> > end if
> > '/***************** 게시물 관련글(답변글) *****************************************/
> > ref=DbRec1("ref")
> > Response.Write " "&wdate&" "&writer&" "
> > response.write " <a href=content.asp?tb=board2&code=010305&num="&num&"&ref="&ref&"&page="&page&"&startpage="&startpage&" onMouseOver=""window.status=('게시물 읽기 "&subject&"'); return true;"">"
> >
> > Response.Write " "&subject&" "
> > response.write "</a>"
> > '/************* 날짜, 작성자 출력 ***********************************/
> > 'Response.Write " "&wdate&" "&writer&" "
> > '/************* 현재 날짜 출력루틴 시작 未 **************************/
> > '1번째 방법
> > 'if datediff("d",DbRec1("wdate"),now)=<5 then '
> > ' response.write "--"
> > 'end if
> > '두번째 방법
> > 'if left(now,10) = left(wdate,10) then ' 1일 단위로 올라온에 New 표시할 때
> > ' response.write timeserial(hour(wdate),minute(wdate),second(wdate))
> > 'else
> > ' response.write left(wdate,10)
> > 'end if
> > '세번째 방법
> > 'if datediff("d",wdate,now)=<1 then ' <!--1일 단위가 아니라 24시간 단위로 시간 변경-->
> > ' response.write "<span style='font-size:9pt;color:red'><img src=images/cross.gif border=0 alt=최근 24시간 이내 올라온 글></span>"
> > 'else
> > ' response.write " "
> > 'end if
> >
> > 'response.write " "
> > '/****************** 날짜 출력 루틴 끝 ************************/
> > DbRec1.MoveNext
> > next
> > DbRec1.Close
> > set DbRec1 = nothing
> > %>
> > 현재 아무 에러도 발생되지 않습니다.
> > 여러가지 방법을 사용해보았지만 모두다 출력이 안되는군요.어떤 잘못이 있는지여
> -----------------------------------------------------------
>
> wdate와 writer에 아무런 값이 없는거 아닌가요?
>
> 값을 주는 문장이 안 보이는데요...
>
-----------------------------------------------------------
<!--#include file=dbopen.asp-->
<html>
<head>
<title>공지사항 출력</title>
<link rel=stylesheet href=style.css>
</head>
<body>
<table width=300 cellpadding=0 cellspacing=0 border=1 bordercolor=white>
<tr height=14>
<td class=fontb bgcolor=white>
<%
'/*********아래와 같이 처리하여 테이블 값을 찾아온다.******************************/
tb = ("board2")
code = ("010305")
'tb=Request("tb") '이 버전은 tb가 테이블 명이다
'code=Request("code") '이 버전은 코드는 다중게시판 코드
'테이블 관련글 출력하기 위한 로직 시작....^^
if listok="1" and Session("boardcheck") <> ch_pass then '게시물보기 권한설정적용시에 로긴 후 세션값과 패스워드 값 비교
Response.Redirect "login.asp?tb="&tb&"&code="&code&"<ype=list"
end if
if Request.QueryString("page")="" then '넘겨받는 변수는 페이지 값만
page=1
startpage=1
else
page=cint(Request("page"))
startpage=int(page/setsize)
if startpage=(page/setsize) then
startpage=page-setsize + 1
else
startpage=int(page/setsize)*setsize + 1
end if
end if
Set DbRec=Server.CreateObject("ADODB.Recordset")
DbRec.CursorType=1
key=trim(request("key"))
naya_s=request("naya_s")
if naya_s="" or IsNull("naya_s") Then
naya_s=0
end if
naya_heeya=request("naya_heeya")
if naya_heeya="" or IsNull("naya_heeya") Then
naya_heeya=0
end if
naya_korean=request("naya_korean")
if naya_korean="" or IsNull("naya_korean") Then
naya_korean=0
end if
if key="" or (naya_s=0 and naya_heeya=0 and naya_korean=0) then '키워드가 없거나 아무런 체크가 되어 있지 않을경우에
sqlList="Select Count(num) as tn From "&tb&" Where codename='"&code&"' "
Set rsList=DbCon.Execute(sqlList)
tn=rsList(0)
rsList.close
set rsList=nothing
listsql="SELECT top "&pgsize*page&" num,subject,writer,email,visited,wdate,ref,step,rec FROM "&tb&" Where codename='"&code&"' ORDER BY ref DESC, ansnum ASC"
DbRec.Open listsql, DbCon
if not DbRec.eof then '만약 레코드가 1개 이상이면
nextpage = Cint(page)+1
prevpage = Cint(page)-1
n = tn - (page-1) * pgsize
else
tn=0
pgcount=0
end if
else
%>
<%
end if
'/******************************* table 값을 불러온다.(board2)****************************************
Set DbRec1=Server.CreateObject("ADODB.RecordSet")
'DbRec1.Open "SELECT num,subject,ref,wdate FROM board1 WHERE step=0 ORDER BY wdate DESC", DbCon
DbRec1.Open "SELECT num,subject,ref,wdate,writer FROM board2 WHERE step=0 ORDER BY wdate DESC", DbCon, 1
if Request.QueryString("page")="" then '넘겨받는 변수는 페이지 값만
page=1
startpage=1
else
page=cint(Request("page"))
startpage=int(page/setsize)
if startpage=(page/setsize) then
startpage=page-setsize + 1
else
startpage=int(page/setsize)*setsize + 1
end if
end if
'/**********추가
postcount=DbRec1.Recordcount
if postcount > 10 then
postcount=10 '페이지 라인수
end if
for j=1 to postcount
'number=DbRec1("num")
num=DbRec1("num")
'/**************************Subject (제목 출력) 시작*****************************************/
subject=DbRec1("subject")
response.write "<br>"
response.write " <a href=content.asp?tb=board2&code=010305&num="&num&"&ref="&ref&"&page="&page&"&startpage="&startpage&" onMouseOver=""window.status=('게시물 읽기 "&subject&"'); return true;"">"
if len(subject) > 25 then
subject=left(subject,26)&"..."
response.write "<br>"
response.write "</a>"
'Response.Write " "&wdate&" "&writer&" "
end if
'/***************** 게시물 관련글(답변글) *****************************************/
ref=DbRec1("ref")
Response.Write " "&wdate&" "&writer&" "
response.write " <a href=content.asp?tb=board2&code=010305&num="&num&"&ref="&ref&"&page="&page&"&startpage="&startpage&" onMouseOver=""window.status=('게시물 읽기 "&subject&"'); return true;"">"
Response.Write " "&subject&" "
response.write "</a>"
'/************* 날짜, 작성자 출력 ***********************************/
'Response.Write " "&wdate&" "&writer&" "
'/************* 현재 날짜 출력루틴 시작 未 **************************/
'1번째 방법
'if datediff("d",DbRec1("wdate"),now)=<5 then '
' response.write "--"
'end if
'두번째 방법
'if left(now,10) = left(wdate,10) then ' 1일 단위로 올라온에 New 표시할 때
' response.write timeserial(hour(wdate),minute(wdate),second(wdate))
'else
' response.write left(wdate,10)
'end if
'세번째 방법
'if datediff("d",wdate,now)=<1 then ' <!--1일 단위가 아니라 24시간 단위로 시간 변경-->
' response.write "<span style='font-size:9pt;color:red'><img src=images/cross.gif border=0 alt=최근 24시간 이내 올라온 글></span>"
'else
' response.write " "
'end if
'response.write " "
'/****************** 날짜 출력 루틴 끝 ************************/
DbRec1.MoveNext
next
DbRec1.Close
set DbRec1 = nothing
%>
<!--List 제목 출력-->
</td></tr>
</table>
</body>
</html>
이렇게 메인화면으로 값을 가져오는데...잘 안되네여
출력이 되지 않아서 우선은 주석으로 처리를 해놓았습니다. |
|
|
|