HI
I have wrote a script to check remote your Clients for the W32LoveSAN
code:
; Fenstertitel
SetTitle("Blaster Checker")
;Zählbereich bestimmen
CLS
At (0,0) "Bitte Erste Clientnummer eingeben:"
At (0,34) Gets$First ; Erste Clientnummer 3-stellig
At (1,0) "Bitte Letzte Clientnummer eingeben:"
At (1,35) Gets$Last ; Letzte Clientnummer (999)
; Client Art bestimmen
At (2,0) "Bitte Clientart eingeben:"
At (2,25) Gets$Client_Art
For $COUNTER = $First TO $Last Step 1
;Längenermittlung der Clientnummer
$Laenge = Len ($Counter)
If $Laenge = 1
$Counter_str = "00" + $Counter
EndIf
If $Laenge = 2
$Counter_str = "0" + $Counter
EndIf
If $Laenge = 3
$Counter_str = $Counter
EndIf
; Computernamen aus String erstellen
$Client = "\\" + $Client_Art + $Counter_str
; Funktion ausführen
$msblast = If Exist ("$Client\C$\winnt\system32\msblast.exe"
"$Client\C$\winnt\system32\penis32.exe" OR
"$Client\C$\winnt\system32\penis.exe" OR
"$Client\C$\winnt\system32\teekids.exe" OR
"$Client\C$\winnt\system32\root32.exe" OR
"$Client\C$\winnt\root32.exe")
;CurrentUser auslesen
$user = ReadValue ("$Client\HKEY_LOCAL_MACHINE\SOFTWARE\XX","CurrentUser")
;Ausgabe in Datei
$File = \\server\blaster.txt
;writeline
If Open( 2, "$File", 5) = 0
; WriteLine (2, Chr(10))
WriteLine (2, $Client + ";")
WriteLine (2, $user + ";")
WriteLine (2, @CRLF)
Close (2)
EndIf
EndIf
Next
But i got problems with the "If Exist" function
it only checks if the "msblast.exe" exist and then he go to the next client...
My problem is now why the check for the other files like "penis.exe" OR "penis32.exe" doesn't work??
Hope someone can help me..
And sorry for my bad english.