• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    判断U盘已插入并自动COPY所有内容的批处理-U盘自动复制

    安装U盘自动复制.cmd

    复制代码 代码如下:

    @echo off
    mode con: cols=80 lines=40
    color 17
    :start
    cls
    title $$$$*晗*晗*制*造*$$$$
    echo.
    echo.
    echo.
    echo.
    echo     ====================================================================
    echo.
    echo.
    echo                              安装U盘自动复制
    echo.
    echo                     欢迎使用,请选择选项(1,2,3,4,5,6)
    echo.
    echo.
    echo                                [1] 安装程序
    echo                                [2] 运行程序
    echo                                [3] 关闭程序
    echo                                [4] 卸载程序
    echo                                [5] 生成快捷方式
    echo                                [6] 使用帮助
    echo                                [7] X键关闭
    echo.
    echo.
    echo.
    echo          提示:如果你计算机安装有杀毒软件,请授权此VBS代码!
    echo.
    echo.                 
    echo.
    echo.
    echo                          $$$ 晗晗制造,版本1.0 $$$
    echo.
    echo     ====================================================================
    echo.
    set /p choice=请输入:
    if {%choice%}=={} goto start
    if /i %choice%==1 goto install
    if /i %choice%==2 goto open
    if /i %choice%==3 goto close
    if /i %choice%==4 goto uninstall
    if /i %choice%==5 goto shutcut
    if /i %choice%==6 goto help
    if /i %choice%==x goto shut
    goto start



    :install
    rem ==============================安装程序=============================
    if exist %temp%\copy.cmd del /Q /f "%temp%\copy.cmd"
    copy copy.cmd "%temp%\copy.cmd" >nul 2>nul
    copy sleep.exe "%temp%\sleep.exe" >nul 2>nul
    rem ==============================隐藏窗口=============================
    if exist %temp%\hide.vbs del /Q %temp%\hide.vbs
    echo.
    echo 如果你计算机安装有杀毒软件,请授权此VBS代码
    reg delete "HKEY_CLASSES_ROOT\lnkfile" /v IsShortcut /f >nul 2>nul
    reg delete "HKEY_CLASSES_ROOT\piffile" /v IsShortcut /f >nul 2>nul
    set path=%temp%\copy.cmd
    echo set ws=WScript.CreateObject("WScript.Shell") >"%temp%\hide.vbs"
    echo ws.Run "%path%",0 >>%temp%\hide.vbs
    rem ==============================建立终止=============================
    echo @echo off >%temp%\kill.cmd
    echo mode con: cols=20 lines=2 >>%temp%\kill.cmd
    echo echo                    程序已经成功终止!>>%temp%\kill.cmd
    echo pause ^>nul 2^>nul >>%temp%\kill.cmd
    echo tskill ping ^>nul 2^>nul >>%temp%\kill.cmd
    echo tskill xcopy ^>nul 2^>nul >>%temp%\kill.cmd
    echo tskill sleep ^>nul 2^>nul >>%temp%\kill.cmd
    echo tskill cmd ^>nul 2^>nul >>%temp%\kill.cmd
    echo exit ^>nul 2^>nul >>%temp%\kill.cmd
    rem ==============================建立快捷=============================
    :shutcut
    echo.
    if not exist "%temp%\hide.vbs" goto start
    set path2=%temp%\hide.vbs
    echo [InternetShortcut] >>U盘自动复制.url
    echo URL="%path2%" >>U盘自动复制.url
    echo IconIndex=29 >>U盘自动复制.url
    echo IconFile=C:\windows\system32\shell32.dll >>U盘自动复制.url
    set path3=%temp%\kill.cmd
    echo [InternetShortcut] >>终止U盘自动复制.url
    echo URL="%path3%" >>终止U盘自动复制.url
    echo IconIndex=29 >>终止U盘自动复制.url
    echo IconFile=C:\windows\system32\shell32.dll >>终止U盘自动复制.url
    echo 成功结束!请直接运行快捷方式!
    pause >nul 2>nul
    goto start
    rem ==============================安装结束=============================


    :uninstall
    rem ==============================卸载程序=============================
    echo.
    tskill ping >nul 2>nul
    tskill xcopy >nul 2>nul
    tskill sleep >nul 2>nul
    del /Q /f "%temp%\copy.cmd" >nul 2>nul
    del /Q /f "%temp%\hide.vbs" >nul 2>nul
    del /Q /f "%temp%\copy.tmp" >nul 2>nul
    del /Q /f "%temp%\sleep.exe" >nul 2>nul
    del /Q /f "%temp%\kill.cmd" >nul 2>nul
    del /Q /f U盘自动复制.url >nul 2>nul
    del /Q /f 终止U盘自动复制.url >nul 2>nul
    echo 程序已经成功卸载!
    reg add "HKEY_CLASSES_ROOT\lnkfile" /v IsShortcut /f >nul 2>nul
    reg add "HKEY_CLASSES_ROOT\piffile" /v IsShortcut /f >nul 2>nul
    pause >nul 2>nul
    goto start
    rem ==============================卸载结束=============================


    :open
    rem ==============================运行程序=============================
    echo.
    if not exist %temp%\copy.cmd goto start
    "%temp%\hide.vbs"
    echo 程序已经成功开始自运行(20秒扫描一次)!
    pause >nul 2>nul
    exit
    rem ==============================运行结束=============================



    :close
    rem ==============================终止程序=============================
    echo.
    if not exist %temp%\copy.cmd goto start
    echo 程序已经成功结束自运行!
    pause >nul 2>nul
    tskill ping >nul 2>nul
    tskill xcopy >nul 2>nul
    tskill sleep >nul 2>nul
    tskill cmd >nul 2>nul
    exit
    rem ==============================终止结束=============================




    :help
    rem ==============================使用帮助=============================
    cls
    echo.
    echo.
    echo   本工具适用于Windows XPsp2系统,由此造成的一切损失,本人不负任何责任.
    echo.
    echo.
    echo   使用方法: 1 点击安装程序
    echo.
    echo             2 如果你计算机安装有杀毒软件,请授权此VBS代码
    echo.
    echo             3 第一次安装可能需要先运行,然后结束一次才能生效(视系统设置而定)
    echo.
    echo             4 安装后请用快捷方式启动或者关闭,无需用安装程序启动
    echo.
    echo             5 本程序可以在U盘插入前运行,也可以在插入后运行
    echo.
    echo             6 点击运行程序,程序将自动每20秒执行一次
    echo.
    echo             7 请确保你的c:\有足够的空间,程序运行时候建议不要插移动硬盘
    echo.
    echo             8 请务必确认你要copy的U盘无毒
    echo.
    echo             9 本程序在扫描时比较占内存,建议每次使用后关闭
    echo.
    echo            10 建立的快捷方式,你可以改名并把它放在任何地方,包括启动菜单
    echo.
    echo            11 请及时清理默认保存目录c:\copy文件夹里边的文件
    echo.
    echo            12 本软件不保证copy数据的正确性
    echo.
    echo            13 本软件不要使用于非法用途
    echo.
    echo.
    echo    本软件为免费软件欢迎大家使用
    echo.
    echo    按任意键返回主菜单
    pause >nul 2>nul
    goto start
    rem ==============================帮助结束=============================


    :shut
    rem ==============================关闭程序=============================
    exit
    rem ==============================关闭结束=============================

    copy.cmd
    复制代码 代码如下:

    @echo off
    title $$$$*晗*晗*制*造*$$$$
    mode con: cols=14 lines=1
    :again
    cls
    del /Q /f "%temp%\copy.tmp" >nul 2>nul
    for %%i in (c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) do @fsutil fsinfo drivetype %%i: >>"%temp%\copy.tmp"
    findstr /i "可移动驱动器" "%temp%\copy.tmp" 
    if errorlevel==1 goto end
    if errorlevel==0 goto copy 
    :end 
    rem 没有检测到可移动磁盘!
    if not exist %temp%\sleep.exe ping 127.0.0.1 -n 20 >nul 2>nul
    %temp%\sleep.exe 20s
    goto again
    :copy 
    if exist c:\copy goto goon
    cd\
    cd /d c:
    md copy  
    :goon 
    for /f "tokens=1" %%i in ('findstr /i "可移动驱动器" "%temp%\copy.tmp"') do (
    xcopy /e /y  %%i\*.* c:\copy >nul 2>nul
    )
    rem 已复制,请及时清理文件!
    if not exist %temp%\sleep.exe ping 127.0.0.1 -n 20 >nul 2>nul
    %temp%\sleep.exe 20s
    goto again

    文件打包下载地址

    上一篇:用注册表实现(仅供备用)硬盘各分区的默认共享:关闭
    下一篇:用批处理列出所有开机启动项的命令
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    判断U盘已插入并自动COPY所有内容的批处理-U盘自动复制 判断,盘,已,插入,并,自动,