Hi
I am a newbie.
I am trying to add a record to an empty table using RDO 2.0 and Visual basic 6.0.
But I am not gettting any error and program is halted.
Here is the code I am using
If Action.Caption = "Add" Then
mdsBuyer.AddNew
mdsBuyer.rdoColumns("Buyer_Code").Value = Trim(txtBuyer.Text)
mdsBuyer.rdoColumns("Buyer_Name").Value = Trim(txtName.Text)
mdsBuyer.Update
End If
Private Sub Form_Load()
Dim szSql As String
' Open the database SQL
szSql = "SELECT * FROM Buyer"
Set mdsBuyer = gdbAcorns.OpenResultset(szSql, rdOpenDynamic, rdConcurRowver)
end sub
How can I check using RDO that table is empty and now to add a record.
Please help.