board

<% if bannerv="yestop" then '배너명 삽입여부%>

<% end if %>

<% if subjectv="yes" then '게시판명 삽입여부 response.write "
"&subject&"" end if %> <% if titletopv="yes" then '사용자문구(상) 삽입여부 response.write "

"&titletop&"" end if %>

	검색된 게시물 : <%=trcount%> 쪽번호 : <%=page&"/"&pgcount%>	<%'시작 response.write "" if page=1 then response.write "" '링크 없는 처음 else response.write "" response.write " " end if if nextpg > pgcount then '만약 다음 페이지가 전체페이지 수보다 크면 링크 없이 response.write "" else response.write "" response.write " " response.write "" ' response.write " " end if '///////////////////// 관리자 글쓰기 사용 여부시작 ///////////////// if writemanav="yes" then if Session("GRADE") = "Z" or Session("GRADE") = "x" then response.write "" response.write "" end if else response.write "" response.write "" end if '///////////////////// 관리자 글쓰기 사용 여부끝 ///////////////// %>
	<%if prevpg<1 then%> 처음페이지 <%else%> 처음페이지 <%end if%> <% response.write "바로가기 : " if startpage=1 then Response.Write "[이전 "&setsize&"개] " elseif startpage > setsize then Response.Write "[이전 "&setsize&"개] " end if for i=startpage To setsize+startpage -1 if i > pgcount then exit for end if Response.Write " " &i&" " Next if pgcount < setsize then '현재 페이지가 페이지 셋크기보다 적거나 페이지리스트가 전체페이지보다 적으면 response.write " [다음 "&setsize&"개]" elseif i>pgcount then response.write " [다음 "&setsize&"개]" else Response.Write "" Response.Write " [다음 "&setsize&"개]" end if %> <% if trcount= 0 then %> 끝페이지 <% else %> 끝페이지 <% end if %>

<%if pdsv = "yes" then%> <%end if%> <% If DbRec.eof then %> <%if pdsv="yes" then%> <%else%> <%end if%> <% End If %> <% if trcount > 0 then DbRec.AbsolutePage = page For i = 1 to pgsize if DbRec.EOF then exit for end if %> <%if pdsv = "yes" then%> <% End If %> <% n=n-1 DbRec.MoveNext Next %>

번호	제목	작성자	작성일	조회	파일	다운
자료가 없습니다.
자료가 없습니다.
<%=n%>	<% 'if left(now,8) = left(DbRec("getdate"),8) then ' 1일 단위로 올라온에 New 표시할 때 if datediff("d",DbRec("pd_getdate"),now)<1 then ' response.write "" else response.write " " end if %> <% bunho=cint(DbRec("pd_bunho")) subject=DbRec("pd_subject") ref=DbRec("pd_ref") tstep=cint(DbRec("pd_step")) visit=DbRec("pd_visited") downcount=DbRec("pd_downcount") if tstep > 0 then response.write "" response.write "Re: " end if if len(subject) > 18 then response.write "" response.write left(subject,18)&"..." else response.write "" response.write ""&subject&"" end if %>	"> <%=DbRec("pd_writer")%>	<%=year(DbRec("pd_getdate"))&"-"&month(DbRec("pd_getdate"))&"-"&day(DbRec("pd_getdate"))%>	<%=visit%>	<%if DbRec("pd_filesize")=0 then%> - <%else%> "> <% ext=Lcase(right(DbRec("pd_filename"),3)) select case ext case "jpg" down="type/jpg.gif" case "gif" down="type/gif.gif" case "txt" down="type/txt.gif" case "zip" down="type/zip.gif" case "hwp" down="type/hwp.gif" case "exe" down="type/exe.gif" case "mp3" down="type/mp3.gif" case "doc" down="type/doc.gif" case "ppt" down="type/ppt.gif" case "xls" down="type/xls.gif" case else down="type/default.gif" end select %> " WIDTH="16" HEIGHT="16"> <%end if%>	<% if DbRec("pd_filesize")=0 then response.write " -" else response.write ""&downcount&"" end if %>

<%end if%>

<% if DbRec.BOF then %>

<%end if%> <% if titlebotv="yes" then '사용자문구(하) 삽입여부 response.write "

"&titlebot&"

" end if %> <% if bannerv="yesbot" then '배너명 삽입여부%>

<% end if %>