OPÉRATION BASIQUE SUR FICHIER EN VBS

cs_Stormy Messages postés 255 Date d'inscription samedi 20 avril 2002 Statut Membre Dernière intervention 16 janvier 2007 - 18 oct. 2002 à 23:47
smernouf Messages postés 8 Date d'inscription jeudi 31 janvier 2008 Statut Membre Dernière intervention 2 avril 2008 - 11 mars 2008 à 11:50
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/1249-operation-basique-sur-fichier-en-vbs

smernouf Messages postés 8 Date d'inscription jeudi 31 janvier 2008 Statut Membre Dernière intervention 2 avril 2008
11 mars 2008 à 11:50
c'est bien ce code la
cs_Maxou1012 Messages postés 13 Date d'inscription samedi 24 février 2007 Statut Membre Dernière intervention 6 février 2008
6 mars 2008 à 12:26
Merci pour la leçon :) des petits détails oubliés, mais c'est bien :)
Je met 8/10
cs_dg69 Messages postés 6 Date d'inscription jeudi 24 novembre 2005 Statut Membre Dernière intervention 29 décembre 2005
7 juil. 2007 à 10:41
Bonjour,
C'est bien lorsque l'on travaille sur un fichier.

Et si l'on veut copier plusieurs fichiers ou un répertoire complet, y a t il une astuce ?

merci
cs_sergiooi Messages postés 53 Date d'inscription vendredi 6 octobre 2006 Statut Membre Dernière intervention 7 octobre 2009
6 avril 2007 à 21:03
Salut! je donne 10 pour ce tuto mais si tu m'explique uns chose. je fais:
Set FSys = CreateObject("Scripting.FileSystemObject")
Set MonFic = FSys.GetFile("App.Path" & "\fichier.txt")
MonFic.Copy "C:\copie.txt", True
Msg = "fichier.txt copié"
MsgBox (Msg)

Et j'ai le message: run-time error '53'
file not found
et le "fichier.txt est bien dans le meme répertiore que l'application.
POOOURQUOI???
voilà merci!!
tekila_bandita Messages postés 248 Date d'inscription mercredi 15 juin 2005 Statut Membre Dernière intervention 15 mars 2007 33
15 juin 2005 à 18:58
Sibelle07 il te suffit simplement de trouver le répertoire ou ce trouve le cmd et de le mettre dans le code...
répertoire:C:/WINDOWS/System32/cmd.exe
korbene Messages postés 21 Date d'inscription mercredi 3 décembre 2003 Statut Membre Dernière intervention 24 janvier 2005
19 janv. 2005 à 16:17
Je ne comprend pas mon Set FSys = CreateObject("Scripting.FileSystemObject")

ne passe pas j'obtient le message suisvant "un composant activeX ne peut pas créer un objet:'Scripting.FileSystemObject'

pourtant mes decalration sont les meme et en vb sa passe mais pas moyen en vbs
d'ou sa vient????
thepoe Messages postés 30 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 1 juin 2011
10 août 2004 à 14:05
Bravo à toi pour cette précision!
Aller à l'essenciel, c'est important. Tu mérites les honneurs.
Cré@tion (c)
Tifortou Messages postés 1 Date d'inscription vendredi 25 janvier 2002 Statut Membre Dernière intervention 20 avril 2004
20 avril 2004 à 10:49
Merci beaucoup pour ces renseignements
caNar vaDor Messages postés 1 Date d'inscription dimanche 25 janvier 2004 Statut Membre Dernière intervention 17 mars 2004
17 mars 2004 à 18:13
et si jveu copier un dossier tout entier ??
cs_kaalii Messages postés 6 Date d'inscription mercredi 15 octobre 2003 Statut Membre Dernière intervention 5 décembre 2003
28 oct. 2003 à 12:00
pour ouvrir un fichier, perso, je fait comme ca.
c est surement pas la meilleure methode, mais ca marche plutot bien




Set WSHShell = WScript.CreateObject("WScript.Shell")
set shell = wscript.CreateObject("Shell.Application")
shell.open "cmd.exe"
Sibelle07 Messages postés 206 Date d'inscription dimanche 14 septembre 2003 Statut Membre Dernière intervention 25 mars 2005
8 oct. 2003 à 21:18
Salut ,
Si quelq'un a le truc expret pour ouvrir un fichier par exemple cmd.exe
Merci de me le passer
cs_Alain Messages postés 58 Date d'inscription lundi 31 décembre 2001 Statut Membre Dernière intervention 25 août 2003
19 oct. 2002 à 19:12
simple efficace, j'aime ! 8
cs_Stormy Messages postés 255 Date d'inscription samedi 20 avril 2002 Statut Membre Dernière intervention 16 janvier 2007
18 oct. 2002 à 23:47
Merci pour ces quelques leçons de VBS très pertinentes. @+
Je donne 7 pour l'effort
Rejoignez-nous