S
sodakjones
Guest
i have this code in the on click section of a button
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
Set dbsinventory = opendatabase("inventory.mdb")
dbsdb1.synchronize "s:\Info Systems Inventory\rinventory", dbRepImpExpChanges
MsgBox "synch done"
Exit_Command0_Click:
Exit Sub
Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click
End Sub
i get told that their is a compile error when i try to run it at the opendatabse word it tells me that the sub of function is not diefined. what am doing wrong?
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
Set dbsinventory = opendatabase("inventory.mdb")
dbsdb1.synchronize "s:\Info Systems Inventory\rinventory", dbRepImpExpChanges
MsgBox "synch done"
Exit_Command0_Click:
Exit Sub
Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click
End Sub
i get told that their is a compile error when i try to run it at the opendatabse word it tells me that the sub of function is not diefined. what am doing wrong?