% Set Rs = Server.CreateObject("ADODB.RecordSet") If Request("under") <> "" Then sql = "select *, datediff(Day, lastmod, getdate()) as diff from messages where under = '" & Request("under") & "' and date_on < getdate() and date_off > getdate() order by id desc" Else sql = "select *, datediff(Day, lastmod, getdate()) as diff from messages where date_on < getdate() and date_off > getdate() order by id desc" End If 'Response.Write sql Rs.open sql,conn,1,1 Rs.PageSize = CURGAP TOTALPAGES = Rs.PageCount TOTALRECORDS = Rs.RecordCount STARTRECORD = (CURPAGE - 1) * CURGAP + 1 TEMP = 1 %>
![]() |
![]() |
![]() |
![]() |
![]() |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
![]() |
![]() |
![]() |
![]() |
![]() |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
![]() |
|
|
![]() |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||