chemin en vb Résolu/Fermé

Question

Bonjour, 
j'utilise microsoft visual basic et je voudrais faire un chemin vers AppData.

j'arrive à l'afficher grâce à cette commande:
MsgBox(Environ("appdata"))


le but serait de l'insérer dans cette commande:

Const ForWriting = 2
            Dim fso, f

            fso = CreateObject("Scripting.FileSystemObject")
            f = fso.OpenTextFile("%appdata%\bonjour.txt", ForWriting, True)
            f.write("Salut")


Configuration: Windows 7 / Safari 535.7

Utilisateur anonyme · Answer

Bonjour, 

Ta syntaxe semble issue du VBS (Visual Basic Scripting) 

à partir de ceci tu pourras atteindre le répertoire souhaité : 


Dim oWSH, oWshEnv 
Dim VarEnv1, VarEnv2, VarEnv3 
     
Set oWSH = CreateObject("WScript.Shell") 
Set oWshEnv = oWSH.Environment("PROCESS") 
     
VariableEnvironnement = "" 
     
        
VarEnv1 = oWSH.ExpandEnvironmentStrings("'%windir%'") 
         
VarEnv2 = oWSH.ExpandEnvironmentStrings("'%programfiles%'") 
         
VarEnv3 = oWSH.ExpandEnvironmentStrings("'%username%'") 
     

WScript.Echo ("Le répertoire Windows est : "  & VarEnv1 & vbCrLf & _ 
              "Le répertoire Windows est : "  & VarEnv2 & vbCrLf & _ 
              "L'identifiant de la session est : " & VarEnv3) 


Lupin

le-geek · Answer

tu veux creer un fichier boujour.text dans appdata ?! mdr

Chemin en vb

2 réponses

Discussions similaires