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

VBS Shortcut Problem da in TargetPath Anführungszeichen verwendet werden.

Frage Entwicklung VB for Applications

Mitglied: Thom001

Thom001 (Level 1) - Jetzt verbinden

10.10.2011 um 13:05 Uhr, 4558 Aufrufe, 5 Kommentare

Hallo,

ich habe ein VBSkript das bei den Benutzern eine Verknüpfung erstellt, sofern sie in der Programm Gruppe sind.
Nun habe ich ein Programm das Anführungszeichen in der Befehlszeile hat.
Die Befehlszeile lautet:

C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 "" CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 111.111.111.111 0 ""

Das Script sieht so aus:

If InStr(strGroup, lcase(ProgGroup)) Then
Set objShortcut =objShell.CreateShortcut("C:\Users\" & Logonuser & "\AppData\Roaming\Microsoft\Windows\Start menu\Programs\Special\Programm.lnk")
objShortcut.TargetPath = "C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 "" CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 111.111.111.111 0 "" "" CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 193.187.246.210 0 """
objShortcut.Arguments = ""
objShortcut.Description = "Progname"
objShortcut.WorkingDirectory = "C:\pfad"
objShortcut.IconLocation = "C:\Pfad\Programm.exe "
objShortcut.Save
End If

VBScript gibt nun die "Fehlermeldung Kompilierungsfehler in Microsoft VBScript: Anweisungsende" erwartet aus.
Wie bekomme ich VB dazu diese Befehlszeile als Shortcut zu akzeptieren?

Gruß
Thomas
Mitglied: 60730
10.10.2011 um 13:28 Uhr
Servus,

  • Benutze doch bitte Code Tags...
  • vergleiche - Zeile 2 und Zeile 3
  • " entspricht Chr(34)
Die Befehlszeile lautet:
C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 "" CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 111.111.111.111 0 ""

Ähh fehlt da nicht ein führendes "?

01.
If InStr(strGroup, lcase(ProgGroup)) Then 
02.
Set objShortcut =objShell.CreateShortcut("C:\Users\" & Logonuser & "\AppData\Roaming\Microsoft\Windows\Start menu\Programs\Special\Programm.lnk") 
03.
objShortcut.TargetPath = "C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 " & Chr(34) & Chr(34) & " CTSDBOracleOciCursor -V "& Chr(34) & Chr(34) & "btw" & Chr(34) & Chr(34) & "1.00.001" "368" -T 111.111.111.111 0 "" "" CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 193.187.246.210 0 """ 
04.
objShortcut.Arguments = "" 
05.
objShortcut.Description = "Progname" 
06.
objShortcut.WorkingDirectory = "C:\pfad" 
07.
objShortcut.IconLocation = "C:\Pfad\Programm.exe " 
08.
objShortcut.Save 
09.
End If
edit - nee das ist mir auch mit Code Tags zu viel Arbeit...
Bitte warten ..
Mitglied: Thom001
10.10.2011 um 13:49 Uhr
Zitat von 60730:
> Die Befehlszeile lautet:
> C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 ""
CTSDBOracleOciCursor -V "btw" "1.00.001" "368" -T 111.111.111.111 0 ""

Ähh fehlt da nicht ein führendes "?


Nein der Link nach der Installation sieht so aus.


Die Fehlermeldung kommt immer noch

Gruß
Thomas
Bitte warten ..
Mitglied: 60730
10.10.2011 um 14:23 Uhr
Servus,

Die Fehlermeldung kommt immer noch

yupp...
edit - nee das ist mir auch mit Code Tags zu viel Arbeit...
01.
msgbox Chr(34) & "C:\Pfad\Programm.exe -O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 " & Chr(34) & Chr(34) & " CTSDBOracleOciCursor -V " & Chr(34) & "btw" & Chr(34) & Chr(34) & "1.00.001" & Chr(34) & Chr(34) & "368" & Chr(34) & " -T 111.111.111.111 0 " & Chr(34) & Chr(34)
Solange bis deine gewünschten Infos da angezeigt werden...
Bitte warten ..
Mitglied: bastla
10.10.2011 um 20:36 Uhr
Hallo Thim001 und willkommen im Forum, hallo T-Mo!

Gelegentlich denken die bei MS sich sogar etwas dabei - etwa, wenn sie ein Property "Arguments" erfinden ...

... daher wäre vielleicht
01.
objShortcut.TargetPath = "C:\Pfad\Programm.exe" 
02.
objShortcut.Arguments = "-O CTSStartUp -R CTSStartUp -M 111.111.11.111 9988 -D 111.111.111.111 0 """" CTSDBOracleOciCursor -V ""btw"" ""1.00.001"" ""368"" -T 111.111.111.111 0 """" """" CTSDBOracleOciCursor -V ""btw"" ""1.00.001"" ""368"" -T 193.187.246.210 0 """""
einen Versuch wert (ich hab's jedenfalls nicht getestet).

Ach ja, bevor ich vergess' das zu erwähnen: Für Anführungszeichen unter Anführungszeichen gilt der alte Werbespruch "Nimm 2, dann klappt's auch mit dem Nachbarn", oder so ähnlich ...

Grüße
bastla
Bitte warten ..
Mitglied: Thom001
11.10.2011 um 10:54 Uhr
Hallo bastla,

Dein Tipp war die Lösung.

Danke

Thomas
Bitte warten ..
Neuester Wissensbeitrag
Windows Update

Windows Update-Suche nach Win7 Neuinstallation wieder schneller

(2)

Erfahrungsbericht von the-buccaneer zum Thema Windows Update ...

Ähnliche Inhalte
Peripheriegeräte
Roccat Ryos - Support verzweifelt an Problem mit Profilen

Frage von sascha382 zum Thema Peripheriegeräte ...

Windows Update
gelöst Windows Server 2012 R2 - WSUS Problem (1)

Frage von aladin.inder zum Thema Windows Update ...

Batch & Shell
PowerShell Transkript Problem (5)

Frage von Marabunta zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Exchange Server
Bestehende eMails autoamatisch weiterleiten (21)

Frage von metal-shot zum Thema Exchange Server ...

Hyper-V
gelöst Reiner Hyper- V Server oder lieber Rolle (21)

Frage von Winuser zum Thema Hyper-V ...

SAN, NAS, DAS
gelöst Synology Version 6.1 Probleme (18)

Frage von Hendrik2586 zum Thema SAN, NAS, DAS ...

Router & Routing
gelöst IP Kamera für drei unabhängige Netzwerke (16)

Frage von ProfessorZ zum Thema Router & Routing ...