gyue

回复 12# idwma


    好的谢谢朋友，我测试一下

qixiaobin0715

回复 15# gyue
你要增加内存的什么信息。我可以试试。

gyue

回复 17# qixiaobin0715


    您好我更新了一下文本，加入了内存信息，您帮忙看看可否添加相关参数，如果可以将配置参数输出文本到桌面，谢谢

qixiaobin0715

回复 18# gyue
要输出文本到桌面，请将14楼代码for的前面加上一个英文左括号，代码39行修改为：

))>"%HomePath%\DeskTop\New_硬件报告.txt"COPY

即可。
在3~4行之间增加以下代码：

    if "%%a"=="内存设备:" (
        echo,
        echo,内存
        set m=0
    ) else if defined m (
        echo,%%a|findstr /xr "类型 大小 最大时钟频率 制造商 序列号 部件号">nul 2>nul&&echo,%%a：%%b
        if "%%a"=="部件号" set m=
    )COPY

以上未经测试，请自行测试。

gyue

回复 19# qixiaobin0715


3-4行增加命令没问题了，
39行增加))>"%HomePath%\DeskTop\New_硬件报告.txt"
提示))不是内部命令，或者不输出

qixiaobin0715

回复 20# gyue
你应当没有理解我的意思，好吧，给你一个完整代码：

@echo off
setlocal enabledelayedexpansion
(for /f "tokens=1,2*" %%a in (硬件报告.txt) do (
    if "%%a"=="内存设备:" (
        echo,
        echo,内存
        set m=0
    ) else if defined m (
        echo,%%a|findstr /xr "类型 大小 最大时钟频率 制造商 序列号 部件号">nul 2>nul&&echo,%%a：%%b
        if "%%a"=="部件号" set m=
    )
    if "%%a"=="系统:" (
        echo,系统
        set n=0
    ) else if "%%b"=="设备信息:" (
        echo,
        echo,ATA
        set n=0
    ) else if "%%a"=="网络适配器信息:" (
        set n=0
    ) else if defined n (
        if "%%a"=="产品" (
            echo,产品型号：%%b %%c
        ) else if "%%a"=="型号" (
            echo,%%a %%b：%%c
        ) else if "%%a"=="网络适配器" (
            set str=%%c
            set str=!str:Virtual=!
            set str=!str:Bluetooth=!
            if not "!str!"=="%%c" set n=
            if "%%b"=="Bluetooth" set n=
            if defined n (
                echo,
                echo,网络
                echo,%%a：%%b %%c
            )
        ) else if "%%a"=="接口类型" (
            echo,%%a：%%b %%c
        ) else if "%%a"=="序列号" (
            echo,%%a：%%b
            set n=
        ) else if "%%a"=="硬件地址(MAC)" (
            echo,%%a：%%b
            set n=
        )
    )
))>"%HomePath%\DeskTop\New_硬件报告.txt"
pauseCOPY

实际上上面增加的代码效率不高，运行时可能会有停顿的现象，因为在for循环里面使用了管道及组合命令。抽空给你再修改一下。

gyue

回复 21# qixiaobin0715


    哦哦。用新代码可以输出了，谢谢。

qixiaobin0715

去掉了代码中的管道及组合命令，重新调整了判断逻辑，将类似项目放在同一个判断语句中，如果全部单独判断（你给定的关键词较多）代码就会太长，并且影响效率。用到了临时文件，最后结果中：“系统”中多了一行“制造商”信息。

@echo off
set "var=网络适配器 设备信息: 系统: 内存设备: 类型 大小 最大时钟频率 制造商 序列号 部件号 硬件地址 型号 产品"
findstr /r "%var%" 硬件报告.txt>a.log
setlocal enabledelayedexpansion
(for /f "tokens=1,2*" %%a in ('findstr /r /v "Virtual Bluetooth 类型详情" a.log') do (
    if "%%a"=="内存设备:" (
        echo,
        echo,内存
        set m=0
        set n=0
    ) else if "%%a"=="系统:" (
        echo,系统
        set n=0
    ) else if "%%b"=="设备信息:" (
        echo,
        echo,ATA
        set n=0
    ) else if "%%a"=="网络适配器" (
        echo,
        echo,网络
        echo,%%a：%%b %%c
        set n=0
    ) else if defined n (
        if "%%a"=="序列号" (
            echo,%%a：%%b
            if not defined m set n=
        ) else if "%%a"=="部件号" (
            echo,%%a：%%b
            set m=
            set n=
        ) else if "%%a"=="硬件地址(MAC)" (
            echo,%%a：%%b
            set n=
        ) else if "%%a"=="型号" (
            echo,%%a %%b：%%c
        ) else (
            if "%%c"=="" (echo,%%a：%%b) else echo,%%a：%%b %%c
        )
    )
))>"%HomePath%\DeskTop\New_硬件报告.txt"
del a.log
pauseCOPY

qixiaobin0715

修正了21楼大小和频率中只有数值没有单位的缺陷。
实际上不使用变量延迟也行，即删除上面代码第4行，结果是一样的。
“系统”中多了一行“制造商”信息的问题实际上也能解决，就是要增加判断。

gyue

回复 24# qixiaobin0715


    OK谢谢大神，主要就是为了记录这些数值，一个一个抄太麻烦了，多亏您的帮助，谢谢。

qixiaobin0715

完全按照楼主要求的信息输出：

@echo off
set "var=网络适配器 设备信息: 系统: 内存设备: 类型 大小 最大时钟频率 制造商 序列号 部件号 硬件地址 型号 产品"
findstr /r "%var%" 硬件报告.txt>a.log
(for /f "tokens=1,2*" %%a in ('findstr /r /v "Virtual Bluetooth 类型详情" a.log') do (
    if "%%a"=="内存设备:" (
        echo,
        echo,内存
        set m=0
        set n=0
    ) else if "%%a"=="系统:" (
        echo,系统
        set n=0
        set l=0
    ) else if "%%b"=="设备信息:" (
        echo,
        echo,ATA
        set n=0
    ) else if "%%a"=="网络适配器" (
        echo,
        echo,网络
        echo,%%a：%%b %%c
        set n=0
    ) else if defined n (
        if "%%a"=="序列号" (
            echo,%%a：%%b
            if not defined m set n=
        ) else if "%%a"=="部件号" (
            echo,%%a：%%b
            set m=
            set n=
        ) else if "%%a"=="硬件地址(MAC)" (
            echo,%%a：%%b
            set n=
        ) else if "%%a"=="型号" (
            echo,%%a %%b：%%c
        ) else if "%%a"=="制造商" (
            if defined l (set l=) else (if "%%c"=="" (echo,%%a：%%b) else echo,%%a：%%b %%c)
        ) else (
            if "%%c"=="" (echo,%%a：%%b) else echo,%%a：%%b %%c
        )
    )
))>"%HomePath%\DeskTop\New_硬件报告.txt"
del a.log
pauseCOPY

gyue

回复 26# qixiaobin0715


    谢谢大神，上一版也可以了。

qixiaobin0715

插槽：2
中数据是从141行取值的，是吗？

gyue

回复 28# qixiaobin0715


    您好在内存阵列里的有个内存设备2.就是槽位，

qixiaobin0715

@echo off
set "var=处理器: PCI/AGP 内存阵列: 网络适配器 设备信息: 系统: 类型 大小 最大时钟频率 制造商 序列号 部件号 硬件地址 型号 产品 最大内存容量 内存设备 设备描述 版本 显示适配器"
findstr /i /r /v /c:"类型[^ ]" /c:"[^ ]版本" /c:"DAC" ret.txt>b.log
findstr /r "%var%" b.log>a.log
(for /f "tokens=1,2*" %%a in ('findstr /r /v "Virtual Bluetooth 芯片类型" a.log') do (
    if "%%a"=="内存设备:" (
        echo,
        echo,内存
        set m=0
        set n=0
    ) else if "%%a"=="系统:" (
        echo,系统
        set n=0
    ) else if "%%b"=="设备信息:" (
        echo,
        echo,ATA
        set n=0
    ) else if "%%a"=="网络适配器" (
        echo,
        echo,网络
        echo,%%a：%%b %%c
        set n=0
    ) else if "%%a"=="内存阵列:" (
        echo,
        echo,%%a
        set n=0
    ) else if "%%a"=="显示适配器:" (
        echo,
        echo,%%a
        set n=0
    ) else if "%%b"=="PCI/AGP" (
        echo,
        echo,%%b
        set n=0
    ) else if "%%a"=="处理器:" (
        echo,
        echo,%%a
        set n=0
    ) else if defined n (
        if "%%a"=="序列号" (
            echo,%%a：%%b
            if not defined m set n=
        ) else if "%%a"=="部件号" (
            echo,%%a：%%b
            set m=
            set n=
        ) else if "%%a"=="硬件地址(MAC)" (
            echo,%%a：%%b
            set n=
        ) else if "%%a"=="内存设备" (
            echo,%%a：%%b
            set n=
        ) else if "%%a"=="显存大小" (
            echo,%%a：%%b %%c
            set n=
        ) else if "%%a"=="版本" (
            echo,%%a：%%b %%c
            set n=
        ) else if "%%a"=="型号" (
            echo,%%a %%b：%%c
        ) else (
            if "%%c"=="" (echo,%%a：%%b) else echo,%%a：%%b %%c
        )
    )
))>"%HomePath%\DeskTop\New_ret.txt"
del a.log
del b.log
pauseCOPY