Klammern, wenn ein Sub aufgerufen wird

375
Christopher Collins

Versuch, ein .exemit einem zu installieren vbs. Ich bekomme eine Fehlermeldung, die ich nicht parentheses when calling a subin Zeile 11 verwenden kann. Ich bin relativ neu bei VS und habe keine Ahnung, worüber sie reden.

Option Explicit  Dim objShell,objFSO,strCommand,spath  'INSTALL ESet ANTIVIRUS USING VBScript Set objFSO = CreateObject("Scripting.FileSystemObject") Set objShell = WScript.CreateObject("WScript.Shell") spath = objShell.CurrentDirectory  wscript.sleep 1800000 If objFSO.FolderExists("C:\Program Files\Lightspeed Systems\User Agent") then objShell.LogEvent vbLogSuccess, sLogHeader & "Lightspeed is already installed." & VbCrLf & "Exit code: " & i End if  If Not objFSO.FolderExists("C:\Program Files\Lightspeed Systems\User Agent") then  If fso.FileExists(spath & "\Lightspeed\UserAgentx64 V2.1.14.exe") Then path = """" & spath & "\Lightspeed\UserAgentx64 V2.1.14.exe" & """ /passive /norestart /update-no" objShell.Run path, 1 ,True i = 0 'INSTALL ESet ANTIVIRUS i = objShell.Run(path, 1 ,True) If (i = 0) Or (i = 3010) Then 'WRITE EXIT CODE [0-success/3010-success&requires reboot] TO EVENTLOG objShell.LogEvent vbLogSuccess, sLogHeader & "Lightspeed installation completed successfully." & VbCrLf & "Exit code: " & i Else MsgBox "The installation of Lightspeed returned an error: " & i & VbCrLf & _ "Please contact IT Support to report this error.", vbOKOnly objShell.LogEvent vbLogError, sLogHeader & "Installation returned failure code: " & VbCrLf & "Exit code: " & i End If  Else WScript.Quit (1) End If  set fso = Nothing set WSHShell = Nothing End if
0
Es ist wahrscheinlich diese Zeile `objShell.Run (path, 1, True)`. Verwenden Sie entweder "objShell.Run path, 1, True" oder "Call objShell.Run (path, 1, True)"). Máté Juhász vor 6 Jahren 0
Code im ersten Beitrag aktualisiert. OK hat einen neuen Fehler, `Variable undefined" Objekt "` in Zeile 11 "erhalten. Christopher Collins vor 6 Jahren 0
`object.Run (strCommand, [intWindowStyle], [bWaitOnReturn])` ist lediglich ein [Syntaxmuster aus der WSH-Referenz] (http://www.vbsedit.com/html/6f28899c-d653-4555-8a59-49640b0e32ea.asp ). Entfernen Sie diese Zeile überhaupt. JosefZ vor 6 Jahren 0
Ok aktualisierter Code. Jetzt bekomme ich 'ist undefined' spath '' in 'Zeile 14' Christopher Collins vor 6 Jahren 0
Ok, habe das herausgefunden. Jetzt habe ich keine Fehler, wenn es läuft, aber es gibt nichts zurück. Es sollte mir sagen, dass es entweder bereits installiert, installiert ist oder einen Fehler. Ich bekomme nichts Christopher Collins vor 6 Jahren 0
Sie müssen Ihren Code debuggen, um zu sehen, wie genau er funktioniert. https://stackoverflow.com/questions/2288043/how-do-i-debug-a-stand-alone-vbscript-script Máté Juhász vor 6 Jahren 0

0 Antworten auf die Frage

Verwandte Probleme