Version imprimable
Je ne suis pas sur de te comprendre Cédric. Moi qui début le VBS, j'avoue , c'est pas si facile.Citation:
Envoyé par cedric600
Donc, tu voudrai dire que je dois copier les résultats de ma recherche dans un fichier (Quel type de fichier, txt?) puis à partir de ce fichier, les copier dans le repertoire.
Merci de pouvoir m'eclaircir!
que ve tu copier la liste des fichier .. ? ou le fichier lui même ..?Citation:
Envoyé par bov13
Ben ma recherche me trouve x fichiers, donc c'est tous les fichiers qu'elles trouvent que je veux copier.Citation:
Envoyé par bbil
Merci!
tu n'as pas besoin de ta variable chaine resultat... remplace la ligne resultat= .. par le code suivant dans ta boucle for:
et remplace dans cette ligne f:\ par le répertoire de destination...Code:
2
Sa fonctionne, juste un petit truc, dans la synthaxe, donc, c'est d'abord, le chemin de destination des fichiers et ensuite le chemin d'origine?Citation:
Envoyé par bbil
Car moi, il les copies mais pas au bon endroit, pourtant mon nom de chemin est correct.
En fait lorsque tu utilises la méthode copy, tu ne precises que le chemin de destination complet (donc aussi avec le nom du fichier et son extension).
Tu possèdes un objet File qui contient dejà le nom du chemin d'origine.
Suis juste la synthaxe donné par bbil.
Quand à ce que j'ai dit :
Je me mélangeais les pinceaux avec d'autres problèmes d'autres personnes, j'avais oublié que tes résultats étaient des fichiers et nom des lignes de textes.Citation:
cedric600 : Pour copier tes resultats sur le disque dur, tu doit les ecrires dans un fichiers dans un répertoire precis.
Aide toi de ce site pour faire ton script :
http://www.activexperts.com/activmon.../filesfolders/
Et de ce site pour comprendre les objets WMI que tu utilise (ex :CIM_DataFile qui fait partie des classes CIM dans les classes WMI) :
http://msdn.microsoft.com/library/de...stdregprov.asp
Mais, si tu ne l'as pas fait, va jeter un coup d'oeil au lien que je t'ai passé, ils t'aideront pour la programmation en VBS.
Merci!
J'ai réussi à faire une copie des fichiers que je trouve dans la recherche mais uniquement en local. Lorsque, je désire faire une copie vers un serveur distant, j'ai le message "Permission denied qui s'affiche".
J'insiste sur le fait qu'au niveau des droits sur les repertoires et tout, tout est correct. Voici mon code :
Peut-avant ce code, je réalise des copies de répertoires sur le meme serveur. Ya t-il des differences au niveau des droits quand on copie des repertoires ou des fichiers en vbscripts?Code:
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Merci de m'eclaircir!
Essaye cela :
J'ai considéré que "G00577" est un nom de répertoire. Et d'après ton code je crois comprendre que Nommachine est le nom de la machine distante et que tu l'utilises pour copier tes fichiers dans un répertoire ayant ce nom.Code:
2
3
Tu peut aussi copier un répertoire local vers une machine distante grâce à ce code :
as tu les droits sur le serveur distant ?Code:
2
3
4
5
6
7
8
9strComputer = "Nom_du_PC_distant_ou_local_ou_adresse_IP" Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colFolders = objWMIService.ExecQuery( _ "Select * from Win32_Directory where Name = 'c:\\Scripts'") For Each objFolder in colFolders errResults = objFolder.Copy("D:\Archive") Wscript.Echo errResults Next
Merci pour ta réponse!Citation:
Envoyé par cedric600
Non, G00577 est le nom de la machine distante vers laquelle je souhaite envoyer les fichiers.
Je crée un repertoire sur le G00577 pour y stocker les fichiers. Le nom du repertoire est la variable : Nommachine
Donc, peux-tu me redonner le code avec les modifs que j'ai indiquées.
Merci bcp!
Cela donne cela :
Mais c'est ce que tu as essayé, tu l'as fait avec copyfile, la je te montre comment tu peut le faire avec copy pour chacun de tes fichiers résultant de ta recherche, donc ton code donne ça :Code:
2
3
4
Code:
2
3
4
5
6
7
8
9
10
11
12
13
J'ai fait une erreur, en fait avec ce code tu copies d'un pc local, un répertoire d'une machine distante vers un autre repertoire de cette même machine distante.Citation:
Tu peut aussi copier un répertoire local vers une machine distante grâce à ce code :
Code:
2
3
4
5
6
Ce que je t'ai donné au début de ce message devrait marcher et lorsque tu vois une erreur comme "Permission denied", c'est que tu as un problème de droit. La certainement qui tu ne peut pas copier sur le serveur où tu veux copier le répertoire.
J'ai testé avec ObjFSO.Copy. Voila, le message d'erreur que j'ai :
Cet objet ne gère pas cette propriété ou cette méthode : 'objFSO.Copy'
Par contre, il y a quelque chose qui me surprend :
Avec ce code :
Je n'est aucun message d'erreur mais la copie ne fonctionne pas sauf en local! Bizarre!Code:
2
Et avec ce code :
J'ai un message d'erreur : "Permission denied" alors que pourtant tous les droits sont bons!Code:
2objFSO.CopyFile objFile.Name, "\\G00577\sav$\" & Nommachine
J'ai fais de la copie de repertoire ds ce script aussi, ca fonctionne bien mais la copie de fichier ne veut pas, pas facile à comprendre, tu as une idée?
Sinon faut-il pas mieu que je cherche les fichiers et que je les copies 1 par 1 des qu'il en trouve un et pas attendre la fin pour tout copier. Quel est ton avis?
Je met à jour mon post, la copie des fichiers recherché fonctionne vers un repertoire en local sur ma machine mais c'est à partir du moment que j'envoie la copie vers un pc distant que sa ne fonctionne pas!
C'est faux !!!!Citation:
objFile.Copy "\\G00577\sav$\ & Nommachine" & objFile.Filename & "." & objFile.extension
ouCode:
2
C'est bon !!! tu prends celui que tu veux, dans le premier cas, le nom de fichier est compose de nommachine et objet.filename, dans le deuxieme cas, un repertoire ayant pour nom le contenu de nommachine et creer et contient tous tes fichiers.Code:
2
Le mieux c'est de copier les fichier des que tu les trouves. C'est ce que j'ai ecrit dans mon precedent message !!!!
Merci Cedric pour toute tes réponses.
Ma recherche et la copie fonctionne. J'avais fait une erreur bête dans un chemin d'accès.
Sinon, j'aimerai que mon script, pendant la recherche et la copie m'affiche une boite de dialogue avec marquer "Veuillez patientez"
Est-ce possible?
Voici le code :
Merci!!Code:
2
3
4
5
6
7
8
9
10
11
12
13
14