<% GotoPage = Request("GotoPage") if GotoPage = "" then GotoPage = 1 pagesize = 16 branchCode = Request("branchCode") search_category = Request("search_category") searchString = Request("searchString") 'If branchCode = "" Then branchCode = "" If branchCode <> "" Then search_qry = " and branchCode = '"&branchCode&"'" End If If search_category <> "" And searchString <> "" Then search_qry = " and "&search_category&" like '%"&searchString&"%'" End If SQL = "SELECT count(IDX) as recCount FROM tbl_consult where 1=1 " & search_qry 'Response.write SQL SET Rs = DBCON.EXECUTE(SQL) recordCount = Rs(0) Rs.close : Set Rs = nothing pagecount = int((recordCount-1)/pagesize) +1 SQL = "SELECT TOP " & pagesize & " * FROM tbl_consult " SQL = SQL & " WHERE 1=1 "&search_qry&" and IDX not in " SQL = SQL & "(SELECT TOP " & ((GotoPage - 1) * pagesize) & " IDX FROM tbl_consult" SQL = SQL & " where 1=1 "&search_qry&" ORDER BY IDX desc) order by idx desc" 'Response.write SQL Set RS = Dbcon.Execute(SQL) %>
À¯¾Ø¾ÆÀÌ °í°´¼¾ÅÍ

¿Â¶óÀλó´ã

  • Home
  • °í°´¼¾ÅÍ
  • ¿Â¶óÀÎ »ó´ã
<% If Session("admin_div") = "1" Then %> <% End If %> <% If Session("admin_div") = "1" Then %> <% End If %> <% i = 0 j = 0 DO UNTIL RS.EOF loop_num = loop_num + 1 If j = 2 Then j = 0 view_num = int(recordCount)-(int(pagesize)*(int(GotoPage)-1)) - loop_num + 1 idx = RS("idx") user_id = RS("user_id") user_name = RS("user_name") user_age = RS("user_age") user_sex = RS("user_sex") user_tel = RS("user_tel") user_email = RS("user_email") user_pass = RS("user_pass") bbs_type_u = RS("bbs_type_u") reple_type1 = RS("reple_type1") reple_type2 = RS("reple_type2") reple_type3 = RS("reple_type3") reple_type4 = RS("reple_type4") user_year = RS("user_year") user_month = RS("user_month") user_day = RS("user_day") user_week = RS("user_week") branch_Code = RS("branchCode") b_subject = RS("b_subject") b_content = RS("b_content") b_file0 = RS("b_file0") b_file1 = RS("b_file1") b_content_re = RS("b_content_re") b_writedate = RS("b_writedate") b_re_writedate = RS("b_re_writedate") b_reple_type = RS("b_reple_type") b_doctor_type = RS("b_doctor_type") b_writedate = Left(b_writedate,10) b_writedate = replace(b_writedate,"-",".") b_re_writedate = Left(b_re_writedate,10) b_re_writedate = replace(b_re_writedate,"-",".") %> <% If Session("admin_div") = "1" Then %> <% End If %> <% i = i + 1 j = j + 1 RS.MOVENEXT Loop RS.CLOSE() %>
¹øÈ£ Á¦¸ñ 󸮻óÅ ÀÛ¼ºÀÚ µî·ÏÀϵð¹ÙÀ̽º
<%=view_num%> <% If branch_Code = "U001" Then %> °­³²Á¡ <% End If %> <% If branch_Code = "U003" Then %> Àá½ÇÁ¡ <% End If %> <% If branch_Code = "U005" Then %> Àá½ÇÁ¡ <% End If %> <% If branch_Code = "U006" Then %> ¿Õ½Ê¸®Á¡ <% End If %> <% If branch_Code = "U004" Then %> ÆÇ±³Á¡ <% End If %> <% If branch_Code = "U002" Then %> ¼ö¿øÁ¡ <% End If %> <% If branch_Code = "U007" Then %> ¸íµ¿Á¡ <% End If %> <% If branch_Code = "U008" Then %> ±¤±³Á¡ <% End If %> <% If branch_Code = "U009" Then %> ½ÅÃÌÁ¡ <% End If %> secret<% End If %>"> <% If bbs_type_u = "1" And Trim(Session("user_id")&"")="" Then %> <%=b_subject%> <% Else %> <%=b_subject%> <% End If %> <% Call getTimeIcon(RS("b_writedate")) %> <% If b_reple_type = "0" Then %> ´äº¯´ë±â <% Else %> ´äº¯¿Ï·á <% End If %> <%=user_name%> <%=b_writedate%><%=RS("device")%>
<% Set listNum = New PageNavi listNum.Initial "customer01.asp?vSort="&vSort&"&gSort="&gSort&"&sSort="&sSort&"&vKeyType="&vKeyType&"&vUserName="&vUserName&"&vUserId="&vUserId&"&branchCode="&branchCode&"&vSid1="&vSid1&"&vSid2="&vSid2,10,gotopage,pagecount,search_category,searchString,optionstr,"","" listNum.pagePrint Set listNum = nothing %> ±Û¾²±â