this has to be something simple...

code:

Private Sub cmdsave_Click()
Dim reply As String
Data1.ReadOnly = False
Data2.ReadOnly = False
Data3.ReadOnly = False
Data1.Recordset.AddNew
Data2.Recordset.AddNew
Data3.Recordset.AddNew
reply = MsgBox("Do you want to Submit another Problem", vbYesNo)
If reply = vbYes Then
clearfields
Else
MsgBox "Thank You."
Unload Me
End If
End Sub


the error msg I'm getting is saying that data1.recordset.addnew is a read only file? Yet in the properties box it is set to REad only=False. What gives?

[Serge]

What is the recordsource for your data control? It sounds like you have a recordset, which is not updatable.

------------------

Serge

Senior Programmer Analyst
[email protected]
[email protected]
ICQ#: 51055819

It is a query in Access97 called Comments. That is what the recordsource is set to in the properties box.

[JorgeLedo]

What is the error number and description it gives ??


------------------
Jorge Ledo
[email protected]
Portugal