批处理之家 - Powered by Discuz! Board

标题: [文本处理] 批处理怎样查找内容，判断执行格式化U盘并复制文件 [打印本页]

作者: lkflsj 时间: 2020-4-29 18:03 标题: 批处理怎样查找内容，判断执行格式化U盘并复制文件

wmic diskdrive get serialnumber |find "Z4Z959F6" /C

查找到有Z4Z959F6责执行格式化U盘。并复制文件到U盘。这批处理该怎么写

作者: smss 时间: 2020-4-29 19:21

http://www.bathome.net/viewthrea ... mp;page=1#pid227947

作者: lkflsj 时间: 2020-4-29 19:35

回复 2# smss

根据serialnumber的信息来判断是不是我们公司出去的U盘。是才给写U盘程序。。你这个提供的太复杂。我初学者看不懂

作者: smss 时间: 2020-4-29 20:38

本帖最后由 smss 于 2020-4-29 20:42 编辑

@echo off
wmic diskdrive get serialnumber |find "Z4Z959F6"&&goto A||echo 非我司U盘即将退出!&&ping 0 -n "2">nul&&Exit
:A
for /f "delims=:" %%i in ('findstr /n "^:DynamicScript$" "%~f0"') do (more +%%i "%~f0" > "%temp%\GetU.vbs")
for /f %%a in ('cscript /nologo "%temp%\GetU.vbs"') do (set "DriveU=%%a")
echo 正在格式化U盘
format %DriveU% /fs:fat32 /q /x
echo 正在复制文件夹
xcopy /d/e/I/h/r/y/s XXXXX %DriveU%
pause
:DynamicScript
Set Fso = CreateObject("Scripting.FileSystemObject")
Set B = Fso.Drives
For Each A in B
    If A.DriveType = 1 Then
        aDisk = aDisk & A.DriveLetter & ": "
    End If
Next
aDisk = Replace(aDisk, "A: ","")
WScript.Echo aDisk
复制代码

欢迎光临批处理之家 (http://www.bathome.net/)

Powered by Discuz! 7.2