%
if Request("page")="" then
page=1
else
page=cint(Request("page"))
end if
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Provider = "SQLOLEDB"
Conn.ConnectionString = "Server=iwd03.uhost.co.kr;Database=deloga;UID=deloga;PWD=35chilgu;"
Conn.Open
sSql = " select * from board where board_gubun = '1' and num <> 0 order by ref desc, re_step asc"
if Request("search") <> "" then
sSql = "select * from board" & " where " & Request("searchtype") & " like '%" & Request("search") & "%' and board_gubun = '1'"
end if
Set DRS=Server.CreateObject("ADODB.Recordset")
DRS.CursorType=1
DRS.PageSize = 10
DRS.Open sSql,Conn,1
rec_count=Drs.Recordcount '// Àüü ·¹ÄÚµå ¼öÀÇ ÀúÀå
if rec_count > 0 then
Drs.Absolutepage = page '// ÇöÀçÀÇ ÆäÀÌÁö·Î ¿Å±â±â
totpage = Drs.PageCount '// ºÐ·ùµÈ ÆäÀÌÁöÀÇ °¹¼ö
else
totpage = 0
end if
%>