cs_kenny29
Messages postés7Date d'inscriptionmardi 18 mai 2004StatutMembreDernière intervention28 mai 2004
-
26 mai 2004 à 14:04
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 2006
-
26 mai 2004 à 14:40
Je dois faire un programme qui scan un dossier sur un réseau puis en meme qui crée un fichier .txt dans lequel il met le nom de tous les fichiers rencontrés dans ce dossier.
On ma demandé de rajouter un test afin de savoir si lors de la création du fichier .txt, le fichier se crée bien. Pour le moment le programme marche et le fichier se crée bien.
J'aimerai donc savoir le code a utiliser pour faire ce test.
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 200628 26 mai 2004 à 14:32
Inutile de tester la présence du fichier !! si c'est toi qui le crée, je suppose que c'est avec une instruction Open "MonFic.txt" ...
Donc mets une gestion d'erreur autour !!!
Sub Exemple()
On Error Goto CantCreateFile
Open "toto.txt" For output as #1
On Error Goto 0
' Ton code pour remplir le ficheir
...
Close
Exit Sub
CantCreateFile:
Msgbox "Je n'ai pas réussi à créer le fichier"
End Sub