代码语言
.
CSharp
.
JS
Java
Asp.Net
C
MSSQL
PHP
Css
PLSQL
Python
Shell
EBS
ASP
Perl
ObjC
VB.Net
VBS
MYSQL
GO
Delphi
AS
DB2
Domino
Rails
ActionScript
Scala
代码分类
文件
系统
字符串
数据库
网络相关
图形/GUI
多媒体
算法
游戏
Jquery
Extjs
Android
HTML5
菜单
网页交互
WinForm
控件
企业应用
安全与加密
脚本/批处理
开放平台
其它
【
VBS
】
使用WSH创建桌面图标
作者:
Dezai.CN
/ 发布于
2011/6/13
/
1040
<div><span style="color: rgb(128,128,128)">'Create a Desktop ShortCut</span> <span style="color: rgb(177,177,0)">set</span> WshShell = WScript.<span style="color: rgb(177,177,0)">CreateObject</span><span style="color: rgb(102,204,102)">(</span><span style="color: rgb(255,0,0)">"WScript.Shell"</span><span style="color: rgb(102,204,102)">)</span> strDesktop = WshShell.<span style="color: rgb(102,204,102)">SpecialFolders</span><span style="color: rgb(102,204,102)">(</span><span style="color: rgb(255,0,0)">"Desktop"</span><span style="color: rgb(102,204,102)">)</span> <span style="color: rgb(177,177,0)">set</span> oShellLink = WshShell.<span style="color: rgb(102,204,102)">CreateShortcut</span><span style="color: rgb(102,204,102)">(</span>strDesktop & <span style="color: rgb(255,0,0)">"\Shortcut To Notepad.lnk"</span><span style="color: rgb(102,204,102)">)</span> oShellLink.<span style="color: rgb(102,204,102)">TargetPath</span> = <span style="color: rgb(255,0,0)">"Notepad.exe"</span> <span style="color: rgb(128,128,128)">'WScript.ScriptFullName</span> oShellLink.<span style="color: rgb(102,204,102)">WindowStyle</span> = <span style="color: rgb(204,102,204)">1</span> oShellLink.<span style="color: rgb(102,204,102)">Hotkey</span> = <span style="color: rgb(255,0,0)">"CTRL+SHIFT+N"</span> oShellLink.<span style="color: rgb(102,204,102)">IconLocation</span> = <span style="color: rgb(255,0,0)">"notepad.exe, 0"</span> oShellLink.<span style="color: rgb(102,204,102)">Description</span> = <span style="color: rgb(255,0,0)">"Shortcut To Notepad."</span> oShellLink.<span style="color: rgb(102,204,102)">WorkingDirectory</span> = strDesktop oShellLink.<span style="color: rgb(102,204,102)">Save</span> </div>
试试其它关键字
同语言下
.
使用脚本将域账号添加到客户机的本地管理员组
.
删除服务器上文件
.
主动ping服务器是否宕机
.
自动 服务器检查 的vbs脚本
.
VBS脚本发送邮件,密送多人,带附件,可更换账号密码
.
根据文件路径复制文件
.
VBA操作数据库
.
双击获取公网IP到剪贴板
.
定时运行ie浏览执行网址不显示浏览器窗口
.
批处理生成日历
可能有用的
.
使用脚本将域账号添加到客户机的本地管理员组
.
删除服务器上文件
.
主动ping服务器是否宕机
.
自动 服务器检查 的vbs脚本
.
VBS脚本发送邮件,密送多人,带附件,可更换账号密码
.
根据文件路径复制文件
.
VBA操作数据库
.
双击获取公网IP到剪贴板
.
定时运行ie浏览执行网址不显示浏览器窗口
.
批处理生成日历
Dezai.CN
贡献的其它代码
(
4037
)
.
多线程Socket服务器模块
.
生成随机密码
.
清除浮动样式
.
弹出窗口居中
.
抓取url的函数
.
使用base HTTP验证
.
div模拟iframe嵌入效果
.
通过header转向的方法
.
Session操作类
.
执行sqlite输入插入操作后获得自动编号的ID
Copyright © 2004 - 2024 dezai.cn. All Rights Reserved
站长博客
粤ICP备13059550号-3