Jump to content

Startmenüverknüpfung per vbs script


Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Empfohlene Beiträge

Hallo Gemeinde,

ich würde gerne ein Startmenüverknüpfung per vbs script schreiben, dass heisst einen EXE die in C:\Programme liegt nach "%Homedrive%\Dokumente und Einstellungen\All Users\Startmenü\Ordner\" verknüpfen. Ich brauche dieses Script da ich es in einer Batch integrieren muss.

 

Die Boardsuche und Google habe ich bereits hinter mir aber nichts passendes gefunden.

 

Ich hoffe mir kann einer Helfen und bedanke mich im vorraus.

Link zu diesem Kommentar

Hallo,

bin fast an mein Ziel angekommen, dass Problem aber ist dass das Icon im Startmenü angezeigt wird und nicht in einem Untermenü wo ich es gerne hin hätte also in meinem Beispiel hätte ich gerne das Untermenü VNC Viewer

 

Dim objShell, strPath, objShortcut

Set objShell = WScript.CreateObject( _

"WScript.Shell" )

strPath = objShell.SpecialFolders( _

"StartMenu" )

Set objShortcut = objShell.CreateShortcut( _

strPath & "\VNC.lnk" )

strAcc = "C:\Programme\RealVNC\vncwiewer.exe"

objShortcut.TargetPath = strAcc & _

"vncwiewer.exe"

objShortcut.WindowStyle = 4

objShortcut.IconLocation = "C:\My Icon.ico"

objShortcut.Save

 

Könnte das mal bitte einer anpassen?

Link zu diesem Kommentar

Es sollte reichen, den Pfad einfach noch um den gewünschten Teil zu erweitern:

 

strPath = objShell.SpecialFolders( "StartMenu" ) & "\VNC Viewer"

 

Setzt aber voraus, dass der Pfad bereits existiert.

 

Ansonsten Pfad erzeugen:

 

set objFSO=Wscript.CreateObject("Scripting.FilesystemObject")

set ObjFolder=objFSO.createfolder(strpath)

 

das ganze spätestens vor dem objshortcut.save

 

und Dim objFSO, objFolder am Anfang nicht vergessen

Link zu diesem Kommentar
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Schreibe einen Kommentar

Du kannst jetzt antworten und Dich später registrieren. Falls Du bereits ein Mitglied bist, logge Dich jetzt ein.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung jetzt entfernen

  Only 75 emoji are allowed.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor-Fenster leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

×
×
  • Neu erstellen...