Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

[batch][vbs] startmenüverknüpfung erstellen

Frage Entwicklung Batch & Shell

Mitglied: Phlegma

Phlegma (Level 1) - Jetzt verbinden

09.01.2007, aktualisiert 10.01.2007, 14930 Aufrufe, 5 Kommentare

hi,
bin immernoch bei meiner installation...
allerdings schon weiter...!
nun folgendes problem mit meinem vbs script dass aus der batch erstellt wird die das prog installiert

hier mein schnipsel:
01.
@echo off 
02.
set progtitel=XXX 
03.
set progname=XXX XXX XXX 
04.
set progdir=XXX 
05.
set progexe=XXX.exe 
06.
set zielpfad=c:\XXX 
07.
 
08.
echo '                  MakeShortCut.vbs >%temp%\MakeShortCut.vbs 
09.
echo. >>MakeShortCut.vbs 
10.
echo Const strProgramTitel="%progtitel%" >>%temp%\MakeShortCut.vbs 
11.
echo Const strProgram="%zielpfad%\%progexe%" >>%temp%\MakeShortCut.vbs 
12.
echo Const strProgramOrt="%zielpfad%" >>%temp%\MakeShortCut.vbs 
13.
echo Const StrProgramDescript="%progname%" >>%temp%\MakeShortCut.vbs 
14.
echo Const strProgramMenuOrt="Programme\%progdir%" >>%temp%\MakeShortCut.vbs 
15.
echo Dim objShortcut >>%temp%\MakeShortCut.vbs 
16.
echo Dim objShell >>%temp%\MakeShortCut.vbs 
17.
echo Set objShell= WScript.CreateObject("Wscript.Shell") >>%temp%\MakeShortCut.vbs 
18.
echo strLPfad=objShell.SpecialFolders("Startmenu") >>%temp%\MakeShortCut.vbs 
19.
echo Set objShortcut=objShell.CreateShortcut(strLPfad ^& _ >>%temp%\MakeShortCut.vbs 
20.
echo "\" ^& strProgramMenuOrt ^& "\" ^& strProgramTitel ^& ".lnk") >>%temp%\MakeShortCut.vbs 
21.
echo objShortcut.TargetPath= strProgram >>%temp%\MakeShortCut.vbs 
22.
echo objShortcut.Description= strProgramDescript >>%temp%\MakeShortCut.vbs 
23.
echo objShortcut.WorkingDirectory = strProgramort >>%temp%\MakeShortCut.vbs 
24.
echo objShortcut.Save >>%temp%\MakeShortCut.vbs 
25.
 
26.
cscript //nologo %temp%\MakeShortCut.vbs 
27.
:: del %temp%\MakeShortCut.vbs >nul 2>nul

wie man sieht bin ich seit letztem mal vorangeschritten... allerdings bekomm ich folgenden fehler.... hattte noch andere aber mit diesem komm ich nicht weiter

der fehler der angezeigt wird:
C:\DOKUME~1\Justus\LOKALE~1\Temp\MakeShortCut.vbs(16, 1) WshShortcut.Save: Die Verknüpfung "C:\Dokumente und Einstellungen\Justus\Startmenü\Programme\XXX\XXX.lnk" wurde nicht gespeichert.

der script hat gut für den desktop funktionert aber nachdem ich für das startmenu geändert habe wie ihr seht.. geht er nicht mehr

wem fällt der fehler ins auge?
oder wer hat ne bessere lösung? bitte posten! würd mich über hilfe freuen! Ph
Mitglied: bastla
09.01.2007 um 19:51 Uhr
Hallo Phlegma!

Den Ordner "C:\Dokumente und Einstellungen\Justus\Startmenü\Programme\XXX", in welchem der Link erstellt werden soll, gibt es schon?

Grüße
bastla
Bitte warten ..
Mitglied: Biber
09.01.2007 um 19:58 Uhr
wem fällt der fehler ins auge?
...wieder zu spät... *grmpf*
Der Unterordner XXX muss vorher angelegt werden.
Da der SpecialFolder("Startmenu") ja im VBS ermittelt wurde, muss Du im VBS auch noch ein FileSystemObject und damit diesen Unterordner anlegen.

Grüße
Biber
Bitte warten ..
Mitglied: maneich
09.01.2007 um 20:36 Uhr
Hallo,

also ich weiß nicht, warum das immer alles so kompliziert gemacht wird.

set WshShell = WScript.CreateObject("WScript.Shell")
strStartMenu = WshShell.SpecialFolders("StartMenu")
set oShellLink = WshShell.CreateShortcut(strStartMenu & "\I_O.lnk")
oShellLink.TargetPath = "Zielpfad\Datei"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "Ctrl+q"
oShellLink.IconLocation = "Notepad.exe, 0"
oShellLink.Description = "I_O"
oShellLink.WorkingDirectory = strTargetPath
oShellLink.Save

Den Hotkey (Tastenfolge zum Aufruf) kannst du auch weglassen. Klappt 100 pro.

Mit freundlichen Grüßen maneich
Bitte warten ..
Mitglied: Phlegma
09.01.2007 um 20:52 Uhr
danke ! ich versteh meinen fehler... batch befehl md und den ordner erstellen dann gehts...

@ biber hatte deine meldung mit dem befehl für filesystem nicht gesehn und einfach batch befehl genommen geht trotzdem...

hier nochmal das endprodukt zur verknüpfungserstellung
01.
@echo off 
02.
set progtitel=XXX 
03.
set progname=XXX XXX XXX 
04.
set progdir=XXX 
05.
set progexe=XXX.exe 
06.
 
07.
set zielpfad=c:\XXX 
08.
 
09.
 
10.
md "%userprofile%\Startm~1\Programme\%progdir%\" 
11.
echo '                  MakeShortCut.vbs >%temp%\MakeShortCut.vbs 
12.
echo. >>MakeShortCut.vbs 
13.
echo Const strProgramTitel="%progtitel%" >>%temp%\MakeShortCut.vbs 
14.
echo Const strProgram="%zielpfad%\%progexe%" >>%temp%\MakeShortCut.vbs 
15.
echo Const strProgramOrt="%zielpfad%" >>%temp%\MakeShortCut.vbs 
16.
echo Const StrProgramDescript="%progname%" >>%temp%\MakeShortCut.vbs 
17.
echo Const strProgramMenuOrt="Programme\%progdir%" >>%temp%\MakeShortCut.vbs 
18.
echo Dim objShortcut >>%temp%\MakeShortCut.vbs 
19.
echo Dim objShell >>%temp%\MakeShortCut.vbs 
20.
echo Set objShell= WScript.CreateObject("Wscript.Shell") >>%temp%\MakeShortCut.vbs 
21.
echo strLPfad=objShell.SpecialFolders("Startmenu") >>%temp%\MakeShortCut.vbs 
22.
echo Set objShortcut=objShell.CreateShortcut(strLPfad ^& _ >>%temp%\MakeShortCut.vbs 
23.
echo "\" ^& strProgramMenuOrt ^& "\" ^& strProgramTitel ^& ".lnk") >>%temp%\MakeShortCut.vbs 
24.
echo objShortcut.TargetPath= strProgram >>%temp%\MakeShortCut.vbs 
25.
echo objShortcut.Description= strProgramDescript >>%temp%\MakeShortCut.vbs 
26.
echo objShortcut.WorkingDirectory = strProgramort >>%temp%\MakeShortCut.vbs 
27.
echo objShortcut.Save >>%temp%\MakeShortCut.vbs 
28.
 
29.
cscript //nologo %temp%\MakeShortCut.vbs 
30.
del %temp%\MakeShortCut.vbs >nul 2>nul 
31.
 
32.
echo fertig! 
33.
pause >nul
Ph

PS
... hab mir bei versuchen mein startmenü zerschossen^^ ..
wenn jmd kurz einen batch hat um das wiederherzustellen indem die ordner abgeklappert werden und verknüpfungen im startmenü zu den exe dateien erstellt werden
oder eine lösung wie ich das schnell wiederbekomme...

hatte rd befehl benutzt um den startmenu eintrag zu löschen und für den ordner die variable falsch eingegeben..
dadurch wurde nichts eingesetzt und der ganze programme ordner gelöscht....

naja ansonsten bau ich mir das wichtigste selbst zusammen... ausmisten muss ich eh...

ich mein nur wem was einfällt.. freu mich über hilfe...!

vielen dank in jedem fall für alles!
Bitte warten ..
Mitglied: bastla
10.01.2007 um 23:40 Uhr
Hallo Phlegma!

In VBScript könntest Du mit der ".SubFolders"-Collection bei "C:\Programme" ansetzen und jeden Unterordner (mit der ."Files"-Aufzählung) auf Exe-Dateien absuchen - wie man mit dem dann gefundenen Pfad Shortcuts erstellt, wüsstest Du ja.

Für die manuelle Vorgangsweise á la "2 Explorer-Fenster und Drag and Drop der Exe-Dateien (mit Strg-Umsch)" hätte ich vielleicht noch etwas anzubieten: Um das lästige "Verknüpfung mit" vor dem Namen zu vermeiden, bräuchtest Du einen Registry Eintrag "Link" (REG_BINARY, Werte 00 00 00 00) unter "Explorer" (oder Du verwendest gleich diese .reg-Datei):
01.
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer] 
02.
"Link"=hex:00,00,00,00 
03.
 
Auf jeden Fall: Gutes Gelingen.

Grüße
bastla
Bitte warten ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ähnliche Inhalte
Entwicklung
gelöst Mit Batch,VBS,Powershell Windows einrichten (1)

Frage von Justin98 zum Thema Entwicklung ...

Windows Netzwerk
Netzwerkressource ohne Laufwerksbuchstabe via Batch bzw. Scrip erstellen (13)

Frage von der-suchende zum Thema Windows Netzwerk ...

Windows 7
gelöst Batch-Skript oder VBS Skript zum Sichern von Office Vorlagen (2)

Frage von Ceejaay zum Thema Windows 7 ...

Batch & Shell
Batch: .rar-Pakete automatisch Ordner erstellen und verschieben (2)

Frage von BowserMD zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Router & Routing
gelöst Empfehlung günstiges ADSL2+ nur Modem (10)

Frage von TimMayer zum Thema Router & Routing ...

Server-Hardware
Lenovo Server System X 3650 M5 Festplatten (9)

Frage von Hendrik2586 zum Thema Server-Hardware ...