婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 枚舉域內計算機個數vbscript腳本（沒環境，沒測試）

枚舉域內計算機個數vbscript腳本（沒環境，沒測試）
熱門標簽：百度地圖標注怎么卸載 新密防封卡外呼系統違法嗎 海外美發店地圖標注 加盟電銷機器人好的品牌 前鋒辦理400電話申請 外呼營銷下單系統 打電話的外呼系統貴不貴 陜西高頻外呼回撥系統哪家好 辦理膠州400電話財稅
原來是微軟專家的代碼在這：
http://www.microsoft.com/china/technet/community/scriptcenter/resources/hey060127.mspx
我改成了全自動式的，不需要手要修改域的adsi連接字符串了，代碼：
復制代碼 代碼如下:

On Error Resume Next
Set objRootDSE = GetObject("LDAP://rootDSE")
strDomain = ObjRootDSE.Get("defaultNamingContext")
Const ADS_SCOPE_SUBTREE = 2
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") = 1000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE
objCommand.CommandText = _
"SELECT Name FROM 'LDAP://" strDomain "' WHERE objectCategory='computer'"
Set objRecordSet = objCommand.Execute
Wscript.Echo objRecordSet.RecordCount
您可能感興趣的文章:
  • ASP、vbscript編碼模板
  • ASP中一個用VBScript寫的隨機數類
  • 利用vbscript腳本修改文件內容，此適用于自動化的操作中
  • asp,VBscript語法錯誤,史上最全最詳細最精確
  • vbscript腳本編程教程2利用fso來進行文件操作
  • 使用vbscript腳本在表單中進行選擇的代碼
  • 用vbscript腳本實現返回 IP 配置數據的代碼
  • ASP里面令人震撼地Debug類（VBScript）
  • 調試JavaScript/VBScript腳本程序（IE篇）
  • JavaScript/VBScript腳本程序調試（Wscript篇）
  • ASP/VBScript中CHR(0)的由來以及帶來的安全問題分析
  • ASP(VBScript)中整除和取余
  • ASP基礎知識VBScript基本元素講解
  • ASP基礎入門第四篇(腳本變量、函數、過程和條件語句)

標簽：武威 阜陽 咸陽 伊春 四平 梅州 牡丹江 河南

巨人網絡通訊聲明：本文標題《枚舉域內計算機個數vbscript腳本（沒環境，沒測試）》，本文關鍵詞  枚舉,域內,計算機,個數,；如發現本文內容存在版權問題，煩請提供相關信息告之我們，我們將及時溝通與處理。本站內容系統采集于網絡，涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《枚舉域內計算機個數vbscript腳本（沒環境，沒測試）》相關的同類信息！
  • 本頁收集關于枚舉域內計算機個數vbscript腳本（沒環境，沒測試）的相關信息資訊供網民參考！
    • 推薦文章
    主站蜘蛛池模板： 遵义县| 江山市| 洪湖市| 浦东新区| 夏津县| 纳雍县| 东至县| 汽车| 徐闻县| 南康市| 汽车| 增城市| 浮山县| 衡阳县| 平谷区| 武鸣县| 深州市| 本溪| 化隆| 普洱| 治多县| 仁寿县| 古蔺县| 桂阳县| 福安市| 会泽县| 信丰县| 麻江县| 肃南| 茶陵县| 卢氏县| 乌拉特后旗| 久治县| 隆子县| 平江县| 黔南| 焦作市| 泰宁县| 崇州市| 长乐市| 合肥市|