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, 3426 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
Entwicklung
VBS Script in Powershell aufrufen
gelöst Frage von HanutaEntwicklung7 Kommentare

Hallo Zusammen, ich möchte einen VBS Script in Powershell aufrufenist das überhaupt möglich ? Wenn ja, wie ? VG ...

VB for Applications

Bestimmtes Arrayfeld mit Variable aufrufen? - VBS

gelöst Frage von gabrixlVB for Applications10 Kommentare

Hallo zusammen! Ist es möglich ein Arrayfeld mit einer Variable aufzurufen, anstatt eine Zahl zu verwenden? Das war meine ...

Exchange Server

Problem beim Aufruf von ecp

gelöst Frage von HenereExchange Server3 Kommentare

Hallo Gemeinde, kann mir da jemand helfen ? Exchange 2013 CU 11 auf 2012 R2 Outlook funktioniert einwandfrei, Ein- ...

Hosting & Housing

Problem mit Aufruf neuer Webseite

Frage von takvorianHosting & Housing2 Kommentare

Hallo zusammen, ich habe mir eine Webseite mittels FTP gesichert und auf den neuen Webserver wieder hochgeladen. Beim Aufruf ...

Neue Wissensbeiträge
Sicherheit

Interessante Methode für Leute, die in einer Windowsdomäne starke Kennwörter erzwingen wollen

Information von DerWoWusste vor 2 StundenSicherheit3 Kommentare

Dieser Artikel beschreibt, wie man auch ohne 3rd-party-tools die Kennwortsicherheit in Windows-Domänen erhöhen kann. Der Grundgedanke lautet: wir prüfen ...

Windows Server

SBS 2011: Installation von KB4457144 schlägt beim Reboot fehl - Von Dienst gesperrte Schriftart ursächlich

Tipp von the-buccaneer vor 13 StundenWindows Server1 Kommentar

Moinsen zusammen! Das hat mich einige graue Haare gekostet: Ein SBS 2011 weigerte sich schon im August, das monatl. ...

Windows Netzwerk
Browser-Lags und IPv6
Erfahrungsbericht von NixVerstehen vor 19 StundenWindows Netzwerk1 Kommentar

Hallo zusammen, wir betreiben als kleines Speditionsunternehmen ein überschaubares Windows-Netzwerk mit Win10-Clients sowie einem Server 2016 Essentials als "eierlegende ...

Humor (lol)

Erstaunlich, Windows mit extremer Laufzeit (Server) lol

Tipp von mathu vor 21 StundenHumor (lol)5 Kommentare

Was es so alles gibt. :-)

Heiß diskutierte Inhalte
Hyper-V
Windows Serer 2016 Standard virtualisieren
gelöst Frage von fritte87Hyper-V33 Kommentare

Hallo zusammen, ich muss für eine kleine Firma ein entsprechendes neues kleines Konzept bauen. Ich habe einen Server Standard ...

Windows Server
Fileserver von 2012 R2 auf 2012R2
gelöst Frage von ThabeusWindows Server23 Kommentare

Moin moin, leider war in der Vergangenheit der Fokus des Betriebs nicht auf Langfristigkeit ausgelegt. Daher stehe ich jetzt ...

Windows Server
Kann DNS-Einträge nicht finden
gelöst Frage von BPeterWindows Server19 Kommentare

Hallo, wenn ich folgenden Befehl absetze, bekomme ich eine Liste zurück mit allen Einträgen der DNS-Zone. Wenn ich aber ...

Router & Routing
Größere Zahl VPN-Verbindungen mit Fritz-Box einrichten
Frage von miscmikeRouter & Routing15 Kommentare

Hallo Zusammen, ich supporte verschiedene Kunden mit bestehenden LAN-LAN-Kopplungen via FritzBox (7490, FritzOS 7.01) . Anwendungen sind z.B. Kaspersky-KSC ...