Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: rar am 31.03.05 - 13:08:45

Titel: Verknüpfung erstellen
Beitrag von: rar am 31.03.05 - 13:08:45
Hi,

ich muss aus Notes heraus eine Verknüpfung eines Files erstellen, umbenennen und in einem bestimmten Ordner ablegen.

Hat jemand eine Idee wie man das machen könnte?

lG
-daniel

Edit:
Hat sich erledigt.
Ich hätte mit dem Posting etwas warten sollen. Jetzt ist mir selber eine Lösung eingefallen  :D

Falls es von Interesse ist....

Dim WshShell As Variant
Dim oShellLink As Variant
Set WshShell = CreateObject("Wscript.Shell")
Set oShellLink = WshShell.CreateShortcut("C:\Ordner\Verknuepfung.txt.lnk")
oShellLink.TargetPath = "C:\test.txt"
oShellLink.Save