需要一个能“把文件发送到桌面快捷方式”的程序或批处理文件，能通过打开方式调用的

随便注册

我那个用法一样，也是从打开方式里调用啊。你把文件都放到C分区根目录下，打开方式选01.bat。反正自己用，路径都直接写了。

慢是因为他用ping延时，2改0就快，但不懂作者目的，如果是预留的工作时间就不好改了。
你在百度问的？干脆也问问怎么把我那个批处理和vbs合起来，这个快点。

lepi12

随便注册 发表于 2015-9-9 01:32
我那个用法一样，也是从打开方式里调用啊。你把文件都放到C分区根目录下，打开方式选01.bat。反正自己用， ...

试了一下，的确也能完美实现，主要是因为你开始说打开方式运行会弹错我才没有用，不过刚才用时也没弹错  所以这个我也保留了，以便另一个遇到无法处理的情况时备用。

虽然要自己改下路径，不过也不算问题，其实分成两个文件也没什么问题，使用上没什么影响。
既然你提出，我去百度上再问问看，怎么把vbs直接写入批处理。

再次感谢。竟然一下子有了两个。

随便注册

弹错是指直接关联到VBS的情况，发完帖又发现可以用批处理转一道手。顺便也问问怎么直接调用VBS时不弹这个错吧。

lepi12

随便注册 发表于 2015-9-9 02:08
弹错是指直接关联到VBS的情况，发完帖又发现可以用批处理转一道手。顺便也问问怎么直接调用VBS时不弹这个错 ...

反馈一个小问题吧 虽然也没什么大影响
就是批处理里面的vbs路径貌似不能使用带有空格的，所以我放在没有空格的路径下了，也许把vbs直接写入批处理能规避这个问题。

随便注册

bat？用引号括起来即可。

"C:\02.vbs" %1
或
start "" "C:\02.vbs" %1

用start启动程序，批处理不等待所启动的程序关闭，就是自顾自的运行，完了就退出。这里因为vbs关得快看不出来，所以两种写法差不多。
但start没引号没事，如有引号，则第一对引号是标题，第二对引号才是程序。所以第一对引号不能省略，这里留空了。

翼风Fly

我说怎么略有蹊跷。。。原来楼主开了两个帖子。。。

我解释一下那人写的东东吧...

[mw_shl_code=shell,true]
@echo off
::拖拽文件到该批处理图标上即可

::获取用户桌面地址
for /f "tokens=2,*" %%i in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop"') do set "desk=%%j"
set "LnkFile=%desk%\%~n1.lnk"
::获取文件地址
set "TargetPath=%~1"
::调用标签（拖慢速度）
call :CreateShort "%LnkFile%" "%TargetPath%"
::拖慢速度+2
ping /n 2 0 >nul & exit
::创建标签
:CreateShort
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""%~1""):b.TargetPath=""%~2"":b.Save:close")
goto :eof
[/mw_shl_code]

创建快捷方式的方法来自：
http://www.bathome.net/thread-11050-1-1.html 4楼（说了N次，别只看1楼啊。。。）

算了贴过来：

[mw_shl_code=shell,true]@echo off
set SrcFile=C:\test\a.txt
set LnkFile=D:\test\b.txt
call :CreateShort "%SrcFile%" "%LnkFile%"
goto :eof

:CreateShort
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""%~2.lnk""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Save:close")[/mw_shl_code]

::CreateShort的属性参数（你就知道上面那段在说什么了）：
::Arguments              目标程序参数
::Description            快捷方式备注
::FullName               返回快捷方式完整路径
::Hotkey                 快捷方式快捷键
::IconLocation           快捷方式图标，不设则使用默认图标
::TargetPath             目标
::WindowStyle            窗口启动状态
::WorkingDirectory       起始位置
[/mw_shl_code]


@随便注册

lepi12

翼风Fly 发表于 2015-9-9 08:44
我说怎么略有蹊跷。。。原来楼主开了两个帖子。。。

我解释一下那人写的东东吧...

谢谢啊  不明觉厉
我的提问被众高手眷顾 还真是受宠若惊啊

风之咩~

lepi12 发表于 2015-9-9 09:45
谢谢啊  不明觉厉
我的提问被众高手眷顾 还真是受宠若惊啊

标题看着眼熟我就进来围观了

lepi12

风之咩~ 发表于 2015-9-9 12:01
标题看着眼熟我就进来围观了

额，不好意思啊！当时是因为迟迟没等来回复，也不知道会不会等来，所以就换了个方式又发了另一个帖子，给各位高人添麻烦了了，实在抱歉

风之咩~

lepi12 发表于 2015-9-9 15:11
额，不好意思啊！当时是因为迟迟没等来回复，也不知道会不会等来，所以就换了个方式又发了另一个帖子，给 ...

当初没看清你要求
其实直接按照源文件名往桌面创建快捷方式比写那种更简单…