Hvad er fejlen?
HejJeg får fejlen:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query.
addsag-t.asp, line 25
Scriptet er:
<%
set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("********.mdb")
Conn.Open DSN
Function fixQuotes( theString )
fixQuotes = Replace( theString, "'", "''" )
End Function
Dato = Date
set rs = conn.execute("SELECT * FROM sager WHERE titel = '" & request("overskrift") & "'")
if rs.eof then
strSQL = "Insert into sager (tekst, dato, navn, titel)"
strSQL = strSQL & " values('" & Request.Form("tekst") & "', "
strSQL = strSQL & "'" & fixQuotes(Dato) & "', "
strSQL = strSQL & "'" & Request.Form("forfatter") & "', "
strSQL = strSQL & "'" & Request.Form("overskrift") & "')"
Conn.Execute(strSQL)
response.write "Tillykke"
else
response.write "<strong>FEJL!</strong><br><br>Der findes allerede en artikel med denne overskrift - vælg derfor et nyt.<br><br>Er det en fejl så kontakt da venligst en af vore admins.<br><br>"
End if
Conn.Close
Set Conn = Nothing
%>
Hvad er fejlen?
Mvh.
- Sigurd
