婷婷综合国产,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腳本（沒環境，沒測試）的相關信息資訊供網民參考！
    • 推薦文章
    主站蜘蛛池模板： 邢台县| 铜川市| 兴安县| 广丰县| 汨罗市| 平遥县| 津南区| 南京市| 贵阳市| 鄄城县| 安义县| 永新县| 阿克苏市| 铜陵市| 东至县| 泰顺县| 资中县| 保山市| 汝州市| 闽侯县| 扎囊县| 固镇县| 丹东市| 满城县| 花莲县| 林芝县| 玉溪市| 阳曲县| 石林| 浮梁县| 新泰市| 天气| 临洮县| 徐水县| 嵩明县| 大同市| 南和县| 洛南县| 太谷县| 永德县| 常宁市|