Script VB qui teste la présence d'1 fichier
igo
-
UVB -
UVB -
Bonjour,
Je fais de l'alimentation des données avec l'outil DTS de SQL Server et je voudrais écrire en Visual Basic un script qui permet de:
- tester la présence ou non d'un fichier dans un répertoire,
- ensuite en fonction du résultat j'oriente vers l'intégration du fichier ou vers l'envoi d'un mail.
Comment dois-je écrire le script?
Je vous remercie d'avance.
Je fais de l'alimentation des données avec l'outil DTS de SQL Server et je voudrais écrire en Visual Basic un script qui permet de:
- tester la présence ou non d'un fichier dans un répertoire,
- ensuite en fonction du résultat j'oriente vers l'intégration du fichier ou vers l'envoi d'un mail.
Comment dois-je écrire le script?
Je vous remercie d'avance.
A voir également:
- Script VB qui teste la présence d'1 fichier
- Fichier bin - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier epub - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
1 réponse
' Si tu connais le nom de ton fichier :
Set filesys = CreateObject("Scripting.FileSystemObject")
le_chemin_du_fichier = "c:\fichier_que_tu_teste.jpg"
if filesys.FileExists (le_chemin_du_fichier) then
' Il existe donc.....
else
' Il n'existe pas, alors...
end if
' Si tu ne connais pas, la suite au prochain numéro...
Merci pour ta réponse, en fait je suis à la 2è étape c-a-d envoyer un mail à l'admin en cas d'échec. J'attends impatiemment le prochain numéro car je débute sur DTS et c'est pas easy pour moi. Merci d'avance.
Cordialement.
if dir(le_chemin_du_fichier)<>"" then
est beaucoup plus rapide