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 Problem bei Shellprogramierung mit Aufruf einer anderen VBS-Datei

Mitglied: DanielSAN

DanielSAN (Level 1) - Jetzt verbinden

18.07.2011 um 14:22 Uhr, 3442 Aufrufe, 4 Kommentare

Hallo ich habe folgendes Shell-Script geschrieben.

01.
Option Explicit
02.

03.
Dim Key
04.
Dim Pfad
05.
Dim ws
06.
Dim parameter
07.

08.

09.
Set ws = wscript.createObject("Wscript.Shell")
10.
parameter = "/inpkey:"
11.

12.

13.
Pfad = "C:\Programme\Microsoft Office\Office14\ospp.vbs /inpkey:"
14.
Key = Inputbox("Bitte den Produktkey für Office 2011 eingeben.     z.B: xxxxx-xxxxx-xxxxx-xxxxx-xxxxx")
15.

16.
If Key = "" Then
17.
        Msgbox("Key ungültig!")
18.
Else
19.

20.
ws.Run chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs"& chr (34), 1 & " " & parameter & key 
21.

22.

23.

24.
End If
also das Problem ist folgendes:

die Datei ospp.vbs muß mit folgendem Parametern gestartet werden.

in der CMD sieht das wie folgt aus:
---> wscript PFAD\opps.vbs /inpkey: XXXXX-XXXXX-XXXXX-XXXXX-XXXXX

´Mein Scruipt meldet immer das er die Datei nicht findet, lass ich den Parameter weg. Also machs nur so, dann funkzt es:
01.
 ws.Run chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs"& chr (34), 1  
also die Datei wird ausgeführt, allerdings fehlen ja alle parameter und auch der Key.

Was mach ich falsch, wie geht es

Danke für die schnelle Hilfe.

DanielSan
Mitglied: AndreasHoster
18.07.2011 um 14:52 Uhr
Mich wundert, daß Du keine andere Fehlermeldung bekommst.
Aber der run Befehl sieht prinzipiell so aus:
ws.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
Im strCommand, dem ersten Parameter, muß der Aufruf und die Parameter drinstehen, dann tuts auch.
Bei Dir tuts das eben nicht, daß ,1 steht so jedenfalls schlecht.
Bitte warten ..
Mitglied: DanielSAN
18.07.2011 um 15:04 Uhr
Hallo,

danke für die Antwort.
Leider bin ich nicht so der Crack in VBS und muß hier das Script erstellen.

Ich komme mit deiner Antwort leider nicht weiter

wie müßte ich das denn umschreiben, damit er mir die Datei ausführt?

wie gesagt im Command muß ich das so eingeben:

---> wscript PFAD\opps.vbs /inpkey: XXXXX-XXXXX-XXXXX-XXXXX-XXXXX

genauso so soll erdas auch ausführen, jedoch mit dem Parameter /inpkey: und der Variablen Key aus der Input-Box.

Danke.
Bitte warten ..
Mitglied: 76109
18.07.2011 um 15:09 Uhr
Hallo DanielSAN!

Versuchs mal so:
01.
Path = Chr(34) & "C:\Programme\Microsoft Office\Office14\ospp.vbs" & Chr(34)
02.

03.
ws.Run Path & " " & parameter & Key, 1
Wobie die ',1' in jedem Fall ans Ende gehört

Gruß Dieter
Bitte warten ..
Mitglied: DanielSAN
19.07.2011 um 11:33 Uhr
Danke.

es geht alles.


LG

DanielSAN
Bitte warten ..
Ähnliche Inhalte
VB for Applications
VBS Datei Auswahl Dialog
gelöst Frage von 133202VB for Applications5 Kommentare

Hallo Ihr, im Thread: konnte ich schon finden, was ich gesucht habe: Jetzt möchte ich allerdings, dass am Anfang ...

VB for Applications
VBS für Timestamp-Datei
gelöst Frage von PascalSchVB for Applications3 Kommentare

Hallo Zusammen, Bin ziemlich neu in der Welt des VBS und habe eine Frage hierzu, die ihr mir hoffentlich ...

Apache Server

Aufruf eines "Pfades" unterhalb einer PHP-Datei

gelöst Frage von montezApache Server4 Kommentare

Moin moin, ich hoffe Ihr könnt mir bei folgender Problemstellung helfen: Folgende Konstellation: Mein Testsystem ist derzeit ein Windows ...

XML

Vbs - simple XML Datei auslesen

gelöst Frage von DeeJayBeeXML4 Kommentare

Hallo zusammen, ich glaub, ich hab grad ne kleine Blockade oder denke viel zu kompliziert. Gegeben ist eine xml-Datei ...

Neue Wissensbeiträge
Windows 10

Windows 10 kann XPS erzeugen aber nicht anzeigen ????

Erfahrungsbericht von Deepsys vor 9 StundenWindows 10

Heute schickt mir ein Kollegen eine E-Mail mit einer XPS-Datei vom Kunden im Anhang und fragt wie er diese ...

Exchange Server

1und1 IONOS: Probleme beim Mailversand mit Exchange

Information von reksierp vor 19 StundenExchange Server3 Kommentare

Hallo, seit Do, 17.1.19 etwa Mittags nimmt 1und1 IONOS keine Mails mehr über den Standard-Port SMTP 25 an. Nachdem ...

LAN, WAN, Wireless

Cisco Mikrotik VPN Standort Vernetzung mit dynamischem Routing

Anleitung von aqui vor 1 TagLAN, WAN, Wireless

1. Allgemeine Einleitung Das nachfolgende Tutorial ist eine Fortführung der hier bei Administrator.de schon bestehenden VPN Tutorials und beschreibt ...

Windows Mobile

Support für Windows Mobile endet im Dezember 2019

Information von transocean vor 2 TagenWindows Mobile

Moin, Microsoft empfiehlt als Alternative den Umstieg auf iOS oder Android, wie man hier lesen kann. Gruß Uwe

Heiß diskutierte Inhalte
LAN, WAN, Wireless
Temporäre WLAN Verbindung für AD-Login
Frage von Christian.WidauerLAN, WAN, Wireless17 Kommentare

Hallo zusammen, ich weiß leider nicht unter welchem Begriff ich dafür suchen muss, daher habe ich bisher leider nichts ...

Windows Server
MSSQL Backup in Form von .sql einspielen
Frage von janosch12Windows Server14 Kommentare

Guten Morgen, wir verwenden das Tool SQLandFTPBackup ( ) zum sichern einiger MSSQL Datenbanken. Nun sichert das Toll die ...

Netzwerkmanagement
Reverse Proxy für TCP und UDP Anfragen
gelöst Frage von flxklsNetzwerkmanagement14 Kommentare

Hallo zusammen, ich besitze einen Rootserver, der nur eine öffentliche IP besitzt und auf dem mehrere VMs laufen. Da ...

Microsoft Office
Office 2016 oder Office 2019
Frage von PeterzMicrosoft Office13 Kommentare

Hallo zusammen, wir müssen unser Office von 2010 auf eine neuere Version Umstellen. Jetzt stellt sich die Frage, ob ...