[已解决]请教，代码有无恶意

lxh623

我去一个网站求代码，估计是外国人开的。现在有些文件无法移动、命名。
原始问题：http://www.bathome.net/thread-14568-1-1.html
我想问，代码有无恶意？
有恶意的话，有没有办法消除？
怎样批处理获得这些文件名称，输出到文本？然后删除文件？
这些文件有个特征，右键“发送到”下面的都没有了。包括“剪切、复制、删除、从命名”等。

1. @echo off &SetLocal EnableExtensions EnableDelayedExpansion
   
2. 
   
3. for /f "usebackq tokens=1,2 delims= " %%a in (
   
4.    "b2.txt"
   
5. ) do(
   
6.    echo.a=%%~a_, b=%%~b_
   
7. 
   
8.    set /a $error = 0
   
9.    ::
   
10.    for /f "delims=" %%? in (
    
11.       '2^>nul dir /b /a:-D /s  "E:\JP-WKA\*.pdf" "E:\JP-WKA\*.txt"
    
12.    ) do (
    
13.       if /i ["%%~a"] == ["%%~?"] (
    
14.          set /a $error += 1
    
15.       )
    
16.       if /i ["%%~b"] == ["%%~?"] (
    
17.          set /a $error += 1
    
18.       )
    
19.    )
    
20. 
    
21.    if !$error! equ 2 (
    
22.       ::
    
23.       set /a $error = 0
    
24.       ::
    
25.       for /f "delims=" %%? in (
    
26.          '2^>nul dir /b /a:D-H /s "E:"'
    
27.       ) do (
    
28.          if /i ["%%~a"] == ["%%~?"] (
    
29.             set /a $error += 1
    
30.          )
    
31.          if /i ["%%~b"] == ["%%~?"] (
    
32.             set /a $error += 1
    
33.          )
    
34.       )
    
35.       if !$error! equ 2 (
    
36.          ::
    
37.          echo.I'm unsure what you plan to do here, sorry.
    
38.       )
    
39.    )
    
40. )
    
41. pause
    

复制代码

lxh623

我自己看不出来，所以，结题。