一键提取exe依赖文件，基于系统预读。

610644034

zrr890528 发表于 2022-11-9 09:41
复制制作vbs错误，能不能发下成品

pe文件名需要全路径名，不然找不到文件。比如你输入: C:\Windows\write.exe 我系统上会输出：
C:\Windows\write.exe
\SHELL32.dll
\KERNEL32.dll
\msvcrt.dll

到文件上。用vbs实现，我已经不感兴趣了。用 js  hta 实现界面更舒适！

610644034

有一点需要说明一下：如果在PE系统里面使用这个vbs 需要给pe系统添加组件: ADODB.Stream
他的文件列表我是用bat做PE时集成进去的，在无忧网上我都没有见过添加这个组件的，只能说我自己的PE能使用，别的PE我就不知道咯！


@echo off
rem **用户选项文件*****************************
setlocal enabledelayedexpansion
rem title %~n0
cd "%~dp0"
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
set "m_运行时配置文件=%~dp0系统环境总配置.ini"
( for /f "usebackq delims=" %%a in ("!m_运行时配置文件!") do %%a )>nul 2>nul
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
if "" EQU "!mu_%~n0!" goto :eof
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

(
    echo.
    echo ;;;以下是添加 %~n0 文件列表
    echo \Program Files\Common Files\System\ado\msado15.dll
    echo \Windows\System32\msvcrt.dll
    echo \Windows\System32\MSDART.DLL
    echo \Windows\System32\ADVAPI32.dll
    echo \Windows\System32\ole32.dll
    echo \Windows\System32\OLEAUT32.dll
)>>"!m_添加文件列表!"

if /i "x64" EQU "!m_系统位数!" if "" NEQ "!mu_系统64位向32位兼容!" (
    echo \Windows\SysWOW64\msvcrt.dll
    echo \Windows\SysWOW64\MSDART.DLL
    echo \Windows\SysWOW64\ADVAPI32.dll
    echo \Windows\SysWOW64\ole32.dll
    echo \Windows\SysWOW64\OLEAUT32.dll
)>>"!m_添加文件列表!"

if /i "x64" EQU "!m_系统位数!" if "" NEQ "!mu_系统64位向32位兼容!" echo \Program Files (x86)\Common Files\System\ado\msado15.dll>>"!m_添加文件列表!"
call 注册表文件关联拷贝.bat "!m_install.wim注册表路径_SOFTWARE!" "!m_winpe.wim注册表路径_SOFTWARE!" "ADODB.Stream"

goto :eof
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

zrr890528

610644034 发表于 2022-11-14 12:38
有一点需要说明一下：如果在PE系统里面使用这个vbs 需要给pe系统添加组件: ADODB.Stream
他的文件列表我 ...

感谢感谢，用了预读提取了一些简单的程序模组很方便，现在用你的处理文件试试，感谢大佬