apr=E8s le d=E9ploiement d'une application vb6, j'obtiens une=20
erreur d'ex=E9cution type 5 ...?
Cette erreur n'apparait pas pendant la p=E9riode de test=20
(Ex=E9cution dans Vb6)
Quelqu'un peut-il me dire comment se d=E9barrasser de ces=20
erreurs et ce qui cloche dans ce code (puisque c'est=20
normalement en ex=E9cutant cette partie de code que l'erreur=20
apparait)
Private Sub Nb_heure_r_LostFocus()
If IsEmpty(FCong=E9s.Nb_heure_r) Or IsNull
(FCong=E9s.Nb_heure_r) Then
FCong=E9s.B_valid.Enabled =3D False
Else
If FCong=E9s.Nb_heure_r < 1 Or FCong=E9s.Nb_heure_r >=20
8 Then
MsgBox ("On ne peut r=E9cup=E9rer qu'une journ=E9e =E0=20
la fois")
FCong=E9s.Nb_heure_r.SetFocus
Else
If FCong=E9s.Nb_heure_r <=3D 4 Then
FCong=E9s.Op_recup_matin.Enabled =3D True
FCong=E9s.Op_recup_apm.Enabled =3D True
FCong=E9s.Op_recup_matin =3D True
Else
FCong=E9s.Op_recup_matin.Enabled =3D False
FCong=E9s.Op_recup_apm.Enabled =3D False
End If
End If
FCong=E9s.B_valid.Enabled =3D True
End If
End Sub
(Nb_heure_r est un textbox)
1. Message "Erreur d'ex=E9cution 5"
2. Message "On ne peut r=E9cup=E9rer qu'une journ=E9e =E0 la fois"
3. Sortie du programme
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Robert
Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine----- Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+ "Robert" a écrit dans le
message de
news:09fa01c35034$0f923f30$ Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une erreur d'exécution type 5 ...? Cette erreur n'apparait pas pendant la période de test (Exécution dans Vb6) Quelqu'un peut-il me dire comment se débarrasser de ces erreurs et ce qui cloche dans ce code (puisque c'est normalement en exécutant cette partie de code que l'erreur apparait)
Private Sub Nb_heure_r_LostFocus() If IsEmpty(FCongés.Nb_heure_r) Or IsNull (FCongés.Nb_heure_r) Then FCongés.B_valid.Enabled = False Else If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r > 8 Then MsgBox ("On ne peut récupérer qu'une journée à la fois") FCongés.Nb_heure_r.SetFocus Else If FCongés.Nb_heure_r <= 4 Then FCongés.Op_recup_matin.Enabled = True FCongés.Op_recup_apm.Enabled = True FCongés.Op_recup_matin = True Else FCongés.Op_recup_matin.Enabled = False FCongés.Op_recup_apm.Enabled = False End If End If FCongés.B_valid.Enabled = True End If End Sub
(Nb_heure_r est un textbox) 1. Message "Erreur d'exécution 5" 2. Message "On ne peut récupérer qu'une journée à la fois" 3. Sortie du programme
D'avance un grand merci
Robert
.
Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine-----
Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+
"Robert" <robert.delante@publilink.be> a écrit dans le
message de
news:09fa01c35034$0f923f30$a301280a@phx.gbl...
Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une
erreur d'exécution type 5 ...?
Cette erreur n'apparait pas pendant la période de test
(Exécution dans Vb6)
Quelqu'un peut-il me dire comment se débarrasser de ces
erreurs et ce qui cloche dans ce code (puisque c'est
normalement en exécutant cette partie de code que l'erreur
apparait)
Private Sub Nb_heure_r_LostFocus()
If IsEmpty(FCongés.Nb_heure_r) Or IsNull
(FCongés.Nb_heure_r) Then
FCongés.B_valid.Enabled = False
Else
If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r >
8 Then
MsgBox ("On ne peut récupérer qu'une journée à
la fois")
FCongés.Nb_heure_r.SetFocus
Else
If FCongés.Nb_heure_r <= 4 Then
FCongés.Op_recup_matin.Enabled = True
FCongés.Op_recup_apm.Enabled = True
FCongés.Op_recup_matin = True
Else
FCongés.Op_recup_matin.Enabled = False
FCongés.Op_recup_apm.Enabled = False
End If
End If
FCongés.B_valid.Enabled = True
End If
End Sub
(Nb_heure_r est un textbox)
1. Message "Erreur d'exécution 5"
2. Message "On ne peut récupérer qu'une journée à la fois"
3. Sortie du programme
Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine----- Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+ "Robert" a écrit dans le
message de
news:09fa01c35034$0f923f30$ Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une erreur d'exécution type 5 ...? Cette erreur n'apparait pas pendant la période de test (Exécution dans Vb6) Quelqu'un peut-il me dire comment se débarrasser de ces erreurs et ce qui cloche dans ce code (puisque c'est normalement en exécutant cette partie de code que l'erreur apparait)
Private Sub Nb_heure_r_LostFocus() If IsEmpty(FCongés.Nb_heure_r) Or IsNull (FCongés.Nb_heure_r) Then FCongés.B_valid.Enabled = False Else If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r > 8 Then MsgBox ("On ne peut récupérer qu'une journée à la fois") FCongés.Nb_heure_r.SetFocus Else If FCongés.Nb_heure_r <= 4 Then FCongés.Op_recup_matin.Enabled = True FCongés.Op_recup_apm.Enabled = True FCongés.Op_recup_matin = True Else FCongés.Op_recup_matin.Enabled = False FCongés.Op_recup_apm.Enabled = False End If End If FCongés.B_valid.Enabled = True End If End Sub
(Nb_heure_r est un textbox) 1. Message "Erreur d'exécution 5" 2. Message "On ne peut récupérer qu'une journée à la fois" 3. Sortie du programme
D'avance un grand merci
Robert
.
Ledev
Exécute en pas à pas détaillez, et tu verra la ligne de ton objet qui plante. Dis nous en plus sur cette ligne... a+
"Robert" a écrit dans le message de news:0a6301c35046$9aa89c60$ Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine----- Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+ "Robert" a écrit dans le
message de
news:09fa01c35034$0f923f30$ Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une erreur d'exécution type 5 ...? Cette erreur n'apparait pas pendant la période de test (Exécution dans Vb6) Quelqu'un peut-il me dire comment se débarrasser de ces erreurs et ce qui cloche dans ce code (puisque c'est normalement en exécutant cette partie de code que l'erreur apparait)
Private Sub Nb_heure_r_LostFocus() If IsEmpty(FCongés.Nb_heure_r) Or IsNull (FCongés.Nb_heure_r) Then FCongés.B_valid.Enabled = False Else If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r > 8 Then MsgBox ("On ne peut récupérer qu'une journée à la fois") FCongés.Nb_heure_r.SetFocus Else If FCongés.Nb_heure_r <= 4 Then FCongés.Op_recup_matin.Enabled = True FCongés.Op_recup_apm.Enabled = True FCongés.Op_recup_matin = True Else FCongés.Op_recup_matin.Enabled = False FCongés.Op_recup_apm.Enabled = False End If End If FCongés.B_valid.Enabled = True End If End Sub
(Nb_heure_r est un textbox) 1. Message "Erreur d'exécution 5" 2. Message "On ne peut récupérer qu'une journée à la fois" 3. Sortie du programme
D'avance un grand merci
Robert
.
Exécute en pas à pas détaillez, et tu verra la ligne de ton objet qui
plante. Dis nous en plus sur cette ligne...
a+
"Robert" <robert.delante@publilink.be> a écrit dans le message de
news:0a6301c35046$9aa89c60$a401280a@phx.gbl...
Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine-----
Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+
"Robert" <robert.delante@publilink.be> a écrit dans le
message de
news:09fa01c35034$0f923f30$a301280a@phx.gbl...
Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une
erreur d'exécution type 5 ...?
Cette erreur n'apparait pas pendant la période de test
(Exécution dans Vb6)
Quelqu'un peut-il me dire comment se débarrasser de ces
erreurs et ce qui cloche dans ce code (puisque c'est
normalement en exécutant cette partie de code que l'erreur
apparait)
Private Sub Nb_heure_r_LostFocus()
If IsEmpty(FCongés.Nb_heure_r) Or IsNull
(FCongés.Nb_heure_r) Then
FCongés.B_valid.Enabled = False
Else
If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r >
8 Then
MsgBox ("On ne peut récupérer qu'une journée à
la fois")
FCongés.Nb_heure_r.SetFocus
Else
If FCongés.Nb_heure_r <= 4 Then
FCongés.Op_recup_matin.Enabled = True
FCongés.Op_recup_apm.Enabled = True
FCongés.Op_recup_matin = True
Else
FCongés.Op_recup_matin.Enabled = False
FCongés.Op_recup_apm.Enabled = False
End If
End If
FCongés.B_valid.Enabled = True
End If
End Sub
(Nb_heure_r est un textbox)
1. Message "Erreur d'exécution 5"
2. Message "On ne peut récupérer qu'une journée à la fois"
3. Sortie du programme
Exécute en pas à pas détaillez, et tu verra la ligne de ton objet qui plante. Dis nous en plus sur cette ligne... a+
"Robert" a écrit dans le message de news:0a6301c35046$9aa89c60$ Ok Mais quel style de problème ???? que chercher ???
Merci.
-----Message d'origine----- Ton code n'a pas d'erreur, le problème doit venir de ton
objet FCongés...
a+ "Robert" a écrit dans le
message de
news:09fa01c35034$0f923f30$ Bonjour à tous et à toutes,
après le déploiement d'une application vb6, j'obtiens une erreur d'exécution type 5 ...? Cette erreur n'apparait pas pendant la période de test (Exécution dans Vb6) Quelqu'un peut-il me dire comment se débarrasser de ces erreurs et ce qui cloche dans ce code (puisque c'est normalement en exécutant cette partie de code que l'erreur apparait)
Private Sub Nb_heure_r_LostFocus() If IsEmpty(FCongés.Nb_heure_r) Or IsNull (FCongés.Nb_heure_r) Then FCongés.B_valid.Enabled = False Else If FCongés.Nb_heure_r < 1 Or FCongés.Nb_heure_r > 8 Then MsgBox ("On ne peut récupérer qu'une journée à la fois") FCongés.Nb_heure_r.SetFocus Else If FCongés.Nb_heure_r <= 4 Then FCongés.Op_recup_matin.Enabled = True FCongés.Op_recup_apm.Enabled = True FCongés.Op_recup_matin = True Else FCongés.Op_recup_matin.Enabled = False FCongés.Op_recup_apm.Enabled = False End If End If FCongés.B_valid.Enabled = True End If End Sub
(Nb_heure_r est un textbox) 1. Message "Erreur d'exécution 5" 2. Message "On ne peut récupérer qu'une journée à la fois" 3. Sortie du programme
