Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #72.7K
 | Dim dbnil As Database (not identifying the database name by the APP.Path) Dim rscustomer As Recordset Private Sub Command1_Click() If Text1 = "" Then MsgBox "please enter ID", vbCritical, "customer" Text1.SetFocus Else If Text2 = "" Then MsgBox "please enter the name", vbCritical, "customer" Text2.SetFocus Else rscustomer.AddNew customer(" ID") = …  |