VB创建快捷方式的简易方法--运用Wscript.Shell
来源:互联网 发布:ip与mac绑定设置 编辑:程序博客网 时间:2024/05/23 18:33
Sub SetShortCut(ByVal lnkTarget As String, ByVal lnkFilePathName As String)
On Error Resume Next
'By 同济黄正 http://fine3x.com
Dim Lnk As Object
Set Lnk = CreateObject("Wscript.Shell").CreateShortcut(lnkFilePathName)
If Lnk Is Nothing Then Exit Sub ' MsgBox "不支持Wscript.Shell。", vbCritical:
Lnk.TargetPath = lnkTarget
Lnk.Save
Set Lnk = Nothing
End Sub
- VB创建快捷方式的简易方法--运用Wscript.Shell
- VBscript 中 WScript.Shell的使用 设置快捷方式
- VBS不能创建WScript.Shell的解决办法
- 无法创建名为“WScript.Shell”的对象
- WScript.Shell创建失败
- 使用命令行WScript和vbs创建快捷方式
- 如何应对new ActiveXObject("WScript.Shell")创建失败的问题
- VB.NET创建快捷方式和读取快捷方式的类
- VB.NET创建快捷方式和读取快捷方式的类
- WScript.CreateObject(WScript.Shell)
- windows shell 创建快捷方式和读取快捷方式的代码
- wscript.shell
- wscript.shell
- 利用Shell创建快捷方式
- 转载 automation服务器不能创建对象 与 客户端'WScript.Shell'执行exe的例子
- automation服务器不能创建对象与客户端'WScript.Shell'执行exe的例子
- 无wscript.shell组件时的辅助
- WScript.Shell对象的run和exec
- 搜索条件
- 文件锁
- 电子邮件管理办法新规定:滥发邮件可罚3万
- 对比.NET PetShop和Duwamish来探讨Ado.NET的数据库编程模式[转贴]
- JSP实用篇
- VB创建快捷方式的简易方法--运用Wscript.Shell
- Programmatic Interaction with Control Panel using VS.Net 2005
- 时间,日期和本地化函数
- JSP问答
- Microsoft Visual Studio 2005 Team System Web 测试简介
- 关于面试与加薪
- 搜索条件
- 模拟收发LOTUS邮件的连接错误解决方案
- 06.2.22曾经期盼的手提电脑