suffix
Goto Top

appdata in VBscript

Hallo,

leider habe ich von VBScripts überhaupt keine Ahnung muss aber innerhalb eines VBScripts den Pfad zu "%appdata%\xxxx\xxxx.ini" definieren. Mit strWorkDir = "%appdata%\........" habe ich das versucht hat aber leider nicht funktioniert, da %appdata% nicht aufgelöst wird. Die Auflösung brauche ich allerdings, damit ich in der INI für einige Benutzer nach Text suchen muss um diesen auszutauschen.
Möglicherweise könnt ihr mir da weiterhelfen.
Im Voraus möchte ich mich bei euch schon mal für die Antworten bedanken.

Gruß

Michael

Content-Key: 56830

Url: https://administrator.de/contentid/56830

Printed on: May 8, 2024 at 18:05 o'clock

Member: bastla
bastla Apr 17, 2007 at 09:24:29 (UTC)
Goto Top
Hallo suffix und willkommen im Forum!

Versuch es über die "SpecialFolders":
Set WshShell = WScript.CreateObject("WScript.Shell")  
MsgBox WshShell.SpecialFolders("AppData")  

HTH
bastla
Member: suffix
suffix Apr 17, 2007 at 09:38:33 (UTC)
Goto Top
Hallo bastla,

zunächst vielen Dank für Deine Antwort.

Set WshShell = WScript.CreateObject("WScript.Shell")
MsgBox WshShell.SpecialFolders("AppData")

über die MsgBox wird AppData auf dem Bildschirm ausgegeben, nur das wäre für meine Anforderungen nicht nötig. Da soll eigentlich nur %appdata% innerhalb des Pfades "%appdata%\xxxx\xxxx.ini" aufgelöst werden, wenn ich MsgBox weglasse dann funktioniert das nicht. Kann ich da einen anderen Befehl einsetzen? Danke.

Gruß

suffix
Member: bastla
bastla Apr 17, 2007 at 10:06:04 (UTC)
Goto Top
Hallo suffix!

Die MsgBox war natürlich nur zu Demonstrationszwecken gedacht ...
Set WshShell = WScript.CreateObject("WScript.Shell")  
strWorkDir = WshShell.SpecialFolders("AppData") & "\xxxx\xxxx.ini"  

Grüße
bastla
Member: suffix
suffix Apr 17, 2007 at 10:31:34 (UTC)
Goto Top
Hallo bastla,

vielen, vielen Dank für Deine Hilfe, hat super funktioniert.

Gruß

suffix