WScript.Shell ????
14.07.2003 13:44:43
Robert Nägele
Ich habe ein Problem mit folgendem Script:
Option Explicit
Dim WshShell, Verknuepfung ,Fso, FolPfadQuelle, FolPfadZiel, Antwort
Set Fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("WScript.Shell")
Target1 = "C:\Windows\Desktop\Igortest.lnk" :SourceFile1 = "C:\UserIgor\Ced\Scripts\Control.txt" :Icon1 = "C:\Windows\System\Pifmgr.dll,17"
Sub Link
Set Verknuepfung = WshShell.CreateShortcut(Target1)
Verknuepfung.TargetPath = SourceFile1
Verknuepfung.IconLocation = Icon1
Verknuepfung.Save
WScript.Echo "Verknüpfung wurde angelegt!"
End Sub
Link
Wenn ich es laufen lasse bekomme ich immer die Fehlermeldung das
Active-X Komponenten kann kein Objekt erstellen : "Wscript.Shell"
Weiß jemand von euch wieso das so nicht geht obwohl es in der VB Hilfe so stand ?