Sayfayż Kapat

<% If AntiSQL(Request.QueryString("PictureID")) = "" or IsNumeric(Request.QueryString("PictureID")) = False Then Response.Redirect("?PictureID=1") End if PictureID = Request.QueryString("PictureID") Set XPictures = Server.CreateObject("ADODB.Recordset") SQL = "Select * from Pictures Where PictureID Order by PictureID" XPictures.Open SQL , DBConn,1,3 Set Pictures = Server.CreateObject("ADODB.Recordset") SQL = "Select * from Pictures Where PictureID Like "&PictureID&" Order by PictureID" Pictures.Open SQL , DBConn,1,3 If Pictures.BOF Then %>

 

            Geri                           <% End If XPictures.Close Pictures.Close FwPictureID = PictureID + 1 Set Pictures = Server.CreateObject("ADODB.Recordset") SQL = "Select * from Pictures Where PictureID Like "&FwPictureID&" Order by PictureID" Pictures.Open SQL , DBConn,1,3 If Pictures.BOF Then %>                      <% Else %>                      ›leri <%End If%>

Sayfayż Kapat