将以下代码保存成bb.vbs文件。 Set objOU = GetObject("LDAP://CN=Users,dc=etunion,dc=com") Const ForReading = 1Set objFSO = CreateObject("Scripting.FileSystemObject")Set objTextFile = objFSO.OpenTextFile("a.txt", ForReading)'文件格式'帐号,显示名称'如:test,测试' zhenghai,曾海 Do Until objTextFile.AtEndOfStream strNextLine = objTextFile.Readline arrL...
[ 查看全文 ]