[GELÖST] .Lnk Ordnerverknüpfung erstellen

Hallo ins Forum,

ich will über einen Button eine Verknüpfung (.Ink) ins Filesystem schreiben.

Alle Versuche es mit den Automations:

Windows Script Host Object Model – WshShell
Microsoft Shell Controls And Automation – Shell

hinzubekommen sind gescheitert )-;

_________________________________________________________________

kleiner Auszug aus dem ganz simplen Versuch:

Code:

IF ISCLEAR(Wshell) THEN
  CREATE(Wshell);

Wshell.CreateShortcut('N:\Serviceanlagen\2011\test.Ink');

CLEAR(Wshell);


Bringt folgenden Fehler:

MSDynamics_Shell.jpg

Danke vorab für Eure Mühen...

Schönes Wochenende!

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

Zuletzt geändert von Lukas am 20. Mai 2011 14:32, insgesamt 1-mal geändert.

Dir ist bewusst dass du Ink geschrieben hast und nicht lnk?

Oha da hab ich nicht aufgepasst. Vielen Dank Sebastian!

Dennoch klappt es nicht. Hat es jemand schon mal realisiert und mir den Code?

Hi,

Microsoft hat hier zu etwas:
http://support.microsoft.com/kb/242297

Das könnte in NAV z.B. so aussehen:

Code:

Name   DataType   Subtype   Length
WshShell   Automation   'Windows Script Host Object Model'.WshShell   
oShellLink   Automation   'Windows Script Host Object Model'.WshShortcut   


IF ISCLEAR (WshShell) THEN
  CREATE(WshShell);

oShellLink := WshShell.CreateShortcut('aaa.lnk');

oShellLink.TargetPath := 'notepad.exe';
oShellLink.Arguments := 'c:\windows\desktop\aaa.txt';
oShellLink.Save;
CLEAR(oShellLink);

super Danke!!!

Schönes Wochenende!