Hallo ich habe folgende VBS Datei:
Das funktioniert soweit, aber was ich will ist eigentlich auch in der letzten Zeile objShell.SpecialFolders("Desktop") zu nutzen, da das öfters genutzt werden soll und ja der Desktoppfad (User-Ordner) nicht identisch ist.
funktioniert nicht, erhalte nach 120 Sek Fehlermeldung, das die Datei nicht gefunden werden konnte.
Code:
Option Explicit
Dim objShell
Set objShell=WScript.CreateObject("WScript.Shell")
objShell.Run "iexplore -k "+objShell.SpecialFolders("Desktop")+"\xyz\starttext.html"
wscript.sleep 120000
objShell.Run """C:\Dokumente und Einstellungen\User\Desktop\xyz\Datei.exe"""
Das funktioniert soweit, aber was ich will ist eigentlich auch in der letzten Zeile objShell.SpecialFolders("Desktop") zu nutzen, da das öfters genutzt werden soll und ja der Desktoppfad (User-Ordner) nicht identisch ist.
Code:
Option Explicit
Dim objShell
Set objShell=WScript.CreateObject("WScript.Shell")
objShell.Run "iexplore -k "+objShell.SpecialFolders("Desktop")+"\xyz\starttext.html"
wscript.sleep 120000
objShell.Run objShell.SpecialFolders("Desktop")+"\xyz\Datei.exe"
funktioniert nicht, erhalte nach 120 Sek Fehlermeldung, das die Datei nicht gefunden werden konnte.