起步软件技术论坛-X3

 找回密码
 立即注册
搜索
12
返回列表 发新帖
楼主: rzport_jqf

【结】[请求]创建桌面快捷方式**

[复制链接]
 楼主| 发表于 2008-9-4 18:12:22 | 显示全部楼层
bat 压缩文件:

createlink.rar

663 Bytes, 下载次数: 27

回复 支持 反对

使用道具 举报

发表于 2008-9-5 09:45:27 | 显示全部楼层
应该是你的批处理有问题吧。
我把它改成下面的就好了。

@echo off

setlocal enabledelayedexpansion
if exist tmp.vbs del tmp.vbs /q

set fileName=%appdata%\Justep\X3Client\Business.exe

for %%i in ("!fileName!") do set name=%%~ni
set shortCutPath=%userprofile%\桌面
set shortCutPath="!shortCutPath!\!name!.lnk"

echo Dim WshShell,Shortcut>>tmp.vbs
echo Dim path,fso>>tmp.vbs
echo path="%fileName%">>tmp.vbs

echo Set fso=CreateObject("Scripting.FileSystemObject")>>tmp.vbs
echo Set WshShell=WScript.CreateObject("WScript.Shell")>>tmp.vbs
echo Set Shortcut=WshShell.CreateShortCut(%shortCutPath%)>>tmp.vbs
echo Shortcut.TargetPath=path>>tmp.vbs
echo Shortcut.Save>>tmp.vbs
"%SystemRoot%\System32\WScript.exe" tmp.vbs
::del tmp.vbs /s /q
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-9-5 10:08:07 | 显示全部楼层
好了. 谢谢!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-22 01:55 , Processed in 0.039451 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表