Hallo,
ich suche eine Routine mit der ich von einer Datei eine Verknüfung in ein beliebiges Verzeichnis (bei mir: Autostart-Verz) erstellen kann.
Gehts das irgendwie mir der rundll?
ich habe nämlich das hier gefunden
appwiz.cpl,NewLinkHere
frolic Wucht „Mit VB6 Verknüpfung erstellen“
Also, ich habe das hier im Ordner "C:\WINDOWS\\SAMPLES\\WSH" gefunden (die Datei heißt "Shortcut.vbs"):
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
Dim MyShortcut, MyDesktop, DesktopPath
' Read desktop path using WshSpecialFolders object
DesktopPath = WSHShell.SpecialFolders("Desktop")
' Create a shortcut object on the desktop
Set MyShortcut = WSHShell.CreateShortcut(DesktopPath & "\Shortcut to notepad.lnk")
' Set shortcut object properties and save it
MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe")
MyShortcut.WorkingDirectory = WSHShell.ExpandEnvironmentStrings("%windir%")
MyShortcut.WindowStyle = 4
MyShortcut.IconLocation = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe, 0")
MyShortcut.Save
Ich hoffe du kannst es auseinanderklmüsern. Es ist in VBScript geschrieben und müsste auch mit VB6.0 funzen, da beider sehr verwand sind.
