• 用批处理在桌面上创建快捷方式


        广州疯狂软件学院拥有三大课程体系包括:java课程,android课程,ios课程,疯狂软件年终钜惠,报名java就业班,免费赠送基础班,名额有限,本月火热报名中,欢迎有志之士电话或者QQ咨询。

      用批处理在桌面上创建快捷方式

      echo. 正在创建快捷方式…

      set desktop=

      :: 桌面路径

      call :__CreateDesktopPath

      :: 快捷方式一

      call :__StringCat %desktop% "汽车玻璃升降器耐久性测试系统。lnk"

      set target=%result%

      call :__StringCat %installPath% "WindowLiftDurabilityTest.exe"

      set srcFile=%result%

      call :__StringCat %srcFile% ",0"

      set icon=%result%

      call :__CreateShort %srcFile% %target% %icon% %installPath%

      echo. 安装完成, 按回车键结束… & pause > nul

      goto __success

      :: 判断语言环境

      :__Locale

      set SystemLocale=

      ver|find /i "Version">nul

      if %errorlevel% equ 0 (set SystemLocale=EN_US&goto:eof) else set

      SystemLocale=ZH_CN&goto:eof

      :: 判断系统版本

      :__Version

      set SystemVersion=

      ver|findstr "5.[0-9].[0-9][0-9]*">nul&&(set

      SystemVersion=WIN_XP&goto:eof)

      ver|findstr "6.[0-9].[0-9][0-9]*">nul&&(set

      SystemVersion=WIN_VISTA_7&goto:eof)

      :: 根据不同系统版本、不同语言环境生成"桌面"的绝对路径

      :__CreateDesktopPath

      set en_desktop="DESKTOP"

      set cn_desktop="桌面"

      call :__Locale

      call :__Version

      if %SystemLocale%==EN_US (call :__Compound %en_desktop%&goto:eof)

      if %SystemVersion%==WIN_XP (

      if %SystemLocale%==EN_US (

      call :__Compound %en_desktop% & goto :eof

      ) else (

      call :__Compound %cn_desktop% & goto :eof

      )

      ) else (

      call :__Compound %en_desktop% & goto :eof

      )

      :: 字符串合成

      :__Compound

      call :__StringCat "%USERPROFILE%" %1

      set desktop=%result%

      goto :eof

      :: 字符串连接 会自动去掉最外层的双引号后连接

      :__StringCat

      set result=

      set result=%~1%~2

      set result="%result%"

      goto :eof

      :__CreateShort

      set vbsStr="Set a=CreateObject(""WScript.Shell""):Set

      b=a.CreateShortcut(""%~2""):b.TargetPath=""%

      ~1"":b.WorkingDirectory=""%~4"":b.IconLocation=""%~3"":b.Save:close"

      mshta VBScript:Execute(%vbsStr%)

      goto :eof

      :__success

      set installPath=

      set result=

      set SystemVersion=

      set desktop=

      set SystemLocale=

      set en_desktop=

      set cn_desktop=

      set vbsStr=

      疯狂Java培训专注软件开发培训,提升学员就业能力,重点提升实践动手能力。技术知识沉淀深厚的老师,让你感受Java的魅力,激发你对于编程的热爱,让你在半年的时间内掌握8-10万的代码量,掌握Java核心技术,成为真正的技术高手;通过大量全真企业项目疯狂训练,迅速积累项目经验。让你成为技能型的现代化高端人才,迅速获得高薪就业!时间不等人,赶紧联系我们吧!疯狂java培训中心地址:广州天河区车陂沣宏大厦3楼。

      疯狂Java培训专注软件开发培训,提升学员就业能力,重点提升实践动手能力。疯狂软件开设了java课程,ios课程,android课程,为你提供一个学习java技能的好机会,疯狂软件特大优惠活动,加疯狂软件微信号(疯狂软件),抢优惠,优惠100元+赠送iOS教材一本 详情请看疯狂java培训官网。IT从业着仍是社会所需要的高端人才,广州疯狂软件之力于培养企业所需要的中高端IT人才,让你成为备受企业青睐的人才。

  • 相关阅读:
    接口 多态
    继承extends (特点、重写、覆盖、应用)抽象abstract(定义、特点、细节)
    0515 面向对象 类与对象、局部、成员变量、基本、引用类型、封装 private 和this 及应用
    Eclipse 快捷键
    Flutter Framework启动代码阅读
    Flutter Widget概览
    Flutter局部状态管理
    iconfont应用
    implicit_animations.dart阅读
    Flutter异常搜集方案
  • 原文地址:https://www.cnblogs.com/gojava/p/3506950.html
Copyright © 2020-2023  润新知