Help ! Erreur à l'exécutionRésolu

Question

Bonjour, 
je rencontre un problème lors du lancement d'un script vbs de suppression des fichiers temp sous windows 10.
L'erreur semble se situer dans : Set fich = fso.OpenTextFile("c:\rien.txt", 1, false) 
Le msg erreur est : fichier introuvable code 800A0035 erreur execution MS vbscript

Pouvez-vous m'aider sachant que le fichier c:\rien.txt n'existe pas mais cet ordre semble servir à initialiser fich
Ce script fonctionnait bien dans les versions antérieurs de windows.
Merci d'avance.

jordane45 · Answer

Bonjour,

Si le fichier n'existe pas.. je pense que le message d'erreur est assez conforme....
Essaye donc de le créer avant.
Par exemple :

Set objFSO=CreateObject("Scripting.FileSystemObject")

outFile="c:\rien.txt"

If objFSO.FileExists(outFile) Then
   Else
   Set objFile = objFSO.CreateTextFile(outFile)
    set objFile = nothing  
End If

Set objTextFile = objFSO.OpenTextFile(outFile, ForAppending, True)

Cordialement, 
Jordane

cs_Le Pivert · Answer

Bonjour,

Jordane, ce qui est amusant parmi toutes les icônes, c'est la seule qui n'est pas d'infobulle!

cs_Le Pivert · Answer

Quelle icone ?  



Et quel rapport avec cette discussion ?

N'oublie pas de mettre le sujet en RESOLU (en utilisant l'icone de roue crantée au niveau du titre de ta question )

En lisant ce post:

http://codes-sources.commentcamarche.net/forum/affich-10081413-cs-nouvelle-interface-bugs

Je pensais que cela pouvait t’intéresser,  mais vu que cela s'affiche chez toi, ce n'est pas grave.

Help ! Erreur à l'exécution

3 réponses

Votre réponse