Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur,
le descristif,
sur quelle fenêtre,
la date et heure.
que se soit une erreur VBA ou d'access ( requette,formulaire, état ,macro,ou
fonction)
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
LE TROLL
Salut,
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure() '... On Error GoTo adresse '... End Sub adresse: If erreur <> 0 Then Dim p1 As Long p1 = FreeFile Open "erreurs.log" For Append As p1 Print #p1, Date & " : " & Time & " = " & Err & " : " & Err.Source & " : " & Err.Description Close p1 End If End Sub '----------non testé
"BL" a écrit dans le message de news: 42a5aa9b$0$3117$
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur, le descristif, sur quelle fenêtre, la date et heure. que se soit une erreur VBA ou d'access ( requette,formulaire, état ,macro,ou fonction)
Pour l'exploitation j'utiliserais le bloc note.
Merci de bien vouloire m'aider
Salut,
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure()
'...
On Error GoTo adresse
'...
End Sub
adresse:
If erreur <> 0 Then
Dim p1 As Long
p1 = FreeFile
Open "erreurs.log" For Append As p1
Print #p1, Date & " : " & Time & " = " & Err & " : " &
Err.Source & " : " & Err.Description
Close p1
End If
End Sub
'----------non testé
"BL" <BL@wanadoo.fr> a écrit dans le message de news:
42a5aa9b$0$3117$8fcfb975@news.wanadoo.fr...
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un
fichier texte.
Je veux enregistrer le code erreur,
le descristif,
sur quelle fenêtre,
la date et heure.
que se soit une erreur VBA ou d'access (
requette,formulaire, état ,macro,ou
fonction)
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure() '... On Error GoTo adresse '... End Sub adresse: If erreur <> 0 Then Dim p1 As Long p1 = FreeFile Open "erreurs.log" For Append As p1 Print #p1, Date & " : " & Time & " = " & Err & " : " & Err.Source & " : " & Err.Description Close p1 End If End Sub '----------non testé
"BL" a écrit dans le message de news: 42a5aa9b$0$3117$
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur, le descristif, sur quelle fenêtre, la date et heure. que se soit une erreur VBA ou d'access ( requette,formulaire, état ,macro,ou fonction)
Pour l'exploitation j'utiliserais le bloc note.
Merci de bien vouloire m'aider
AA
Merci de ton aide.
"LE TROLL" <le a écrit dans le message de news: u$
Salut,
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure() '... On Error GoTo adresse '... End Sub adresse: If erreur <> 0 Then Dim p1 As Long p1 = FreeFile Open "erreurs.log" For Append As p1 Print #p1, Date & " : " & Time & " = " & Err & " : " & Err.Source & " : " & Err.Description Close p1 End If End Sub '----------non testé
"BL" a écrit dans le message de news: 42a5aa9b$0$3117$
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur, le descristif, sur quelle fenêtre, la date et heure. que se soit une erreur VBA ou d'access ( requette,formulaire, état ,macro,ou fonction)
Pour l'exploitation j'utiliserais le bloc note.
Merci de bien vouloire m'aider
Merci de ton aide.
"LE TROLL" <le troll@paris.fr> a écrit dans le message de news:
u$oKkp7aFHA.3328@TK2MSFTNGP09.phx.gbl...
Salut,
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure()
'...
On Error GoTo adresse
'...
End Sub
adresse:
If erreur <> 0 Then
Dim p1 As Long
p1 = FreeFile
Open "erreurs.log" For Append As p1
Print #p1, Date & " : " & Time & " = " & Err & " : " & Err.Source & "
: " & Err.Description
Close p1
End If
End Sub
'----------non testé
"BL" <BL@wanadoo.fr> a écrit dans le message de news:
42a5aa9b$0$3117$8fcfb975@news.wanadoo.fr...
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur,
le descristif,
sur quelle fenêtre,
la date et heure.
que se soit une erreur VBA ou d'access ( requette,formulaire, état
,macro,ou
fonction)
"LE TROLL" <le a écrit dans le message de news: u$
Salut,
A chaque fois que tu peux avoir un erreur, tu fais:
Sub ma_procedure() '... On Error GoTo adresse '... End Sub adresse: If erreur <> 0 Then Dim p1 As Long p1 = FreeFile Open "erreurs.log" For Append As p1 Print #p1, Date & " : " & Time & " = " & Err & " : " & Err.Source & " : " & Err.Description Close p1 End If End Sub '----------non testé
"BL" a écrit dans le message de news: 42a5aa9b$0$3117$
Bonjour,
Je recherche le moyen d'enregistrer les erreurs sur un fichier texte.
Je veux enregistrer le code erreur, le descristif, sur quelle fenêtre, la date et heure. que se soit une erreur VBA ou d'access ( requette,formulaire, état ,macro,ou fonction)
