B
Bob
When I Distribute my Invoices from a holding (Button Code below), my list
box then shows a list of this error #Deleted, but they have just been
moved!
So if 10 Invoices are distributed I get 10 errors #Deleted
Thanks for any Help...Bob
Private Sub cmdDistributeAllInvoices_Click()
Dim nRtnValue As Integer
nRtnValue = MsgBox("Are you sure you want to Distribute All Invoices?" &
vbCrLf & vbCrLf & "If you choose Yes, all the Invoices will have Invoice
Numbers.", vbCritical + vbYesNo + vbDefaultButton2, "Distribute all
Invoices")
If nRtnValue = vbYes Then
DoCmd.Hourglass True
subSetInvoiceValues
Application.SysCmd acSysCmdSetStatus, "Process is completed."
Application.SysCmd acSysCmdClearStatus
DoCmd.Hourglass False
End If
End Sub
box then shows a list of this error #Deleted, but they have just been
moved!
So if 10 Invoices are distributed I get 10 errors #Deleted
Thanks for any Help...Bob
Private Sub cmdDistributeAllInvoices_Click()
Dim nRtnValue As Integer
nRtnValue = MsgBox("Are you sure you want to Distribute All Invoices?" &
vbCrLf & vbCrLf & "If you choose Yes, all the Invoices will have Invoice
Numbers.", vbCritical + vbYesNo + vbDefaultButton2, "Distribute all
Invoices")
If nRtnValue = vbYes Then
DoCmd.Hourglass True
subSetInvoiceValues
Application.SysCmd acSysCmdSetStatus, "Process is completed."
Application.SysCmd acSysCmdClearStatus
DoCmd.Hourglass False
End If
End Sub