Top-Themen

Aktuelle Themen (A bis Z)

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

Mitglied: Phlegma

Phlegma (Level 1) - Jetzt verbinden

09.01.2007, aktualisiert 10.01.2007, 16027 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.

MfG 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 ..
Ähnliche Inhalte
Batch & Shell
Geplante Aufgabe erstellen - VBS
gelöst Frage von kontextBatch & Shell9 Kommentare

Hallo Leute, Hallo Programmier-Profis :-) :-D Ich arbeite zur Zeit an einem kleinen VB-Script und bin nun auf eine ...

VB for Applications

VBS Ordner erstellen - wenn nicht vorhanden!

gelöst Frage von freshman2017VB for Applications1 Kommentar

Hallo, ich würde gerne einen Ordner erstellen, wenn dieser nicht vorhanden ist, nachfolgende VBS funktioniert Ich würde jedoch mit ...

Batch & Shell

Variable aus VBS in Batch einlesen

gelöst Frage von racer1601Batch & Shell4 Kommentare

Hallo ich habe das Problem das ich die Variable "Ordner" aus einem VBS Script nicht in meine Batch bekomme. ...

Batch & Shell

Base64 Decode (Batch,VBS)

gelöst Frage von clragonBatch & Shell26 Kommentare

Hey Leute Ich suche gerade nach einem kleinen VBS schnipsel für mein aktuelles Batch Projekt. Das Schnipsel soll in ...

Neue Wissensbeiträge
Windows 10
Zero-Day-Lücke in Microsoft Edge
Information von kgborn vor 1 TagWindows 10

In Microsofts Edge-Browser klafft wohl eine nicht geschlossene (0-Day) Sicherheitslücke im Just In Time Compiler (JIT Compiler) für Javascript. ...

Sicherheit
Microsoft und Skype: Sicherheit
Information von kgborn vor 1 TagSicherheit

Die Tage gab es ja einige Berichte zur Sicherheit des Skype-Updaters. Der Updater von Skype läuft unter dem Konto ...

Datenschutz

Behörden ignorieren Sicherheitsbedenken gegenüber Windows 10

Information von Penny.Cilin vor 2 TagenDatenschutz8 Kommentare

Hallo, passend zum Thema Ablösung LIMUX in München ein Beitrag bei Heise (siehe Link folgend). Behörden ignorieren Sicherheitsbedenken gegenüber ...

Sicherheit
Information Security Hub Munich airport
Information von brammer vor 2 TagenSicherheit

Hallo, Neues Center für Cyber Kriminalität am Münchener Flughafen brammer

Heiß diskutierte Inhalte
DSL, VDSL
Mindestgeschwindigkeiten DSL Telekom
Frage von justlukasDSL, VDSL13 Kommentare

Hallo zusammen, Seit diesem Jahr habe ich Verständnisprobleme mit dem Verhalten der Telekom. Wir haben seit einem Jahr VDSL ...

Switche und Hubs
LANCOM-Switch: Probleme (no link) mit SFP-Modulen?
Frage von THETOBSwitche und Hubs10 Kommentare

Hi zusammen, ich habe folgendes Problem: Und zwar habe ich an einem Standort drei Switche verbaut - LANCOM GS-2326P+, ...

Firewall
RB2011 Firewall Rule eine bestimmte Mac oder IP Adresse nicht zu blockieren
Frage von lightmanFirewall10 Kommentare

Hallo liebes Forum mit ihren Spezialisten. Ich habe meine Firewall so konfiguriert das kein Endgerät ohne meine Speziellen Erlaubnis ...

Humor (lol)
Was könnte man mit einem Server machen? Idee gesucht
Frage von 2SeitenHumor (lol)8 Kommentare

Hey Zusammen Ich habe einen alten HP G2 Rackserver zu Hause rumliegen. 28GB Ram, 1xAMD Prozi mit etwa 2GHz. ...