Frage : VBScript, zum zu überprüfen, ob ein Konto dann existieren, welches memebership es hat

könnte jemand bei diesem kleinen Index helfen?

I morgens sure dieses konnte ein einfaches sein wenn dann Problem.  Aber, haben keine Idee von, wie zu start.

the atached Index entworfen ist, um 2 Gebiete zu suchen und die Mitgliedschaft für Konten mit dem gleichen Namen zurückzubringen. wenn beide Konten CS-Gebiet (ANZEIGE win2003) und CSC Gebiet (NT4) dann existieren, lässt das spript großes laufen.   es bringt eine Mitteilung zurück, die zeigt, welche Mitglieder Schiff die Konten haben.  aber, wenn 1 Gebietskonto nicht es Störungen heraus existiert, anstatt, gerade heraus sich zu setzen, dass das Konto nicht exist. tut 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:

Dim UserObj
Schwaches GroupObj

UserString = InputBox („der Benutzername, den Sie überprüfen möchten“)


DomainString= " CSC "
        Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. DomainString u. „Gruppen-Mitgliedschaft“ u. VbCrLf
        Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. VbCrLf
UserObj = GetObject einstellen („WinNT: /“ u. DomainString u. „/“ u. UserString)
    
    Für jedes GroupObj in UserObj.Groups
        Liste = Liste u. GroupObj.Name u. VbCrLf
    Zunächst


DomainString= " CS "
        Liste = Liste u. VbCrLf
        Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. DomainString u. „Gruppen-Mitgliedschaft“ u. VbCrLf
        Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. VbCrLf
UserObj = GetObject einstellen („WinNT: /“ u. DomainString u. „/“ u. UserString)
    
    Für jedes GroupObj in UserObj.Groups
        Liste = Liste u. GroupObj.Name u. VbCrLf
    Zunächst

Antwort : VBScript, zum zu überprüfen, ob ein Konto dann existieren, welches memebership es hat

Hallo, addiert ich die Fehlerprüfung, um um Ihr Problem zu erhalten.  Auch sehend, während der Code außer dem DomainString kopiert, gesetzt ich in eine Schleife mit einer Reihe für die Domain Name.

Respekt,

Rob.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

Schwaches UserObj
Schwaches GroupObj

UserString = InputBox („der Benutzername, den Sie überprüfen möchten“)

arrDomains = Reihe („CSC“, „CS“)

Für jedes DomainString in den arrDomains
	'DomainString= " CSC "
	Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. DomainString u. „Gruppen-Mitgliedschaft“ u. VbCrLf
	Liste = Liste u. „********************************************** „u. VbCrLf
	Liste = Liste u. VbCrLf
	Auf Störungs-Zusammenfassung zunächst
	UserObj = GetObject einstellen („WinNT: /“ u. DomainString u. „/“ u. UserString)
	Wenn Err.Number = 0 dann
		Auf Störung Goto- 0
		Für jedes GroupObj in UserObj.Groups
			Liste = Liste u. GroupObj.Name u. VbCrLf
		Zunächst
	Sonst
		Err.Clear
		Auf Störung Goto- 0
		Liste = Liste u. „Benutzer existiert nicht von“ u. DomainString
	Beenden wenn
Zunächst

WScript.Echo Liste
Weitere Lösungen  
 
programming4us programming4us