如何做一个登录脚本做到这样？？？

[trainli]

我做一个登录脚本内容以下:
net use k: \\server\data
这样现在我想再做一个或者是在里面修改添加内容代码做成在登录用户的计算机上显示的磁盘名为：
测试。

而不是象上面那样映射后显示的为data(位于 'lzcomputer' 上)(K:)

不知道这样如何去处理呢？？？

[icuc88]

net use k: \\server\data
label K: 测试

[spark_li]

ok,楼上正解

[trainli]

但还是不明白其中语句的意思，请再解释！：）

[icuc88]

' ** 指定一个驱动器，注意需要跟上\
sDrive = "L:\"
' ** 建立一个Shell 对象，用CreateObject这个方法建立
Set oShell = CreateObject("Shell.Application")

' ** 修改对象的属性
oShell.NameSpace(sDrive).Self.Name = "SomeDes"

[trainli]

OK谢谢！

[trainli]

net use k: \\server\data
sDrive = "K:\"
Set oShell = CreateObject("Shell.Application")
oShell.NameSpace(sDrive).Self.Name = "测试"


这样写做一个.vbs文件来做登录脚本是否正确？？

[icuc88]

不正确！

net use k: \\server\data
call "script changevolname.vbs"

[trainli]

OK 马上测试

[trainli]

执行到label K: 测试 这句时提示访问遭到拒绝！不知道是什么原因！我用超级用户也一样！

[icuc88]

那就说明，label可能不能修改映射，需要用其他的方法。

[icuc88]

sDrive = "L:\"
Set oShell = CreateObject("Shell.Application")
oShell.NameSpace(sDrive).Self.Name = "SomeDes"

这个脚本可以在Win2k上面运行，win2k3不能修改。xp没有测试

[trainli]

我的服务器是win2k3的

[trainli]

icuc88(职业特种兵)
sDrive = "L:\"
Set oShell = CreateObject("Shell.Application")
oShell.NameSpace(sDrive).Self.Name = "SomeDes"
你可以为我解释一下以上怎么做到吗？还有是什么意思吗？？

[icuc88]

把我给出的三行代码，粘贴复制到记事本中，然后把文件保存为ChangeVolName.vbs

双击就可以了。

或者用命令：cscript ChangeVolName.vbs

这个是VBScript来着。