中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-05 19:27 		共 48,039 主题排行 / 350,124 发帖 / 今日 2 篇 / 48,251 会员排行
DOS批处理 & 脚本技术（批处理室） » 映射网络磁盘的启动脚本, ComputerName 变量有问题？？？
可打印版本 　1,948 / 15
第1楼　beyoungse 发表于 2007-09-03 15:27
中级用户　发帖 112　积分 253
映射网络磁盘的启动脚本, ComputerName 变量有问题？？？
V BS 是在windows 用户登录前运行的程序。但是我指定了启动脚本，没有运行！？？



启动脚本作用：
我描述不清楚，我就案例子说一下

数据服务器计算机名 server
共享名 A001$、A002$、A003$ ……A040$

客户机计算机名是 001、002、003……040

访问用户名称 A001、A002、A003……A040

共享密码 A001、A002、A003……A040


最后再把映射的盘名称改一下为：DATA



#OK.VBS
On error resume next

Set objNet = CreateObject("Wscript.Network")
strCompName = objnet.ComputerName
strNewName = "data"
strDriveLetter = "d:"

' Section to map the network drive
Set objNetwork = CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "d:","\\server\A" & strCompName & "$",,"A" & strCompName, "A" & strCompName

' Section which actually (re)names the Mapped Drive
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace(strDriveLetter).Self.Name = strNewName


内容祥见：
http://www.cn-dos.net/forum/viewthread.php?tid=33234&fpage=1

[ Last edited by beyoungse on 2007-9-3 at 06:09 PM ]
第2楼　beyoungse 发表于 2007-09-03 15:42
中级用户　发帖 112　积分 253
在调试中是完全正常的。
可是在windows 启动脚本中没有出现网络磁盘D：
第3楼　slore 发表于 2007-09-03 15:57
铂金会员　发帖 2,478　积分 5,212
去掉On error resume next看看有没有错误……
启动前执行是执行了，关键是是不是要启动以后才有效。
第4楼　beyoungse 发表于 2007-09-03 16:36
中级用户　发帖 112　积分 253
第5楼　beyoungse 发表于 2007-09-03 16:37
中级用户　发帖 112　积分 253
提示没有共享路径
第6楼　beyoungse 发表于 2007-09-03 16:39
中级用户　发帖 112　积分 253
第7楼　beyoungse 发表于 2007-09-03 17:02
中级用户　发帖 112　积分 253
可以用IP 做启动脚本的变量不？

客户机IP是：
192.168.10.2……192.168.10.41

请各位老大支招
第8楼　beyoungse 发表于 2007-09-03 17:40
中级用户　发帖 112　积分 253
顶上去，看一下
第9楼　slore 发表于 2007-09-03 19:27
铂金会员　发帖 2,478　积分 5,212
你进去了运行是不是就可以了？
没有登陆的话是不是就找不到网络路径？

如果这样的话，脚本没有问题，是没有登陆访问不到的……
第10楼　luowei14 发表于 2007-09-03 19:57
初级用户　发帖 98　积分 193
....试试BAT映射
第11楼　beyoungse 发表于 2007-09-04 11:01
中级用户　发帖 112　积分 253
VBS怎么判断网络初始化完成后（一直等待计算机名可用），再进行挂网络盘...
第12楼　slore 发表于 2007-09-04 13:19
铂金会员　发帖 2,478　积分 5,212
登陆后启动不行麽？
第13楼　beyoungse 发表于 2007-09-04 14:03
中级用户　发帖 112　积分 253
不行的，我漫游了用户配置文件
第14楼　slore 发表于 2007-09-04 14:12
铂金会员　发帖 2,478　积分 5,212
sleep挂起一段时间吧
第15楼　beyoungse 发表于 2007-09-04 14:57
中级用户　发帖 112　积分 253
挂起30秒，运行也报错




下面就是第10行

objNetwork.MapNetworkDrive "d:","\\server\A" & strCompName & "$",,"A" & strCompName, "A" & strCompName
1 2 　下一页
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023