bonjour,
j'ai un problème avec mon script : ******* Sel_ZG_Resultat.txt the file is not copied to the folder "c: \ Photo_" & Year (Now ())
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim shell Set shell = CreateObject("WScript.Shell") dim Rapport, folder, filesys Rapport = "C:\Photo_" & Year(Now()) set filesys= createObject("Scripting.FileSystemObject") if not filesys.FolderExists(PhotoRapport) then Set folder = filesys.CreateFolder(PhotoRapport) end if shell.run "sqlcmd -U MonJa -d Ja_Test -m-1 -P azerty -S Ja-devSQL -p1 -i C:\ja\rap\Sel_ZGF.sql -o folder\Sel_ZG_Resultat.txt",2, true
Partager