Error in row...

Halløj

Jeg udvikler pt et system. Systemet virker fint for mig. Men en anden bruger virker det ikke for. De uafhængige tests foregår på samme server. Det er en ASP fejl så klienten burde vel være irrelevant.

Men here goes. Følgende kode fejler i linien rs.update. Fejlbesked:

Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'

[Microsoft][ODBC Microsoft Access Driver]Error in row

Dim kontantpris
Dim udbetaling
Dim grundareal
Dim boligareal
Dim driftsbygning
Dim amt
Dim maegler
Dim beskrivelse

driftsform = Request.Form(\"driftsform\")
kontantpris = Request.Form(\"kontantpris\")
udbetaling = Request.Form(\"udbetaling\")
grundareal = Request.Form(\"grundareal\")
boligareal = Request.Form(\"boligareal\")
driftsbygning = Request.Form(\"driftsbygning\")
amt = Request.Form(\"amt\")
postnummer = Request.Form(\"postnummer\")
city = Request.Form(\"city\")
maegler = Request.Form(\"maegler\")
beskrivelse = Request.Form(\"beskrivelse\")

if len(kontantpris) < 1 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste en kontantpris!\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(udbetaling) < 1 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste en udbetalingspris\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(grundareal) < 1  then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste grundarealet\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(boligareal) < 1 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste boligarealet\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(driftsbygning) < 1 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste størrelsen på driftsbygningen\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if amt = \"Vælg amt\" then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal vælge et amt!\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(postnummer) <> 4 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Der er fejl i postnummeret!\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if
if len(city) < 1 then
Response.Redirect(\"brugere.asp?mode=opret_annonce_1&error=\" & server.URLEncode(\"Du skal indtaste et bynavn\") & \"&kontantpris=\" & kontantpris & \"&udbetaling=\" & udbetaling & \"&grundareal=\" & grundareal & \"&boligareal=\" & boligareal & \"&driftsbygning=\" & driftsbygning & \"&amt=\" & server.URLEncode(\"amt\") & \"&postnummer=\" & postnummer & \"&city=\" & city & \"&maegler=\" & maegler & \"&beskrivelse=\" & server.URLEncode(\"beskrivelse\") & \"&brugerid=\" & session(\"brugerid\"))
end if

Dim Connect, rs
Set Connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open strConn
Set rs = Server.CreateObject(\"ADODB.Recordset\")
rs.open \"SELECT * FROM boliger\",Connect,1,3
rs.AddNew
rs(\"driftsform\") = driftsform
rs(\"kontantpris\") = kontantpris
rs(\"udbetaling\") = udbetaling
rs(\"grundareal\") = grundareal
rs(\"boligareal\") = boligareal
rs(\"driftsbygning\") = driftsbygning
rs(\"postnummer\") = postnummer
rs(\"city\") = city
rs(\"maegler\") = maegler
rs(\"boligbeskrivelse\") = beskrivelse
rs(\"amt\") = amt
rs(\"billede\") = \"1\"
rs(\"brugerid\") = session(\"brugerid\")
rs.Update
boligid = rs(\"boligid\")
rs.Close
Set rs = nothing

Jeg har aldrig set noget lignende. Ved du hvad der er galt?