OPPDATERE DATABASE

Set oConn = Server.CreateObject(\"ADODB.Connection\")

oConn.Open \"Driver={Microsoft Access Driver (*.mdb)};dbq=\" & Server.MapPath(\"../database/db.mdb\")

txtDato = Date()
txtDato = Day( txtDato ) & \".\" & Month( txtDato ) & \".\" & Year( txtDato )

SQL = \"UPDATE tblNyhet SET Tittel=\'\" & txtTittel &_
    \"\', Ingress=\'\" & txtIngress &_
    \"\', LagdAv=\'\" & txtLagdAv &_
    \"\', Mail=\'\" & txtMail &_
    \"\', Dato=\'\" & txtDato &_
    \"\' WHERE NyhetId = \" & \"\'\" & txtNyhetId & \"\'\"
   
    \'Response.Write(SQL)
   
    \'Response.End

\' Kjør SQL setning mot database server
Set oRS = oConn.Execute(SQL)

oConn.Close

Set oConn = Nothing

Feilmeldingen er som følger:

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
/FreeTeam/admin_site/oppdater_tblNyhet.asp, line 70

Og det er her: Set oRS = oConn.Execute(SQL) Hvis jeg skriver ut SQL er den som følger:

UPDATE tblNyhet SET Tittel=\'Dette er en test.\', Ingress=\'nyhet 2 \', LagdAv=\'mmc\', Mail=\'mmc@mmc.com\', Dato=\'17.12.2001\' WHERE NyhetId = \'2\'