如何使用vbscript从Oracle Internet目录获取所有用户？

如何使用vbscript从Oracle Internet目录获取所有用户？

据我所知，OID只是另一个LDAP服务，因此我假设可以使用类似以下代码查询它：

Const ADS_SCOPE_SUBTREE = 2

Set conn = CreateObject("ADODB.Connection")
Set cmd =   CreateObject("ADODB.Command")
conn.Provider = "ADsDSOObject"
conn.Open "Active Directory Provider"
Set cmd.ActiveConnection = conn

cmd.Properties("Page Size") = 1000
cmd.Properties("Searchscope") = ADS_SCOPE_SUBTREE 

cmd.CommandText = "SELECT Name FROM 'LDAP://dc=test,dc=com' WHERE objectCategory='user'"
Set rec = cmd.Execute

rec.MoveFirst
Do Until rec.EOF
    Wscript.Echo rec.Fields("Name").Value
    rec.MoveNext
Loop

---

但是将LDAP://dc=test，dc=com更改为正确绑定到它所需的内容。

如何检索他们的密码？是否需要将名称更改为userpassword以及objectCategory？对于其他用户属性，

objectCategory

将保持不变，但我假设您将无法获取密码，因为这将是不安全的。您可以使用类似于

SetPassword

的方法更改密码。OID用户密码属性称为UserPassword。