Autor Thema: Verknüpfung erstellen  (Gelesen 1442 mal)

Offline rar

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 856
  • Geschlecht: Männlich
  • Des passt scho
    • click
Verknüpfung erstellen
« 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
« Letzte Änderung: 31.03.05 - 13:56:15 von rar »
†090620141300

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz