quando eseguo questo comando la pagina va in errore in "out of time"
ecco il codice della funzione:
codice:function prevImage(id_gallery,id_photo) set rsPrevImage = server.CreateObject("ADODB.RecordSet") rsPrevImage.open "SELECT * from gallery_photo where id_gallery = " & id_gallery & " ORDER BY id" , dbc, adOpenDynamic while not rsPrevImage.eof if not rsPrevImage.eof then if clng(rsPrevImage("id")) = clng(id_photo) then if not rsPrevImage.bof then rsPrevImage.movePrevious if not rsPrevImage.bof then prevImage = rsPrevImage("id") else prevImage = 0 end if end if end if if not rsPrevImage.eof then rsPrevImage.movenext wend rsPrevImage.close set rsPrevImage = nothing end function


Rispondi quotando