中国DOS联盟

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

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

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 如何把网络共享路径发送到桌面？

leton
初级用户

积分 170
发帖 72
注册 2007-3-11
状态离线

『楼主』: 如何把网络共享路径发送到桌面？

映射盘已经做了，但还是不方便，想再人性化点，把共享目录路径也映射到桌面上，搜索看到 VBS 方式实现帖子，但测试后，发现些问题：

1.VBS
Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") :'特殊文件夹“桌面”
set oShellLink = WshShell.CreateShortcut(strDesktop & "\网络共享.lnk")
oShellLink.TargetPath = "\\aaa\域用户目录" : '目标
oShellLink.WindowStyle = 3 :'参数1默认窗口激活，参数3最大化激活，参数7最小化
oShellLink.Hotkey = "Ctrl+Alt+e" : '快捷键
oShellLink.IconLocation = "fsmgmt.msc" : '图标
oShellLink.Description = "记事本快捷方式" : '备注
oShellLink.WorkingDirectory = strDesktop : '起始位置
oShellLink.Save : '创建保存快捷方式

问题如下：
我共享得目录都是以用户名称创建，如：
张三，登录名：ZS，目录共享名=共享目录-ZS$
李四，登录名：LS，目录共享名=共享目录-LS$

映射盘 P 用 ‘共享目录-%username%$’ 方式完成并得到：

共享目录-ZS
共享目录-LS

但用下面得 VBS 再为客户端创建桌面快捷方式时，%username% 没法用，要如何解决？

set oShellLink = WshShell.CreateShortcut(strDesktop & "\网络共享.lnk")

这里想实现创建以当前用户登录名作为快捷方式名称....

oShellLink.TargetPath = "\\aaa\域用户目录" : '目标

1.这里想实现以当前登录用户名作为共享目录名称（按共享规则自动链接到各自对应用户目录）

2.还有，如果想实现判断网络路径是否能链接，链接执行P，否则退出，如何写？搜索没找到关于判断网络帖子

VBS 弱弱，唉

[ Last edited by leton on 2007-7-3 at 12:59 PM ]

2007-7-3 11:27

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 2 楼』:

Quote:

Originally posted by leton at 2007-7-3 11:27:
VBS 弱弱，唉

哎~不想回答了....环境变量VBS可以用^不要那P那套直接扔到VBS里^
自己搜索下,绝对有结果...

2007-7-3 15:11

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: