批量筛选DLL是否可以通过regsvr32注册

/*一个批量筛选DLL是否可以通过regsvr32注册的工具*/
!include "FileFunc.nsh"
!insertmacro Locate
OutFile "分选dll.EXE"
Name "分选dll"
Var Success
Var Failed
Section
FileOpen $Success "$EXEDIRSuccess.TXT" A
FileOpen $Failed "$EXEDIRFailed.txt" A
${Locate} "$EXEDIR" "/M=*.dll" "loc" ;可以改一下文件类型把ocx,ax等文件也测试一遍
FileClose $Success
FileClose $Failed
SectionEnd
Function loc
ExecWait 'REGSVR32.EXE /S "$R9"'
IfErrors +3
FileWrite $Success 'RegDLL "$R9"$r$n'
Goto +2
FileWrite $Failed '-RegDLL "$R9"$r$n'
ClearErrors
ExecWait 'REGSVR32.EXE /S /U "$R9"'
ClearErrors
Push $R0
FunctionEnd