no value given :problem:

Jeg får denne fejlbesked når jeg kører nedenstående kode. Hvorfor mon? Jeg mener at have erklæret alle variablerne rigtigt.

Microsoft JET Database Engine error \'80040e10\'

No value given for one or more required parameters.

/runar/AA/index.asp, line 30





<%
Option Explicit

\' Definerer konstanter til recordset

const adOpenForwardOnly = 0   
const adLockReadOnly = 1   
const adCmdText = 1 


\' Open database connection
dim Conn, sti
sti = Server.MapPath (\"login.mdb\")
Set Conn = Server.CreateObject(\"ADODB.Connection\")
// Conn.connectionstring = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\" & sti &\";\"
Conn.connectionstring = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\user\\runar\\AA\\login.mdb;\"
Conn.Open


\' Open recordset
dim rs
dim sql

set rs = Server.CreateObject(\"ADODB.recordset\")

sql = \"Select * from Login where id<3 order by id;\"

rs.open sql, Conn, adOpenForwardOnly, adLockReadOnly, adCmdText

%>