realslimshrimpy

you can check this code out...maybe it can help option explicit dim objRootDSE, strDNSDomain, user, username, strAD, description Set objRootDSE = GetObject("LDAP://RootDSE") strDNSDomain = objRootDSE.Get("DefaultNamingContext") username = inputbox ("Please Enter user name") strAD = "LDAP://cn=" & username & ",cn=users, " & strDNSDomain set user = getobject(strAD) description = inputbox ("please enter the description you want to change") user.put "description", description user.setinfo wscript.echo "All Done" or option explicit dim cmd, cn, rs, objRoot, objFSO, objCSV, q const FileName ="domaincomputers.csv" set cmd = createobject("ADODB.Command") set cn = createobject("ADODB.Connection") set rs = createobject("ADODB.Recordset") cn.open "Provider=ADsDSOObject;" cmd.activeconnection = cn set objRoot = getobject("LDAP://RootDSE") cmd.commandtext = "<LDAP://" & objRoot.get("defaultNamingContext") & ">;(objectCategory=Computer);" & _ "name,operatingsystem,operatingsystemservicepack, operatingsystemversion, dnsHostName;subtree" '**** Bypass 1000 record limitation **** cmd.properties("page size")=1000 set rs = cmd.execute set objFSO = createobject("Scripting.FileSystemObject") set objCSV = objFSO.createtextfile(FileName) q = """" while rs.eof <> true and rs.bof <> true objcsv.writeline(q & rs("name") & q & "," & q & rs("operatingsystem") & q & _ "," & q & rs("operatingsystemservicepack") & _ q & "," & q & rs("operatingsystemversion") & _ q & "," & q & rs("dnsHostName") & _ q & "," & q & Date() & q) rs.movenext wend objCSV.Close cn.close wscript.echo "Finished"

you can check this code out...maybe it can help option explicit dim objRootDSE, strDNSDomain, user, username, strAD, description Set objRootDSE = GetObject("LDAP://RootDSE") strDNSDomain = objRootDSE.Get("DefaultNamingContext") username = inputbox ("Please Enter user name") strAD = "LDAP://cn=" & username & ",cn=users, " & strDNSDomain set user = getobject(strAD) description = inputbox ("please enter the description you want to change") user.put "description", description user.setinfo wscript.echo "All Done"