27. juli 2004 - 10:05Der er
8 kommentarer og 1 løsning
If rs_billedserie.eof or rs_billedserie.bof then ?
Hej Eksperter
Burde dette ikke kunne lade sig gøre?
------------------------------------------------------------ Set rs_billedserie = Server.CreateObject("ADODB.RecordSet") rs_billedserie.open "Select * From [billedserie] WHERE navn = " & rs_film("id"), Conn If rs_billedserie.eof or rs_billedserie.bof then 'laver noget andet Else 'åbner en tabel hvor man skal bruge info fra rs_billedserie End If ------------------------------------------------------------ Får denne fejl: ------------------------------------------------------------ ADODB.Field error '80020009'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
filnavn.asp, line 0 ------------------------------------------------------------
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Nej det er ikke det, for jeg henter det id tidligere, og det virker :o)
Prøver lige at skrive "hele" koden : ------------------------------------------------------------------------------------ <% Set rs_billedserie = Server.CreateObject("ADODB.RecordSet") rs_billedserie.open "Select * From [billedserie] WHERE navn = " & rs_anmeldelse("tilknyttet_id"), Conn If rs_billedserie.eof or rs_billedserie.bof then 'Åbner forbindelse til tabel med gamle billeder i = 0 Set rs_billeder = Server.CreateObject("ADODB.RecordSet") rs_billeder.open "Select * From [gamle_billeder] WHERE film_id = " & rs_film("id"), Conn do while not rs_billeder.eof i = i + 1 rs_billeder.MoveNext Loop Else 'Åbner forbindelse til tabel med nye billeder i = 0 Set rs_billeder = Server.CreateObject("ADODB.RecordSet") rs_billeder.open "Select * From [billeder] WHERE BilledSerieID = " & rs_billedserie("id"), Conn do while not rs_billeder.eof i = i + 1 rs_billeder.MoveNext Loop
End If %> ------------------------------------------------------------------------------------
Ups ------------------------------------------------------------------------------------ <% Set rs_billedserie = Server.CreateObject("ADODB.RecordSet") rs_billedserie.open "Select * From [billedserie] WHERE navn = " & rs_film("id"), Conn If rs_billedserie.eof or rs_billedserie.bof then 'Åbner forbindelse til tabel med gamle billeder i = 0 Set rs_billeder = Server.CreateObject("ADODB.RecordSet") rs_billeder.open "Select * From [gamle_billeder] WHERE film_id = " & rs_film("id"), Conn do while not rs_billeder.eof i = i + 1 rs_billeder.MoveNext Loop Else 'Åbner forbindelse til tabel med nye billeder i = 0 Set rs_billeder = Server.CreateObject("ADODB.RecordSet") rs_billeder.open "Select * From [billeder] WHERE BilledSerieID = " & rs_billedserie("id"), Conn do while not rs_billeder.eof i = i + 1 rs_billeder.MoveNext Loop
End If %> ------------------------------------------------------------------------------------
<%=rs_billeder("filnavn")%> kommer lige efter den anden kode - Og jeg har nok ikke et loop, når du siger det på den måde ;o) ------------------------------------------------------------------------------- 'Ovenstående kode....... i = i + 1 rs_billeder.MoveNext Loop End If %> <img border="0" src="pictures/film/<%=rs_film("id")%>/<%=rs_billeder("filnavn")%>" width="200" height="147"><br>(I alt <%=i%> billeder)
<% if not rs_billeder.EOF then %> <img border="0" src="pictures/film/<%=rs_film("id")%>/<%=rs_billeder("filnavn")%>" width="200" height="147"><br>(I alt <%=i%> billeder) <% end if %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.