Dim i As Integer
Set conn = New ADODB.Connection
conn.Provider = "ADSDSOObject"
conn.Open "ADs Provider"
Set RS = conn.Execute( _
"<LDAP://servername/o=orgransise>;" _
& "(objectClass=*);sn,mail;subtree")
While Not RS.EOF
Debug.Print RS.Fields(0).Value
RS.MoveNext
Wend
但是不知為甚麼 整個程式也沒問題 但卻print 入面的內容 為null 我試過用recordcount 去看
是有數字的@@ 這是不是代表我連接成功呢?
有人說這是因為vb6 不提供連接其他 非ms 平台的關係
到底這是真的 這是因為我的連接方法有問題?