runni
10-11-2000, 03:37 PM
I am using DAO to add records to oracle but I keep getting
ERROR 3146 -ODBC call fail even though I am able to delete
and modify records
error occurs at rs.Update so basically each time I use
Addnew and try to update i get the error
Dim db As Database
Dim rs As Recordset
Private Sub Command1_Click() 'Add record button
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
rs.AddNew
End Sub
'code for Save Details button
If rs.EditMode = dbEditAdd Or rs.EditMode =dbEditInProgressThen
rs("sem") = CInt(Text1.Text)
rs("sub") = Text2.Text
rs("m") = CInt(Text3.Text)
rs.Update 'Error occurs here
End If
Set db = OpenDatabase("abc", , , "ODBC;UID=snrty;PWD=*****;dsn=abc")
Set rs = db.OpenRecordset("select * from marksha", dbOpenDynaset, dbRunAsync, dbOptimisticValue)
i am using personal oracle 8. do i have to change some settings there????
please help
ERROR 3146 -ODBC call fail even though I am able to delete
and modify records
error occurs at rs.Update so basically each time I use
Addnew and try to update i get the error
Dim db As Database
Dim rs As Recordset
Private Sub Command1_Click() 'Add record button
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
rs.AddNew
End Sub
'code for Save Details button
If rs.EditMode = dbEditAdd Or rs.EditMode =dbEditInProgressThen
rs("sem") = CInt(Text1.Text)
rs("sub") = Text2.Text
rs("m") = CInt(Text3.Text)
rs.Update 'Error occurs here
End If
Set db = OpenDatabase("abc", , , "ODBC;UID=snrty;PWD=*****;dsn=abc")
Set rs = db.OpenRecordset("select * from marksha", dbOpenDynaset, dbRunAsync, dbOptimisticValue)
i am using personal oracle 8. do i have to change some settings there????
please help