CTOCIO IT专家网

天极传媒 比特网 | 天极网 | IT专家网 | IT商网 | 52PK游戏网 | 手机天极 | IT分众 |
IT专家网搜索

您现在的位置: IT专家网 > WinSystem子站 > 技巧

能够找回远程驱动器映射和打印机的脚本

作者: Rod Trent,  出处:TechTarget, 责任编辑: Harte, 
2005-08-16 08:44
  使用这个VB脚本能够连接到远程计算机并找回网络驱动器的映射和打印机。

  使用这个VB脚本能够连接到远程计算机并找回网络驱动器的映射和打印机。

  由于这个脚本是远程操作,你需要遵循建立一个远程WSH例子的步骤。这可以使用WSH 5.6或更高的版本。要想回顾一下如何安装一个远程WSH的例子,可以阅读这篇文章:安装远程WSH

  注意:要确保在你的工作站上拥有最新的脚本引擎,你可以运行下面提供的脚本。下载最新的脚本引擎请点击这个链接:微软脚本主页

==================================
CompName = inputbox("enter computer name")
Set Connect = GetObject("WinNT://"&CompName)
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set oDrives = WshNetwork.EnumNetworkDrives
Set oPrinters = WshNetwork.EnumPrinterConnections
WScript.Echo "Network drive mappings:"
For i = 0 to oDrives.Count - 1 Step 2
WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1)
Next
WScript.Echo
WScript.Echo "Network printer mappings:"
For i = 0 to oPrinters.Count - 1 Step 2
WScript.Echo "Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1)
Next
==================================

  注意:当你使用活动目录服务接口(Active Directory Services Interface ,ADSI)工作的时候,你必须拥有相同的可用权力,就如同你使用内建的管理工具一样。

 

网友评论

笔名 
请您注意:遵守国家有关法律、法规,尊重网上道德,承担一切因您的行为而直接或间接引起的法律责任。    IT专家网友拥有管理笔名和留言的一切权利。
  • 周排行榜
  • 月排行榜

邮件订阅

天极服务 | 关于我们 | 网站律师 | 加入我们 | 联系我们 | 广告业务 | 友情链接 | 我要挑错
All Rights Reserved, Copyright 2004-2008, Ctocio.com.cn
渝ICP证B2-20030003号 如有意见请与我们联系 powered by 天极内容管理平台CMS4i