עבודה מול Active Directory ב- VB

עבודה מול Active Directory ב- VB

שלום אני בעיצומו ולקראת סיומו של פרוייקט VB שעובד מול Active Directory. רוב הפונקצויות עובדות לי מצוין, מלבד כמה דברים שלא עובדים: כשאני בודק את הערך של objUser.isAccountLocked הוא נותן False גם אם היוזר נעול וגם אם לא, ונראה כי אין קשר בין מצבו של היוזר לאם הוא נעול או לא. לעומת זאת, אני כן מצליח לשחרר יוזר נועל על ידי הצבת objUser.isAccountLocked = false objuser.setInfo ואז זה משחרר מנעילה אותו בלי בעיה, אבל עדיין אין לי דרך לבדוק את הערך שלו (כלומר, לקבל אינדיקציה אם הוא נעול או לא לפני שאני משחרר אותו). *** בעיה שניה - איך אני יכול למצוא אובייקט לפי מאפיינים שלו? למשל, אם יש אובייקט יוזר ב- Active Directory שהשם שלו זה 123456, והשם תצוגה שלו זה "אלעד אברון", ואני רוצה למצוא את האובייקט לפי שם התצוגה שלו (קחו בחשבון שיש ב- OU קצת יותר מאלפיים אובייקטים). לופ נשמע לי אופציה לא הגיונית בעליל. *** בעיה שלישית - איך אני מוצא מצב של אובייקט מחשב ב- Active Directory, כלומר, Disabled או Enabled - ואיך אני משנה אותו? ניסיתי כמה דברים וזה לא עבד. אשמח לתגובות ורעיונות. -אלעד
 
למעלה