中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-05 17:56
48,039 主题排行 / 350,124 发帖 / 今日 2 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » (已结)求VBS ,自动映射网络磁盘,并改名为 DATA
可打印版本  3,497 / 28
第1楼 beyoungse 发表于 2007-09-02 02:15
中级用户 发帖 112 积分 253
(已结)求VBS ,自动映射网络磁盘,并改名为 DATA
我用的是无盘winxp sp2 我想把用户配置文件放到网络文件夹中(开机把网络文件夹映射成本地的D:)我用批处理
net use d: \\server\%computername%$ %computername% /user:%computername%

可是批处理是用户登录后才运行的,就会出现出错。

请各位帮我写个脚本文件,用做启动脚本

我描述不清楚,我就案例子说一下

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

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

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

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


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

谢谢

[ Last edited by beyoungse on 2007-9-3 at 12:14 PM ]
第2楼 beyoungse 发表于 2007-09-02 02:16
中级用户 发帖 112 积分 253
我在服务器上建立的共享文件名称和密码都是对应下面的工作站的计算机名称
第3楼 beyoungse 发表于 2007-09-02 02:25
中级用户 发帖 112 积分 253
还有有什么更好的办法让无盘用户实现个性化,桌面配置环境及外观、快捷方式、开始菜单……

我用的是工作组
第4楼 beyoungse 发表于 2007-09-02 02:46
中级用户 发帖 112 积分 253
我现在没有办法试,不知这样可不可以

我刚看到的
把批处理放在C:\WINDOWS\SYSTEM32\GROUPOLICY\MACHINE\SCRIPTS\下面,并在此编辑SCRIPTS.INI
内容如下:
[startup]
0cmdline=批处理文件名
0parameters=
第5楼 beyoungse 发表于 2007-09-02 10:43
中级用户 发帖 112 积分 253
有没有人帮我写个脚本来的,
在这先谢谢了
第6楼 beyoungse 发表于 2007-09-02 13:33
中级用户 发帖 112 积分 253
我刚才试 第 4 楼 是不可行的
第7楼 beyoungse 发表于 2007-09-02 14:00
中级用户 发帖 112 积分 253
路过的老大,帮我一下
第8楼 beyoungse 发表于 2007-09-02 14:25
中级用户 发帖 112 积分 253
能不能说一下,如何指定用户名称和密码

下面是我用别人写的脚本

Set WshNetwork = WScript.CreateObject("WScript.Network")
Set WshShell = WScript.CreateObject("WScript.Shell")
lng_timeout=8
Wscript.Sleep lng_timeout*1000
WshNetwork.MapNetworkDrive "D:", "\\server\%computername%$"
第9楼 wudixin96 发表于 2007-09-02 14:26
银牌会员 发帖 931 积分 1,928
将共享网络驱动器添加到计算机系统中。

object.MapNetworkDrive(strLocalName, strRemoteName, [bUpdateProfile], [strUser], [strPassword])
参数
object
WshNetwork 对象。
strLocalName
表示映射驱动器的本地名的字符串值。
strRemoteName
表示共享的 UNC 名称 (\\xxx\yyy) 的字符串值。
bUpdateProfile
可选。表示映射信息是否存储在当前的用户配置文件中的布尔值。如果提供的 bUpdateProfile 的值为 true,则该映射存储在用户的配置文件中(默认值为 false)。
strUser
可选。表示用户名的字符串值。如果使用当前用户以外的其他用户的凭据来映射网络驱动器,则必须提供该参数。
strPassword
可选。表示用户密码的字符串值。如果使用当前用户以外的其他用户的凭据来映射网络驱动器,则必须提供该参数。
第10楼 beyoungse 发表于 2007-09-02 14:45
中级用户 发帖 112 积分 253
我运行时,提示 编译器错误……

还有如何改映射磁盘的卷标
第11楼 beyoungse 发表于 2007-09-02 16:03
中级用户 发帖 112 积分 253
改一下 8楼的VBS 还是不行的

Set WshNetwork = WScript.CreateObject("WScript.Network")
Set WshShell = WScript.CreateObject("WScript.Shell")
lng_timeout=8
Wscript.Sleep lng_timeout*1000
WshNetwork.MapNetworkDrive "D:", "\\server\%computername%$",“%computername%”,“%computername%”
第12楼 beyoungse 发表于 2007-09-02 16:03
中级用户 发帖 112 积分 253
运行后没有映射成功
第13楼 wudixin96 发表于 2007-09-02 16:51
银牌会员 发帖 931 积分 1,928
WshNetwork.MapNetworkDrive "D:", "\\server\%computername%$",,“%computername%”,“%computername%”

对了,那几个%computername%变量在vbs不适用吧?

[ Last edited by wudixin96 on 2007-9-2 at 04:53 PM ]
第14楼 beyoungse 发表于 2007-09-02 17:07
中级用户 发帖 112 积分 253
VBS 中怎么用变量?
第15楼 wudixin96 发表于 2007-09-02 17:30
银牌会员 发帖 931 积分 1,928
Set objComputer = CreateObject("Shell.LocalMachine")

Wscript.Echo "Computer name: " & objComputer.MachineName
1 2  下一页
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023