Feedback Form Error

[ADB1]

I have a basic form on a web page, which I want to populate an access database with feedback information, however when trying to submit the information, the following error appears:


Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query.

/feedback.asp, line 161


Any help would be greatly appreciated.

Thanks,

Adam.

 

[Mighty]

Can you post the code you use to update the DB. Mise Le Meas,

Mighty

 

[ADB1]

Is this what you want? Looks a bit messy to me!

<%FirstName = request.Form(&quot;FirstName&quot%>
<%Set Feedback = Server.CreateObject(&quot;ADODB.Connection&quot
Feedback.ConnectionTimeout = Session(&quot;Feedback_ConnectionTimeout&quot
Feedback.CommandTimeout = Session(&quot;Feedback_CommandTimeout&quot
Feedback.Open Session(&quot;Feedback_ConnectionString&quot, Session(&quot;Feedback_RuntimeUserName&quot, Session(&quot;Feedback_RuntimePassword&quot
Set cmdTemp = Server.CreateObject(&quot;ADODB.Command&quot
Set resultset = Server.CreateObject(&quot;ADODB.Recordset&quot
cmdTemp.CommandText = &quot;INSERT INTO Feedback (FirstName, LastName, Site, Tel, EMail, MessageType, Subject, SubjectOther, Person, ContactRequested, Comments, RemoteName, RemoteUser) VALUES ('&quot; & toDB_I(request.Form(&quot;FirstName&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;LastName&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Site&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Tel&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;EMail&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;MessageType&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Subject&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;SubjectOther&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Person&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;ContactRequested&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Comments&quot) & &quot;','&quot; & toDB_I(request.ServerVariables(&quot;REMOTE_HOST&quot) & &quot;','&quot; & toDB_I(request.ServerVariables(&quot;REMOTE_ADDR&quot) & &quot;')&quot;
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = Feedback
resultset.CacheSize = 25
resultset.Open cmdTemp, , 3, 1%>
<p align=&quot;left&quot;>&nbsp;</p>

Thanks.

 

[Mighty]

I don't know why you are bothering the the recordset. Try the following:

<%FirstName = request.Form(&quot;FirstName&quot%>
<%Set Feedback = Server.CreateObject(&quot;ADODB.Connection&quot
Feedback.ConnectionTimeout = Session(&quot;Feedback_ConnectionTimeout&quot
Feedback.CommandTimeout = Session(&quot;Feedback_CommandTimeout&quot
Feedback.Open Session(&quot;Feedback_ConnectionString&quot, Session(&quot;Feedback_RuntimeUserName&quot, Session(&quot;Feedback_RuntimePassword&quot
sql = &quot;INSERT INTO Feedback (FirstName, LastName, Site, Tel, EMail, MessageType, Subject, SubjectOther, Person, ContactRequested, Comments, RemoteName, RemoteUser) VALUES ('&quot; & toDB_I(request.Form(&quot;FirstName&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;LastName&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Site&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Tel&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;EMail&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;MessageType&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Subject&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;SubjectOther&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Person&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;ContactRequested&quot) & &quot;','&quot; & toDB_I(request.Form(&quot;Comments&quot) & &quot;','&quot; & toDB_I(request.ServerVariables(&quot;REMOTE_HOST&quot) & &quot;','&quot; & toDB_I(request.ServerVariables(&quot;REMOTE_ADDR&quot) & &quot;')&quot;

FeedBack.Execute sql, ,1
<p align=&quot;left&quot;> </p>

Mise Le Meas,

Mighty