Hallo,
Ik gebruik onderstaande code om 1 record van een formulier te verzenden dit werkt prima tot dat het wordt uitgevoerd op een computer waarop access 2010 runtime staat dan krijg ik de volgende foutmelding "De uitvoering van deze toepassing is gestopt omdat er runtime fout is opgetreden"
Private Sub Knop17_Click()
DoCmd.OpenForm "Werkbonnen", acNormal, , "[Weeknummer]= forms!frmWerkbonnen![Weeknummer]"
Me.FilterOn = True
' Send a PDF of the form to an email
'DoCmd.OutputTo acOutputForm, "YourFormName", "PDFFormat(*.pdf)"
DoCmd.SendObject acForm, "Werkbonnen", "PDFFormat(*.pdf)", "", CC, "", "Werkbon", , True, ""
' Close the form
DoCmd.Close acForm, "YourFormName", acSaveNo
Me.Filter = ""
Me.FilterOn = False
End Sub
bij voorbaat dank
Ik gebruik onderstaande code om 1 record van een formulier te verzenden dit werkt prima tot dat het wordt uitgevoerd op een computer waarop access 2010 runtime staat dan krijg ik de volgende foutmelding "De uitvoering van deze toepassing is gestopt omdat er runtime fout is opgetreden"
Private Sub Knop17_Click()
DoCmd.OpenForm "Werkbonnen", acNormal, , "[Weeknummer]= forms!frmWerkbonnen![Weeknummer]"
Me.FilterOn = True
' Send a PDF of the form to an email
'DoCmd.OutputTo acOutputForm, "YourFormName", "PDFFormat(*.pdf)"
DoCmd.SendObject acForm, "Werkbonnen", "PDFFormat(*.pdf)", "", CC, "", "Werkbon", , True, ""
' Close the form
DoCmd.Close acForm, "YourFormName", acSaveNo
Me.Filter = ""
Me.FilterOn = False
End Sub
bij voorbaat dank
Laatst bewerkt: