[vbs] Test d'existance de fichier
Test d'existance de fichier [vbs] - VB/VBA/VBS - Programmation
Marsh Posté le 05-10-2005 à 22:06:41
Code :
|
Marsh Posté le 08-10-2005 à 14:20:29
Certes, mais je suis sur qu'il va maintenant poser la question " S'il existe et que je veux le deleter ! "....
Alors voilà
Set Fso= WScript.CreateObject("Scripting.FileSystemObject" )
If Fso.FileExists("C:\Le_beau_fichier.txt" ) Then
' Soit tu l'ouvres ( 8 pour ajout en fin de fichier )
Set ObjFile = Fso.Opentextfile("C:\Le_beau_fichier.txt",8)
' Soit tu le delete
Set ObjFile = Fso.GetFile("C:\Le_beau_fichier.txt" )
ObjFile.Delete
Else
' S'il n'existe pas tu le créés
Set ObjFile = Fso.createtextFile("C:\Le_beau_fichier.txt" )
End If
Voilà ca t'évituras de poser la question !
Fred
Marsh Posté le 09-10-2005 à 00:07:46
ben non en fait, si il existe il faut que j envoye un mail, car c'est un fichier généré pour enregistrer les erreurs d'un traitement
Mais pour envoyer un mail, je sais comment faire
merci
Marsh Posté le 15-12-2005 à 19:11:30
Ah c'est génial !
C'est pil poil ce qui me fallait !! 
Merci les filles !
---------------
Pas oublier les glacons pour l'apero !!
Marsh Posté le 21-12-2005 à 11:32:13
bonjour,
j'aimerai savoir comment copier un fichier présent sur un serveur vers un PC local avec les droits d'administrateurs, vue que le user n'a pas les droits pour copier un fichier sur son poste
Marsh Posté le 22-12-2005 à 16:07:46
en faite la maintenant mon probleme est d'installer un logiciel avec un script contenant les droits d'administrateur :
quelqu'un a une idée ??
j'essaye sa mais sa fonctionne pas :
Const wbemImpersonationLevelDelegate = 4
Set objwbemLocator = CreateObject("WbemScripting.SWbemLocator" )
Set objConnection = objwbemLocator.ConnectServer _
("serverX", "root\cimv2", "domaine\administrateur", _
"password", , "kerberos:serverX" )
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate
Set objSoftware = objConnection.Get("Win32_Product" )
errReturn = objSoftware.Install("\\serverX\logiciel\ABCDE.exe", , True)
Marsh Posté le 10-03-2006 à 16:40:07
Reply
Marsh Posté le 29-06-2006 à 15:04:51
| yannick7fr a écrit : C'est exactement le code dont j'ai besoin |
de même pour oim 
Marsh Posté le 29-06-2006 à 15:10:04
| tonton_luxio a écrit : de même pour oim |
tu n'as pas honte de déterrer des topics comme ca ?
remercie en PM, ca fait tout aussi plaisir
Marsh Posté le 27-07-2008 à 23:21:51
| jpcheck a écrit : |
ok je ne le ferai plus 
---------------
Rien
Marsh Posté le 11-01-2011 à 11:37:44
... et même en 2011. Le référencement google n'y est pas pour rien :-)
![[:xp1700]](https://forum-images.hardware.fr/images/perso/xp1700.gif "[:xp1700]")
![[:mich_mich]](https://forum-images.hardware.fr/images/perso/mich_mich.gif "[:mich_mich]")
![[:al_bundy]](https://forum-images.hardware.fr/images/perso/al_bundy.gif "[:al_bundy]")
Sujets relatifs:
- [QST] sql.free.fr + grant ? test de phpgroupware..
- copier le contenu d'un fichier texte dans un fichier html
- [C#] Impression d'un fichier pdf
- manupiler un fichier binaire
- Fichier .bat et script d'exécution d'une page web
- VBA : ouverture d'un fichier txt dont le nom change-POST RESOLU
- passer un fichier excel en fichier ascii
- fichier ayant un temps de validité comme une session..
- [Shell] lecture d'un fichier txt ligne par ligne
- Test d'existance d'un fichier
Marsh Posté le 05-10-2005 à 16:58:25
Salut à tous et d'avance merci à ceux qui essayeront de m'aider.
Je fais un petit script en VBS dans lequel j'ai besoin de tester si un fichier existe.
Et en cherchant sur google, je n'ai rien trouvé de simple et rapide pour le faire.
Ce que j'ai de plus simple pour le moment, c'est essayer de lire le fichier et si j'arrive à l'ouvrir, c'est qu'il existe.
C'est juste ca.
merci