寻求使用ASP代码管理LDAP内容的代码

besro

目前只找到通过VBScript读取LDAP目录类的代码：

1. Set conn = CreateObject("ADODB.Connection")
   
2. conn.provider ="ADsDSOObject"
   
3. conn.open "Active Directory Provider"
   
4. Set Com = CreateObject("ADODB.Command")
   
5. Set Com.ActiveConnection = conn
   
6. Com.CommandText ="select * from 'LDAP://***.***.***.***/cn=***,o=***'"
   
7. Set rs = Com.Execute
   
8. 
   
9. dim outstr
   
10. 
    
11. Do While Not rs.EOF
    
12.    ReturnValue = rs(0)
    
13.        outstr=outstr & ReturnValue &vbcrlf
    
14.    rs.MoveNext
    
15. Loop
    
16. rs.Close
    
17. conn.Close
    
18. Set rs = Nothing
    
19. Set conn = Nothing
    
20. 
    
21. msgbox vbcrlf&outstr
    

复制代码

但是没找到删除、写入的代码……