hi,

I am trying to update the MS Access database from a ASP page. On click of a button I want some value(say '1') to be written to the database. For that I am writing following code. But the code is not working.

rsWrite.Open "SELECT * from [input]", connWrite,_
adOpenDynamic, adLockBatchOptimistic

for the above line, it gives me an error that
ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

If anyone has any suggestions, please let me know.

<%
Sub butEstopClick
Dim connStringWrite
'Set connWrite = New ADODB.Connection
Set connWrite = Server.CreateObject("ADODB.Connection")
connStringWrite = "DRIVER={Microsoft Access Driver .mdb)};" &_
"DBQ=C:\Inetpub\wwwroot\RAL\test.mdb;DefaultDir=;UID=;PWD=;" &_
"Mode = readwrite"
connWrite.Open connStringWrite

Set rsWrite = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * from [input]"

rsWrite.Open "SELECT * from [input]", connWrite,_
adOpenDynamic, adLockBatchOptimistic

'Do While not rsWrite.EOF
rsWrite.Fields("Estop").Value = 1
rsWrite.Update
rsWrite.Fields("Reset").Value = 0
rsWrite.Update

rsWrite.Close
connWrite.Close
%>

End Sub
<INPUT type="button" value="ESTOP" id=butEstop name=butEstop onclick="<%butEstopClick%>">