michaz
Goto Top

Verknüpfung per VBS in Menüordner unter Programme

Hallo Leute,

ich bräuchte mal etwas Hilfe in VBS...

bastel gerade an einer Clientconfig die aus vbscripten besteht..
jetzt möchte ich für eine Option einen Menüeintrag machen...
den Menüordner Install unter Start\Programm\ erzeuge ich auch per Script was auch geht..
nur halt die Setup-Verknüpfung in Install funst nicht face-sad

direckt im Prog Ordner ging es...

hier so ....

Set Shell = CreateObject("WScript.Shell")
MenuePath = Shell.SpecialFolders("Programs")
Set link = Shell.CreateShortcut(MenuePath & "\Setup.lnk")
link.Arguments = "1 2 3"
link.Description = "Setup Config Script"
link.HotKey = "CTRL+ALT+SHIFT+X"
link.IconLocation = "c:\Install\SETUP\Icons\Setup.ico,2"
link.TargetPath = "c:\Install\SETUP\start_setup_script.bat"
link.WindowStyle = 1
link.WorkingDirectory = "c:\Install\SETUP"
link.Save

aber mit Install gehts nich...

Content-Key: 66172

Url: https://administrator.de/contentid/66172

Ausgedruckt am: 28.03.2024 um 12:03 Uhr

Mitglied: bastla
bastla 14.08.2007 um 14:55:09 Uhr
Goto Top
Hallo MichaZ!

Was geht dabei nicht? Für mich schaut das Script soweit OK aus, und mit der Ergänzung des "MenuePath"s läuft es bei mir auch:
Set fso = CreateObject("Scripting.FileSystemObject")  
Set Shell = CreateObject("WScript.Shell")  
MenuePath = Shell.SpecialFolders("Programs") & "\Install"  
If Not fso.FolderExists(MenuePath) Then fso.CreateFolder(MenuePath) 'Nur zur Sicherheit ...  
Set link = Shell.CreateShortcut(MenuePath & "\Setup.lnk")  
link.Arguments = "1 2 3"  
link.Description = "Setup Config Script"  
link.HotKey = "CTRL+ALT+SHIFT+X"  
link.IconLocation = "c:\Install\SETUP\Icons\Setup.ico,2"  
link.TargetPath = "c:\Install\SETUP\start_setup_script.bat"  
link.WindowStyle = 1
link.WorkingDirectory = "c:\Install\SETUP"  
link.Save

Grüße
bastla
Mitglied: MichaZ
MichaZ 14.08.2007 um 15:08:48 Uhr
Goto Top
aaa ha

so gehts ... superface-smile
auf jeden Fall DANKE "bastla"

ich hatte es mit ("Install") an Stelle von ("Programs")
aber so einfach gehts halt nich...

face-smile

jetzt hab ich nur noch n kleinen Schönheitsfehler.. damit
mit --->link.IconLocation = "c:\Install\SETUP\Icons\Setup.ico,2"<----
habe ich oder möchte ich der Verknüpfung ein Icon zuweisen..
aber es wird nicht durch die Verknüpfung angezeigt...
nur wenn ich unter den Eigenschaften der Verknüpfung anderes Symbol
mein Icon noch mal auswähle...

was könnte das sein??...

mfg
michA
Mitglied: bastla
bastla 14.08.2007 um 15:17:30 Uhr
Goto Top
Hallo MichaZ!

Nimm einmal 0 statt 2 ...

Grüße
bastla
Mitglied: MichaZ
MichaZ 14.08.2007 um 15:28:28 Uhr
Goto Top
??? ... es geht...

warum denn das?? was besagt denn die syn??
Mitglied: bastla
bastla 14.08.2007 um 15:35:46 Uhr
Goto Top
Hallo MichaZ!

Die 0 ist der (nullbasierte) Index des gewünschten Icons innerhalb der Datei (was bei .ico etwas witzlos ist, aber in einer .exe oder einer .dll können ja mehrere Icons enthalten sein).

Grüße
bastla
Mitglied: MichaZ
MichaZ 14.08.2007 um 15:41:16 Uhr
Goto Top
gut.. dann versteh ich das..

noch mal Danke für deine Hilfe...

mfg
michA