本帖最后由 lxh623 于 2011-11-17 07:20 编辑
我去一个网站求代码,估计是外国人开的。现在有些文件无法移动、命名。
原始问题:http://www.bathome.net/thread-14568-1-1.html
我想问,代码有无恶意?
有恶意的话,有没有办法消除?
怎样批处理获得这些文件名称,输出到文本?然后删除文件?
这些文件有个特征,右键“发送到”下面的都没有了。包括“剪切、复制、删除、从命名”等。- @echo off &SetLocal EnableExtensions EnableDelayedExpansion
-
- for /f "usebackq tokens=1,2 delims= " %%a in (
- "b2.txt"
- ) do(
- echo.a=%%~a_, b=%%~b_
-
- set /a $error = 0
- ::
- for /f "delims=" %%? in (
- '2^>nul dir /b /a:-D /s "E:\JP-WKA\*.pdf" "E:\JP-WKA\*.txt"
- ) do (
- if /i ["%%~a"] == ["%%~?"] (
- set /a $error += 1
- )
- if /i ["%%~b"] == ["%%~?"] (
- set /a $error += 1
- )
- )
-
- if !$error! equ 2 (
- ::
- set /a $error = 0
- ::
- for /f "delims=" %%? in (
- '2^>nul dir /b /a:D-H /s "E:\"'
- ) do (
- if /i ["%%~a"] == ["%%~?"] (
- set /a $error += 1
- )
- if /i ["%%~b"] == ["%%~?"] (
- set /a $error += 1
- )
- )
- if !$error! equ 2 (
- ::
- echo.I'm unsure what you plan to do here, sorry.
- )
- )
- )
- pause
复制代码
|