//给文件夹内创建快捷方式 比如:给c盘下的TEMP目录下的D文件夹创建快捷方式
<script language="javascript">
function shortcut()
{
var fso=new ActiveXObject("Scripting.FileSystemObject");
var shell=new ActiveXObject("WScript.Shell");
var tagFolder="c://temp//d";
if(!fso.FolderExists(tagFolder))
{
fso.CreateFolder(tagFolder);
alter("success!")
}
if(!fso.FileExists(tagFolder+"//移动缴费.lnk"))
{
var link=shell.CreateShortcut( tagFolde+"//移动缴费.lnk");
link.Description="打开一个程序的快捷方式";
link.TargetPath="http://192.105.179.168:8080/hy_fee";
link.WindowStyle=3;
link.WorkingDirectory="c://blah";
link.Save();
}
</script>
//给桌面创建快捷方式
<script language="javascript">
function shortcut()
{
var shell=new ActiveXObject("WScript.Shell");
var link=shell.CreateShortcut( WshShell.SpecialFolders("Desktop") +"//移动缴费.lnk");
link.TargetPath="http://192.105.179.168:8080/hy_fee";
link.WindowStyle=3;
link.Save();
}
</script>