VB-Skript: User-IP-Adressen für Druckermapping nutzen

[chrini1 10]

Hallo zusammen,

 

in einer W2003 Domäne (native Mode) mit AD baue ich gerade an einem neuen Anmeldeskript für unsere User.

 

Die Herausforderung ist, dass je nachdem WO der User sich befindet, andere Drucker gemappt werden sollen. Die Unterscheidung soll auf IP-Adressen basieren.

 

Standort 1: 172.16.1.x

Standort 2: 172.16.10.x

VPN/RAS: 172.16.99.x

 

Wie ich Drucker mappe ist mir klar, aber wie unterscheide ich nach IP-Adressen?

 

Danke für Eure Hilfe,

Christian

[Cybquest 36]

So in der Art z.B. ...

 

	Set wmi = GetObject("winmgmts://" & ComputerName)
wql = "select * from win32_NetworkAdapterConfiguration where IPEnabled = true"
Set ergebnis = wmi.ExecQuery(wql)
For Each karte in ergebnis
	strIP(cntKarte) = karte.IPAddress
	strMAC(cntKarte) = karte.MACAddress
	cntkarte = cntkarte + 1
Next

 

Wenn mehrere Adapter vorhanden sind, muss halt der richtige hergenommen werden für eine entspr. Abfrage.

[blub 115]

besser noch richtest du AD-Sites ein, anhand derer du dann die Zuordnung vornimmst. zur Abfrage ist adsyteminfo eine geeignete Methode

 

cu

blub

[Johannes80 10]

also ich hab das bei mir in der Firma so gelöst:

 

kleines Batchfile das die lokale IP ermittelt und dann mit der netzadresse eines Standortes vergleicht. Mit Sites arbeiten wir zwar, allerdings kann eine Site ja auch mehrer Subnetze enthalten, was sie für diese zuordnung unbrauchbar macht!

 

for /f "Tokens=2 Delims=[] skip=1" %%i in ('ping -n 1 %computername%') do set IPAdress=%%i
set IPAdress=%IPAdress:~0,11%
if %IPAdress% == 192.168.10. goto logon_Standort1
if %IPAdress% == 192.168.12. goto logon_Standort1
if %IPAdress% == 192.168.156 goto logon_Standort2
if %IPAdress% == 192.168.31. goto logon_Standort3
if %IPAdress% == 192.168.150 goto logon_Standort4
goto logon_all

 

hth. Joe