11. september 2001 - 14:02Der er
3 kommentarer og 2 løsninger
Problemer med SQL / ASP
Hvad er der galt i nedenstående?
<% Set objConn = Server.CreateObject(\"ADODB.Connection\") Set objRS = Server.CreateObject(\"ADODB.Recordset\") objConn.Open \"DSN=web;UID=web;PWD=web\" Set objRS = objConn.Execute(\"select id,dato from kort WHERE id = 155\") Do Response.Write objRS(\"id\") & \" \" & objRS(\"dato\") & \"<br>\" objRS.Movenext Loop objRS.Close Set objRS = Nothing objConn.Close set objConn = Nothing %>
Skriver ud som den skal, men kommer med følgene fejl: 155 03-09-01 error \'80020009\' Exception occurred.
<% Set objConn = Server.CreateObject(\"ADODB.Connection\") Set objRS = Server.CreateObject(\"ADODB.Recordset\") objConn.Open \"DSN=web;UID=web;PWD=web\" Set objRS = objConn.Execute(\"select id,dato from kort WHERE id = 155\") Do Until objRS.EOF Response.Write objRS(\"id\") & \" \" & objRS(\"dato\") & \"<br>\" objRS.Movenext Loop objRS.Close Set objRS = Nothing objConn.Close set objConn = Nothing %>
Ja det er samme løsning. Når du benytter .Movenext og kommer efter den sidste record i recordset\'er sættes flaget .EOF (end-of-file). Der findes en function som går den anden vej .Movelast, hvis den flytter forbi den første record sættes flaget .BOF (before-of-file).
Du kan evt ligge en if-sætning omkring udskrivningen. Hvis dit recordset eks.vis er tomt fra starten af, hvis SQL-sætningen ikke gav noget resultat.
If Not (objRS.EOF AND objRS.BOF) Then Do WHILE NOT objRS.EOF Response.Write objRS(\"id\") & \" \" & objRS(\"dato\") & \"<br>\" objRS.Movenext Loop Else response.write \"Ingen poster fundet ved søgning\" end if
Synes godt om
Ny brugerNybegynder
Din løsning...
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.