中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-06-20 06:15
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 映射网络磁盘的启动脚本, ComputerName 变量有问题??? 查看 1,819 回复 15
楼 主 映射网络磁盘的启动脚本, ComputerName 变量有问题??? 发表于 2007-09-03 15:27 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
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 发表于 2007-09-03 15:42 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
在调试中是完全正常的。
可是在windows 启动脚本中没有出现网络磁盘D:
3 发表于 2007-09-03 15:57 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
去掉On error resume next看看有没有错误……
启动前执行是执行了,关键是是不是要启动以后才有效。
4 发表于 2007-09-03 16:36 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
5 发表于 2007-09-03 16:37 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
提示没有共享路径
6 发表于 2007-09-03 16:39 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
7 发表于 2007-09-03 17:02 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
可以用IP 做启动脚本的变量不?

客户机IP是:
192.168.10.2……192.168.10.41

请各位老大支招
8 发表于 2007-09-03 17:40 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
顶上去,看一下
9 发表于 2007-09-03 19:27 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
你进去了运行是不是就可以了?
没有登陆的话是不是就找不到网络路径?

如果这样的话,脚本没有问题,是没有登陆访问不到的……
10 发表于 2007-09-03 19:57 ·  中国 江西 南昌 电信
初级用户
★★
积分 193
发帖 98
注册 2007-01-17 11:56
19年会员
UID 76803
性别 男
状态 离线
....试试BAT映射
这家伙很聪明 什么都没留下
11 发表于 2007-09-04 11:01 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
VBS怎么判断网络初始化完成后(一直等待计算机名可用),再进行挂网络盘...
12 发表于 2007-09-04 13:19 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
登陆后启动不行麽?
13 发表于 2007-09-04 14:03 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
不行的,我漫游了用户配置文件
14 发表于 2007-09-04 14:12 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
sleep挂起一段时间吧
15 发表于 2007-09-04 14:57 ·  中国 广东 深圳 电信
中级用户
★★
积分 253
发帖 112
注册 2005-12-20 00:31
20年会员
UID 47500
状态 离线
挂起30秒,运行也报错




下面就是第10行

objNetwork.MapNetworkDrive "d:","\\server\A" & strCompName & "$",,"A" & strCompName, "A" & strCompName
论坛跳转: