V
Vesta via AccessMonster.com
Hi All,
I have use the 'Save' command button in the access2000.
However, I need additional function when I click the 'Save' button.
Click 'Save' -
'Yes' --> Save the data
and then refresh into new form with the Log Number(Primary
Key) increase to the next number
No issue on the 'No' function.
Pls help.
Thank you.
Private Sub SaveData_Click()
On Error GoTo Err_SaveData_Click
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Exit_SaveData_Click:
Exit Sub
Err_SaveData_Click:
MsgBox Err.Description
Resume Exit_SaveData_Click
End Sub
I have use the 'Save' command button in the access2000.
However, I need additional function when I click the 'Save' button.
Click 'Save' -
'Yes' --> Save the data
and then refresh into new form with the Log Number(Primary
Key) increase to the next number
No issue on the 'No' function.
Pls help.
Thank you.
Private Sub SaveData_Click()
On Error GoTo Err_SaveData_Click
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Exit_SaveData_Click:
Exit Sub
Err_SaveData_Click:
MsgBox Err.Description
Resume Exit_SaveData_Click
End Sub