一键找出朋友电脑里的小电影,图片,或者音乐。复制到桌面打开
打开记事本,复制脚本,保存后缀为.Bat
【bat 脚本】
echo off
color 0a
title GET ALL Capture
mode con: cols=50 lines=20
rem administrators run
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
SETlOCAL enabledelayedexpansion
:main
echo. *New time: %date%%time%*
echo. *Information:
echo. *Get something(Jpg/PDF/Music/Move)*
echo.-------------------------------------
echo. [1]*Picture* [2]*PDF*
echo. [3]*Music* [4]*Move^&^&TV*
echo.-------------------------------------
echo. [9]*exit*
set /p chooes="Input you choose item:"
echo.
if /i %chooes% == 1 (goto jpg)
if /i %chooes% == 2 (goto pdf)
if /i %chooes% == 3 (goto mp3)
if /i %chooes% == 4 (goto mov)
if /i %choose% == 5 (goto exit)
if /i %chooes% == " " (goto et)
:jpg
cd %userprofile%\Desktop
if exist Capture del Capture /s /q
if exist 1.txt del 1.txt /s /q
dir /s /a /b C:\*.jpg>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.jpg>>%userprofile%\Desktop\1.txt
goto cp
:pdf
cd %userprofile%\Desktop
if exist Capture del Capture /s /q
if exist 1.txt del 1.txt /s /q
dir /s /a /b C:\*.pdf>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.pdf>>%userprofile%\Desktop\1.txt
goto cp
:mp3
cd %userprofile%\Desktop
if exist Capture del Capture /s /q
if exist 1.txt del 1.txt /s /q
dir /s /a /b C:\*.mp3>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.mp3>>%userprofile%\Desktop\1.txt
goto cp
:mov
cd %userprofile%\Desktop
if exist Capture del Capture /s /q
if exist 1.txt del 1.txt /s /q
dir /s /a /b C:\*.mp4>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.mp4>>%userprofile%\Desktop\1.txt
dir /s /a /b C:\*.avi>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.avi>>%userprofile%\Desktop\1.txt
dir /s /a /b C:\*.wmv>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.wmv>>%userprofile%\Desktop\1.txt
dir /s /a /b C:\*.mov>>%userprofile%\Desktop\1.txt
dir /s /a /b D:\*.mov>>%userprofile%\Desktop\1.txt
:cp
md %userprofile%\Desktop\Capture
cd %userprofile%\Desktop
set j=0
for /f "delims=""" %%i in (1.txt) do (
set lineStr j+=1
set con!j!=%%i
call set lineStr=%%con!j!%%
copy !lineStr! %userprofile%\Desktop\Capture)
cd %~dp0
del 1.txt
cls.
echo. open the folder after 3 Seconds
timeout /t 3
start "" "%Userprofile%\Desktop\Capture"
pause
cls
goto main
:et
exit