שאילת LDAP דרך VB....

[raz248]

שאילת LDAP דרך VB....

היי מה קורה? אם אני רוצה לעשות שאילתת LDAP (דרך active directory) דרך תוכנית VB.... יש לכם מושג איך?

 

[ארזירון]

בעיקרון

צריך סוג של אובייקט - למשל כל מה שמתחיל ב-IADS....

Set oRoot = GetObject("LDAP://rootDSE") sDomain = oRoot.Get("defaultNamingContext") Set oDomain = GetObject("LDAP://" & sDomain)​

אפשר לעשות גם getobject לאובייקטים אחרים כגון משתמש, מחשב, או כל דבר אחר....IADS זה בעצם interface של directory services..... מצד שני, אם מדובר ב-MS AD אז אפשר להשתמש ב-ADO כדי להריץ שאילתות ישר מול AD....

conn.Open "Data Source=Active Directory Provider;Provider=ADsDSOObject"​

ואז להריץ שאילתות בפורמט מסוים - LDAP Query....

 

[raz248]

טנקס אני אבדוק ../images/Emo13.gif

 

[raz248]

עוד שאלה קטנה...

איך אני יוצר קבצי excel? אני רוצה ליצור, לשמור מידע בקובץ לפתוח אותו אחר כך.... יש לכם מושג איך עושים את זה?

 

[עוד מעט וסקלוני]

פה יש 2 דוגמאות קוד

http://www.dr-vb.co.il/search.php?what=excel&field=1

 

[ארזירון]

מספר אופציות

הראשונה היא קובץ טקסט פשוט מופרד בפסיקים (ולכן זה יהיה CSV שאקסל פותח ומפרמט ללא בעיות) השנייה היא להשתמש באובייקט של אקסל כדי לייצר קובץ - משהו בסגנון של

set olexcel = createobject("excel.application")​