T
trevorC via AccessMonster.com
P = MsgBox("Send E-Mail now !, Click Yes to Preview the output or No to
continue with E-Mail or Cancel to end", vbYesNoCancel, "E-Mail automation")
If P = vbCancel Then
Exit Sub
Else
If P = vbYes Then
DoCmd.OpenForm "Dispatch Details", acFormDS, , , , acDialog
Else
End If
End If
Hi All,
The above code works fine until P = vbYes, the code loads the form in
datasheet veiw and acdialog mode but the code continues after loading the
form.
Any help is appreciated
regards
TrevorC
continue with E-Mail or Cancel to end", vbYesNoCancel, "E-Mail automation")
If P = vbCancel Then
Exit Sub
Else
If P = vbYes Then
DoCmd.OpenForm "Dispatch Details", acFormDS, , , , acDialog
Else
End If
End If
Hi All,
The above code works fine until P = vbYes, the code loads the form in
datasheet veiw and acdialog mode but the code continues after loading the
form.
Any help is appreciated
regards
TrevorC