[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 自己捣鼓了个从FTP下载完一个文件之后并创建桌面快捷方式,但会出来两个窗口

从FTP下载完一个文件之后并创建桌面快捷方式,但会出来两个窗口,求大神指定,希望下载完之后自运退出并创建桌面快捷方式
  1. @echo off
  2. set ftpUser=Anonymous
  3. set ftpIP=192.0.0.0
  4. set LocalFolder=D:\
  5. set ftpFile="%temp%\TempFTP.txt"
  6. set "SrcFile=D:\123.exe"
  7. set "Args=-s -t 2"
  8. set "LnkFile=123.LNK"
  9. call :CreateShort "%SrcFile%" "%Args%" "%LnkFile%"
  10. pause & goto :eof
  11. ::Arguments              目标程序参数
  12. ::Description            快捷方式备注
  13. ::FullName               返回快捷方式完整路径
  14. ::Hotkey                 快捷方式快捷键
  15. ::IconLocation           快捷方式图标,不设则使用默认图标
  16. ::TargetPath             目标
  17. ::WindowStyle            窗口启动状态
  18. ::WorkingDirectory       起始位置
  19. :CreateShort
  20. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""DeskTop"") & ""\%~3""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Arguments=""%~2"":b.Save:close")
  21. >"%ftpFile%" (
  22. echo,%ftpUser%
  23. echo cd "%ftpFolder%"
  24. echo lcd "%LocalFolder%"
  25. echo bin
  26. echo ! echo 正在下载...
  27. echo mget *.*
  28. echo ! echo 下载结束...
  29. echo ! ping -n 10 127.1 ^>nul
  30. echo bye
  31. )
  32. start ftp -v -i -s:"%ftpFile%" %ftpIP%
复制代码

pause & 删掉

TOP

大神,偶像,谢谢帮助

TOP

返回列表