Erreur "redefinition de nom"

Version imprimable

Bonjour à tous,

J'ai une erreur de "redefinition de nom" sur ce script à la ligne11. Je ne comprends pas.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim objFileSystemObject, fsO, FL, FD, strFolderPath, strFolderPath1, strFolderPath2, oFSO, oFld, oFolder
Dim oSh, oExec, sK, ScriptPath, TimeDebut
Dim cheminIni
 
Path = Left(WScript.ScriptFullName, InStr(WScript.ScriptFullName, WScript.ScriptName)-1)
cheminIni=Path & "Chemins_rep.ini"
 
Set oFs=CreateObject("Scripting.FileSystemObject")
If oFs.FileExists(cheminIni) Then
    Set oFile=oFs.OpenTextFile(cheminIni)
    Execute oFile.ReadAll()
Else
    Msgbox "Le fichier (.ini) n'a pas " & Chr(233) & "t" & Chr(233) & " trouv" & Chr(233) & " !!!"
    WScript.Quit
End If
 
Set oFile=Nothing

Je ne l'ai pas déclaré deux fois, donc je ne saisi pas bien le pourquoi du comment..

Merci pour votre aide.

11/08/2014, 10h43
Cachlab

Salut !

Je ne connais pas cette syntaxe (JScript ?) :

Code:

Execute oFile.ReadAll()

Je ne sais pas ce que tu souhaites faire mais tu devrais essayer :

Code:

strText = objFile.ReadAll

++
11/08/2014, 10h49
nikkss

Cette syntaxe a toujours fonctionné jusqu'à ce matin. Je n'ai pourtant rien changé au script depuis vendredi soir. C'est à ni rien comprendre.
Avec cette syntaxe, je lis des variables dans un fichier .ini, et je les ré-utilise dans mon script plus tard. C'est en fait des chemins de répertoires.

Je vais essayer ce que tu me conseilles, je reviens ensuite. ;)
11/08/2014, 10h54
nikkss

Punaise, je viens de trouver. Ma syntaxe dans le fichier .ini n'était pas bonne. Je déclarais deux fois une variable..
:roll: désolé pour la question..