' 以下是連線ad並進行查詢的指令碼
const ads_scope_subtree = 4
set objconnection = createobject("adodb.connection")
set objcommand = createobject("adodb.command")
objconnection.provider = "adsdsoobject"
objconnection.open "active directory provider"
set objcommand.activeconnection = objconnection
objcommand.properties("page size") = 5000
objcommand.properties("searchscope") = ads_scope_subtree
'objcommand.properties("filter") = "user"
objcommand.commandtext = _
"select cn,pager,distinguishedname from 'ldap://ou=1_useraccount,dc=cu,dc=local' where objectclass = 'user'"
set objrecordset = objcommand.execute
objrecordset.movefirst
do until objrecordset.eof
'此處新增執行儲存過程**
'ad的使用者屬性值均通過此方法獲得
strdn = objrecordset.fields("distinguishedname").value
wscript.echo strdn
' objrecordset.movenext
loop
vbs檔案操作指令碼例項
vbs檔案操作指令碼例項 2009年11月04日 星期三 11 03 2009年10月23日 下午 02 45 1.建立乙個新的文字檔案，如果檔案已經存在則報告錯誤 rem 在當前盤根目錄下建立 測試.txt 並寫入乙個字串 vbs dim fso,file,filename vbs filenam...
VBS 常用指令碼
將域使用者或租新增到本地組 set objgroup getobject winnt administrators set objuser getobject winnt testnet engineers objgroup.add objuser.adspath 修改本地管理員密碼 set obj...
vbs 指令碼學習
最近一直學習指令碼技術，上次初步學習了bat批處理，現在順勢了解了下vbs指令碼。vbs是vb語言的乙個縮影。該語言不需要編譯，可以直接在windows作業系統上解釋執行，效率很高。由於語法簡單，靈活高效，功能強大，所以很值得研究。該語言提供了大部分vb語言所提供的功能，但是描述能力比較弱，所以就是...