AD MemberOf
Ambróz Zoltán
sysadmin at rszi-zirc.hu
2011. Okt. 6., Cs, 10:13:10 CEST
Sziasztok, (kicsit hosszu lesz...)
bejelentkezeskor az megosztasok, nyomtatok, stb. felcsatolasat egy scripttel oldottam meg, ami a gepek nagy reszenel megy is (egeszen pontosan ~250-bol 2 gepnel nem), azaz nagy valoszinuseggel nem programozasi hiba.
Az eroforrasok hozzarendelese - celszeruen - csoportba tartozas alapjan dol el, a lekerdezes az AD-t kerdezi le, a kezdetekben sima LDAP alapon:
var adSysInfo = new ActiveXObject("ADSystemInfo");
var strUser = adSysInfo.UserName; // pl. "CN=Teszt.Elek,OU=Users,DC=suli,DC=local"
var objUser = GetObject("LDAP://" + strUser);
A csoportba tartozas az objektum memberOf properties-ben jelenik meg felsorolas, vagy string alakban.
Ezzel metodussal mentunk evekig hiba nelkul, majd eloszor az egyik , kesobb mindket gepen az LDAP hivas "Unknown exception" [0x80040E14] kivetel generalt, es mivel a script elejen van, a hozzarendelesek nem tortentek meg. (Az egyik gep az ig.h-nal, a masik a ber-munkaugyon van.) Probaltam javitani a dolgon ezzel: http://www.computerperformance.co.uk/Logon/code/code_80040E14.htm, de fel sikerrel.
Kicsereltem a kodot ADODB lekerdezesre:
var objCommand = new ActiveXObject("ADODB.Command");
...
objCommand.CommandText = "<LDAP://" + strUser + ";(&(objectCategory=person)(objectClass=user));memberOf;subtree>";
...
var objRecordSet = objCommand.Execute();
Es ez is elszall. A ket gepen "milliomegy" alkalmazas van telepitve (Ber-Kifir-Menza-Tanulonyilvantartas-Adafor,...), van amelyikhez mi nem is nyulhatunk.
Volt mar vkinel hasonlo eset?
Koszi, AZ
További információk a(z) Techinfo levelezőlistáról