-
error message
please can someone tell me why i'm getting this error message, i've seen this befor but can not remember where!!!
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query.
Here is my code:
<%
Dim title, music_date, sub_title, LofScore, revised, First_performance, objcon, sqlinsert
Function ChkString(string)
If string = "" Then string = " "
ChkString = Replace(string, "'", "''")
End Function
' Receiving values from Form
title = ChkString(Request.Form("title"))
music_date = ChkString(Request.Form("m_date"))
subt_title = ChkString(Request.Form("sub_title"))
LofScore = ChkString(Request.Form("comments"))
revised = chkstring(request.form("revised"))
first_performance = chkstring(request.form("f_performance"))
set objcon = server.createobject("adodb.connection")
objcon.open "stravinsky"
sqlinsert = "insert into music (title, sub_title, m_date, revised, lofscore, f_performance) values
('" & title & "', '" & sub_title &"', '" & music_date & "', '" & revides & "', '" & lofscore & "',
'" & first_performance & "')"
objcon.execute(sqlinsert)
objcon.close
set objcon = nothing
response.write " the music details have been entered inti the database Thank You"
%>
thanks
-
Your code looks ok except for:
objcon.execute(sqlinsert)
should be
objcon.execute sqlinsert
Unless the execute method is returning a recordset.