% set rsd = Server.CreateObject("ADODB.Recordset") SQLText1 = "SELECT * " &_ "FROM T_Foto " &_ "ORDER BY T_Foto.idfoto DESC;" rsd.Open SQLText1, Session("dbconn"), 3,3 If rsd.EOF and rsd.BOF then EmptyRecordset = True else EmptyRecordset = False pag = TRIM(Request.QueryString("pag")) If pag="" Then pag = 1 Else pag = CInt(pag) End If rsd.PageSize = 16 rsd.AbsolutePage = pag End if %>
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||