Hvad betyder det?

du bruger sikkert en WHERE sætning i din SQL og så betyder det at recorden er slettet!

hit med koden, der laver fejl, ¨så skal jeg straks fortælle dig det

tpiil:> \"og så betyder det at recorden er slettet!\" ikke nødvendigvis .. det betyder ENTEN at der ikke er nogle records returned ELLER at den record du prøver at hive ud er slettet.

det betyder givetvis at du gør således:

Set rs = Execute(SQL)
do while not rs.eof
...

i stedet for:

Set rs = Execute(SQL)
if not rs.eof then
do while not rs.eof
...


Du skal altid undersøge om der bliver returneret nogen records....


/ortrak

husk ogso rs.bof


SQL = \"SELECT from Tabel\"
set rs = conn.Execute(SQL)

If Not(rs.EOF Or rs.BOF) then

\' Skriv din kode her

else

\' For at undgå den besked som du skrev så skriv en fejl meddelse såsom Søgningen gav ingen resultat eller hvad nu scriptet er til


end If

Jeg har prøvet alle jeres forslag, her er koden

<%
strConn = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"../hahahaha.mdb\")
Set RS = Server.CreateObject(\"ADODB.RecordSet\")
strQ = \"SELECT * FROM database ORDER BY brugernavn\"
RS.Open strQ, strConn, 1, 2
  Do while not rs.eof  %>
   
  <option value=\"<%=RS(\"brugernavn\")%>\"><%=RS(\"brugernavn\")%></option>
   
    <% RS.MoveNext
Loop %>


Den laver godt nok rullemenuen med alle brugernavnene i...

Jeg er 100% sikker på at recorden findes !

<%
strConn = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"../hahahaha.mdb\")
strQ = \"SELECT * FROM database ORDER BY
brugernavn\"
set rs = conn.ExeCute(strQ)
If Not(rs.EOF Or rs.BOF) then
Do while not rs.eof 
%><option value=\"<%=RS(\"brugernavn\")%>\"><%=RS(\"brugernavn\")%></option>
<% RS.MoveNext
Loop
else
%>
Brugernavnet findes ikke
<%
end If
%>

Microsoft VBScript runtime error \'800a01a8\'
Object required: \'\'
skumfidusersmagergodt.asp, line 68

68 :
set rs = conn.ExeCute(strQ)

istedet for:
strQ = \"SELECT * FROM database ORDER BY
brugernavn\"

skal du skrive:
strQ = \"SELECT * FROM database ORDER BY Brugernavn\"

også kan du godt give lidt flere points?

Der mangler vist et par linier i cyigens svar:

set conn = Server.CreateObject(\"ADODB.Recordset\")
og conn.open strConn