---

Hej

Jeg prøver på at opdatere en access database online for første gang. Jeg kan
simpelthen ikke forstå hvorfor jeg får følgende fejl:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 15.

/dbadm/Updatelejl.asp, line 78

Linie 78 indeholder kun: objRS.Update (se kode nedenfor). Too few parameters?
Expected 15? Nogle gode råd? Jeg prøver at bruge så lidt SQL som muligt da jeg
ikke har så meget viden om det. I øvrigt har jeg opbygget kode nogenlunde efter
et eksempel (http://aspfree.com/asp/startpage.asp?id=23) så konkret hjælp til
fejlretning i min kode ville være meget velkommen.

På forhånd tak

Thomas


'Open up a connection to our Access database
'We will use a DSN-less connection.
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Server.MapPath("/lejladm/jtp.mdb")

objConn.Open

'Create a recordset object instance and retrieve the information
'from the lejligheder table.
Dim objRS, objbygRS,strsql
Set objRS = Server.CreateObject("ADODB.Recordset")
StrSql = "SELECT * FROM lejligheder_old WHERE Lejemaalsnummer=" & strlejlkode &
";"

Objrs.open strsql, Objconn, , adLockPessimistic

'Find lejligheden i databasen
fundet = false
ObjRS.Movefirst
Do While Not ObjRs.EOF
If cdbl(strlejlkode) = Objrs("lejemaalsnummer") then
' Response.write "found the record"
fundet=True
strantalm2= Request.form("Antalm2")
' Response.write strantalm2
objRS.Fields("antalm2") = CInt(strantalm2)

objRS.Update
end if
ObjRs.Movenext
loop