mhgd 发表于 2008-5-18 19:45:37

au3如何完成该任务？？？

比如实现映射驱动器后,在我的电脑中显示共享文件夹的位置,想自定义另外的名称,如何实现.就象手工修改一样.
利用下面的脚本可以的:

Set objNet = CreateObject("Wscript.Network")
strCompName = objnet.ComputerName

Set objNetwork = CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "Y:","\\192.168.1.200\Movie", ,"user","password"

'新的磁盘名称
strNewName = "最新本地电影"   

'映射盘的盘符
strDriveLetter = "Y:"

'更改映射盘的名称
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace(strDriveLetter).Self.Name = strNewName



以上是VBS脚本，如果转换成AU3脚本呢！！！

高手请指教!!!

[ 本帖最后由 mhgd 于 2008-5-26 15:19 编辑 ]

sanhen 发表于 2008-5-18 20:21:22

这个与AU3内置的DriveMapAdd ()函数有何区别呢？

Bone 发表于 2008-5-18 20:26:26

可以使用ObjCreate()来创建COM对象

asdf 发表于 2008-5-18 20:56:41

使用内置的就可以了……

mhgd 发表于 2008-5-18 21:51:42

原帖由 sanhen 于 2008-5-18 20:21 发表 http://www.autoitx.com/images/common/back.gif
这个与AU3内置的DriveMapAdd ()函数有何区别呢？


好像无法完成红色部分功能!!!

asdf 发表于 2008-5-18 22:00:07

DriveMapAdd("Y:","\\192.168.1.200\Movie", 0 ,"user","password")
DriveSetLabel("Y:","最新本地电影")

asdf 发表于 2008-5-18 22:03:07

这样就把\\192.168.1.200\Movie映射成Y，并且修改标签为最新本地电影

mhgd 发表于 2008-5-25 18:47:28

DriveSetLabel("Y:","最新本地电影")

这一句好像不行，对真实盘有效，但在这里没效果！！！

马甲 发表于 2008-5-25 22:06:59

$objNet = ObjCreate("Wscript.Network")
$strCompName = $objNet.ComputerName
$objNetwork = ObjCreate("WScript.Network")
$objNetwork.MapNetworkDrive("Y:","\\NICE\SYSFANS")
$strNewName = "最新本地电影"   
$strDriveLetter = "Y:"
$objShell = ObjCreate("Shell.Application")
$objShell.NameSpace($strDriveLetter).Self.Name = $strNewName

mhgd 发表于 2008-5-26 15:13:26

多谢大家的帮忙，问题已经解决了，楼上的代码还是不完美，
objNetwork.MapNetworkDrive "Y:","\\192.168.1.200\Movie", ,"user","password"
$objNetwork.MapNetworkDrive("Y:","\\NICE\SYSFANS")
没有加用户名，应改为：$objNetwork.MapNetworkDrive("Y:","\\192.168.1.200\dw",0,"user","password")
以下是本人的拼接代码：
$strNewName = "最新本地电影"   
$strDriveLetter = "Y:"
DriveMapAdd("$strDriveLetter","\\192.168.1.200\dw", 0 ,"user","password")
$objShell = ObjCreate("Shell.Application")
$objShell.NameSpace($strDriveLetter).Self.Name = $strNewName

[ 本帖最后由 mhgd 于 2008-5-26 15:37 编辑 ]

木纳 发表于 2008-5-27 12:02:30

学习...
也正在看磁盘映射的内容,
谢谢LZ及各位了.
页: [1]
查看完整版本: au3如何完成该任务？？？