Msg Box --- Hilfe gesucht

und zwar folgendes wollte bei strComputer Msg >Box einfügen aber irgendwie macht er das nicht , kann mir wer helfen . Und zwar möchte ich wenn der Hostname falsch ist das dann Die msg box kommt und ne fehler meldung macht

Dim $strComputer, $objWMIService
Const $wbemFlagReturnImmediately = 0x10
Const $wbemFlagForwardOnly = 0x20


$strComputer = "Seb-PC"
$objWMIService = ObjGet("winmgmts:{(RemoteShutdown)}//" & $strComputer & "\root\CIMV2")




_Read_BioS()
_Read_CPU()
_Read_OS()
_Read_OS_Inst()
_Read_DriveInfo()

den hostnamen kann ich beliebig ändern soweit funkioniert alles ,
wenn der hostname falsch ist , startet das script nicht. aber wenn ich das script compile , dann macht er kein fenster wo steht hostname falsch, nehme ich den richtigen hostnamen starte das script also soweit läuft des nur halt mit der msg box ich mach da halt irgendwas falsch

nein hat ja nicht geklappt , also bei allen anderen sachen hats geklappt mit der msg box .

aber bei strComputer irgednwie net ,

Also wenn der Hostname richtig ist soll er das Script fortfahren, sollte der Hostname falsch sein soll er das script stoppen mit öffnen eines msg box fenster wo steht hostname konnte nicht gefunden werden oder ist falsch , halt so in der art,

Dim $strComputer, $objWMIService
Const $wbemFlagReturnImmediately = 0x10
Const $wbemFlagForwardOnly = 0x20
If §strComputer = -1 Then
   MsgBox(0, "Hostname ist falsch." & @CRLF & "Fragen Sie ihren Arzt oder mich.")
    	stop()
		EndIf
$strComputer = "Seb-PC"
$objWMIService = ObjGet("winmgmts:{(RemoteShutdown)}//" & $strComputer & "\root\CIMV2")




_Read_BioS()
_Read_CPU()
_Read_OS()
_Read_OS_Inst()
_Read_DriveInfo()

>"C:\Program Files (x86)\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Users\Sebbe\Desktop\Script\Script2.3.au3"
C:\Users\Sebbe\Desktop\Script\Script2.3.au3 (15) : ==> Unable to parse line.:
If §strComputer = -1 Then
If ^ ERROR
>Exit code: 1 Time: 0.0649

das sagt er mir dann wenn nicht funkioniert

>"C:\Program Files (x86)\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Users\Sebbe\Desktop\Script\Script2.3.au3"
"C:\Users\Sebbe\Desktop\Script\Script2.3.au3" (18) : ==> Variable used without being declared.:
MsgBox(0, 0, "@error=" & @error & @CRLF & "Type=" & VarGetType($oObjGet) & @CRLF & $oObjGet)
MsgBox(0, 0, "@error=" & @error & @CRLF & "Type=" & VarGetType(^ ERROR
>Exit code: 1 Time: 4.825

das zeigt er an wenn das mit dem von dir gepostet code ist

#closed

Zitat von Oscar

Wenn Botter versuchen zu programmieren...

hehe , dafür das des mein erstes Script mit ü700+ zeilen sind läuft der sehr gut hab auch wochen dran gesessen xDDD