Hoi,
Ik heb een programmaatje gemaakt en hij geeft netjes een aangepaste foutmelding maar, daarna volgt alsnog de ODBC-foutmelding (ik moet verplicht 2 velden invullen bij een form en ik vul er expres maar 1 in). Onderstaand de code die ik gebruik:
--code--
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Const conErrorActieOngedaanmakenOnmogelijk = 2046
Select Case DataErr
Case conErrorActieOngedaanmakenOnmogelijk
hoi = MsgBox("Probleem! ", vbExclamation, "Fout")
Case 3146
hoi = MsgBox("Probleem2!", vbExclamation, "Fout")
Case Else
hoi = MsgBox("Ander Probleem! ", vbExclamation, "Fout")
End Select
End Sub
--code--
Graag wil ik dat deze ODBC-foutmelding nu ook onderdrukt wordt, want de eindgebruiker heeft niets aan een foutmelding van 6 regels cryptografie
.
Ik heb een programmaatje gemaakt en hij geeft netjes een aangepaste foutmelding maar, daarna volgt alsnog de ODBC-foutmelding (ik moet verplicht 2 velden invullen bij een form en ik vul er expres maar 1 in). Onderstaand de code die ik gebruik:
--code--
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Const conErrorActieOngedaanmakenOnmogelijk = 2046
Select Case DataErr
Case conErrorActieOngedaanmakenOnmogelijk
hoi = MsgBox("Probleem! ", vbExclamation, "Fout")
Case 3146
hoi = MsgBox("Probleem2!", vbExclamation, "Fout")
Case Else
hoi = MsgBox("Ander Probleem! ", vbExclamation, "Fout")
End Select
End Sub
--code--
Graag wil ik dat deze ODBC-foutmelding nu ook onderdrukt wordt, want de eindgebruiker heeft niets aan een foutmelding van 6 regels cryptografie