无忧启动论坛

标题: 我想把批处理输出的结果在当前目录下保存为一个TXT文件，请问各位大侠如何实现啊！ [打印本页]
作者: 叶知秋    时间: 2021-5-25 14:40
标题: 我想把批处理输出的结果在当前目录下保存为一个TXT文件，请问各位大侠如何实现啊！
@echo off & color a & title 获取系统信息 ^& By 繁华背后的落寞
setlocal enabledelayedexpansion
Rem 获取系统版本
for /f "delims=" %%a in ('wmic process get^|findstr /i "Microsoft Windows"') do (
set /a a+=1
if !a!==2 (set var=%%a&goto st)
)
:st
for /f "delims=|" %%b in ("!var!") do (
for /f "tokens=19-21" %%i in ("%%b") do (
if "%PROCESSOR_ARCHITECTURE%"=="x86" set var=32位
if "%PROCESSOR_ARCHITECTURE%"=="AMD64" set var=64位
echo 操作系统:%%i %%j %%k !var!
)
)
set var=<nul
echo 当前计算机名:%computername%
echo 当前登陆用户名:%username%

Rem 获取IP地址
for /f "delims=" %%a in ('wmic nicconfig get IPAddress /value ^| findstr /i "IPAddress={"') do (
set var=%%a
for /f tokens^=2^ delims^=^"^" %%b in ("!var!") do (
echo IP地址:%%b
)
)

Rem 获取MAC地址
for /f "skip=3 tokens=1" %%a in ('getmac') do (
echo MAC地址:%%a
goto mac
)
:mac

Rem 获取主板型号
for /f "delims=" %%a in ('wmic BASEBOARD get Manufacturer^,Product^,Version^,SerialNumber /value^|findstr /i "product"') do (
set a=%%a
set a=!a:~0,8!#!a:~8!
set a=!a:*#=!
echo 主板型号:!a!
)
set a=<nul

Rem 获取CPU信息
for /f "delims=" %%a in ('wmic cpu list full^|findstr "GHz"') do (
set a=%%a
set a=!a:~0,5!#!a:~5!
set a=!a:*#=!
echo CPU型号:!a!
)
set a=<nul
set b=<nul

Rem 获取显示器分辨率
for /f "delims=" %%a in ('wmic DESKTOPMONITOR get name^,ScreenWidth^,ScreenHeight^,PNPDeviceID /value^|findstr /i "screenWidth"') do (
set a=%%a
set a=!a:~0,12!#!a:~12!
set a=!a:*#=!
if !a! gtr 1 goto :step4
)
:step4
for /f "delims=" %%b in ('wmic DESKTOPMONITOR get name^,ScreenWidth^,ScreenHeight^,PNPDeviceID /value^|findstr /i "screenHeight"') do (
set b=%%b
set b=!b:~0,13!#!b:~13!
set b=!b:*#=!
if !b! gtr 1 goto :step5
)
:step5
echo 显示器分辨率:%a%x%b%
set a=<nul
set b=<nul

Rem 获取硬盘信息
for /f "delims=" %%a in ('wmic DISKDRIVE get model^,interfacetype^,size^,totalsectors^,partitions /value^|findstr /i "Model"') do (
set a=%%a
set a=!a:~0,6!#!a:~6!
set a=!a:*#=!
echo 硬盘型号:!a!
set /a num1+=1
set num2=0
for /f "delims=" %%b in ('wmic DISKDRIVE get model^,interfacetype^,size^,totalsectors^,partitions /value^|findstr /i "Size"') do (
set /a num2+=1
set b=%%b
set b=!b:~0,5!#!b:~5!
set b=!b:*#=!
set b=!b:~0,-10!
if !num1!==!num2! (set num2=1&echo 硬盘容量:!b!GB&set b=<nul)
)
)
set a=<nul
set b=<nul

Rem  获取硬盘序列号
set "index=0"
for /f "skip=1 delims=" %%a in ('wmic path Win32_PhysicalMedia get SerialNumber') do (
        set /a "index+=1"
        call set "硬盘序列号_%%index%%=%%a"
)
set 硬盘序列号_


Rem 获取内存信息
for /f "skip=1 tokens=2" %%a in ('wmic os get TotalVisibleMemorySize^,FreePhysicalMemory') do (
set var=%%a
set /a var=!var!/1024
)
echo 内存:!var!M
set var=<nul
Rem 获取显卡信息
for /f "skip=1 delims=" %%a in ('wmic path win32_videocontroller get description') do (
set var=%%a
goto video
)
)
:video
echo 显卡型号:!var!

pause>nul


我想把上面输出的结果在当前目录下保存为一个TXT文件，请问各位大侠如何实现啊！

作者: magicgenius    时间: 2021-5-25 15:26
除了@echo off，下面 echo 命令行，除了第一最后加上 >"%~DP0Systeminfo.txt"，其他的最后都加上 >>"%~DP0Systeminfo.txt"，保存即可。
作者: nttwqz    时间: 2021-5-25 16:35
echo;|abcd.bat>a.txt
作者: lbw2007    时间: 2021-5-25 17:00
magicgenius 发表于 2021-5-25 15:26
除了@echo off，下面 echo 命令行，除了第一最后加上 >"%~DP0Systeminfo.txt"，其他的最后都加上 >>"%~DP0S ...

能否只调用一次">>"?
作者: 叶知秋    时间: 2021-5-25 18:52
本帖最后由 叶知秋 于 2021-5-25 18:53 编辑
nttwqz 发表于 2021-5-25 16:35
echo;|abcd.bat>a.txt

谢谢大侠指点，出在可以输出TXT文件了，实在感谢！现在改为

@echo off & color a & title 获取系统信息 ^& By 繁华背后的落寞
setlocal enabledelayedexpansion
Rem 获取系统版本
for /f "delims=" %%a in ('wmic process get^|findstr /i "Microsoft Windows"') do (
set /a a+=1
if !a!==2 (set var=%%a&goto st)
)
:st
for /f "delims=|" %%b in ("!var!") do (
for /f "tokens=19-21" %%i in ("%%b") do (
if "%PROCESSOR_ARCHITECTURE%"=="x86" set var=32位
if "%PROCESSOR_ARCHITECTURE%"=="AMD64" set var=64位
echo 操作系统:%%i %%j %%k !var!
)
)
set var=<nul
echo 当前计算机名:%computername%
echo 当前登陆用户名:%username%

Rem 获取IP地址
for /f "delims=" %%a in ('wmic nicconfig get IPAddress /value ^| findstr /i "IPAddress={"') do (
set var=%%a
for /f tokens^=2^ delims^=^"^" %%b in ("!var!") do (
echo IP地址:%%b
)
)

Rem 获取MAC地址
for /f "skip=3 tokens=1" %%a in ('getmac') do (
echo MAC地址:%%a
goto mac
)
:mac

Rem 获取主板型号
for /f "delims=" %%a in ('wmic BASEBOARD get Manufacturer^,Product^,Version^,SerialNumber /value^|findstr /i "product"') do (
set a=%%a
set a=!a:~0,8!#!a:~8!
set a=!a:*#=!
echo 主板型号:!a!
)
set a=<nul

Rem 获取CPU信息
for /f "delims=" %%a in ('wmic cpu list full^|findstr "GHz"') do (
set a=%%a
set a=!a:~0,5!#!a:~5!
set a=!a:*#=!
echo CPU型号:!a!
)
set a=<nul
set b=<nul

Rem 获取显示器分辨率
for /f "delims=" %%a in ('wmic DESKTOPMONITOR get name^,ScreenWidth^,ScreenHeight^,PNPDeviceID /value^|findstr /i "screenWidth"') do (
set a=%%a
set a=!a:~0,12!#!a:~12!
set a=!a:*#=!
if !a! gtr 1 goto :step4
)
:step4
for /f "delims=" %%b in ('wmic DESKTOPMONITOR get name^,ScreenWidth^,ScreenHeight^,PNPDeviceID /value^|findstr /i "screenHeight"') do (
set b=%%b
set b=!b:~0,13!#!b:~13!
set b=!b:*#=!
if !b! gtr 1 goto :step5
)
:step5
echo 显示器分辨率:%a%x%b%
set a=<nul
set b=<nul

Rem 获取硬盘信息
for /f "delims=" %%a in ('wmic DISKDRIVE get model^,interfacetype^,size^,totalsectors^,partitions /value^|findstr /i "Model"') do (
set a=%%a
set a=!a:~0,6!#!a:~6!
set a=!a:*#=!
echo 硬盘型号:!a!
set /a num1+=1
set num2=0
for /f "delims=" %%b in ('wmic DISKDRIVE get model^,interfacetype^,size^,totalsectors^,partitions /value^|findstr /i "Size"') do (
set /a num2+=1
set b=%%b
set b=!b:~0,5!#!b:~5!
set b=!b:*#=!
set b=!b:~0,-10!
if !num1!==!num2! (set num2=1&echo 硬盘容量:!b!GB&set b=<nul)
)
)
set a=<nul
set b=<nul

Rem  获取硬盘序列号
set "index=0"
for /f "skip=1 delims=" %%a in ('wmic path Win32_PhysicalMedia get SerialNumber') do (
        set /a "index+=1"
        call set "硬盘序列号_%%index%%=%%a"
)
set 硬盘序列号_


Rem 获取内存信息
for /f "skip=1 tokens=2" %%a in ('wmic os get TotalVisibleMemorySize^,FreePhysicalMemory') do (
set var=%%a
set /a var=!var!/1024
)
echo 内存:!var!M
set var=<nul
Rem 获取显卡信息
for /f "skip=1 delims=" %%a in ('wmic path win32_videocontroller get description') do (
set var=%%a
goto video
)
)
:video
echo 显卡型号:!var!

echo;|123.bat>a.txt

作者: magicgenius    时间: 2021-5-25 19:55
nttwqz 发表于 2021-5-25 16:35
echo;|abcd.bat>a.txt

分号 ；就用不着了吧？echo|
作者: aesene    时间: 2021-5-25 20:34
分辨率未正确显示出来
作者: seawaycao    时间: 2021-5-30 14:35
很实用的技术讨论贴。学习了！已收藏
作者: being    时间: 2021-6-7 17:35
本帖最后由 being 于 2021-6-7 17:49 编辑

楼主关于分辨率的代码适合X86，如果是X64，我是这样解决的（插到原文里面去）：
  1. Rem 获取显示器分辨率
  2. for /f "tokens=1,3" %%i in ('reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\UnitedVideo" /s') do (
  3.     if "%%i" equ "DefaultSettings.XResolution" (
  4.         set /a ScreenWidth=%%j
  5.     ) else (
  6.         if "%%i" equ "DefaultSettings.YResolution" (
  7.             set /a ScreenHeight=%%j
  8.         )
  9.     )
  10. )
  11. echo 显示器分辨率：%ScreenWidth%，%ScreenHeight%
复制代码
作者: bjay2008xmy    时间: 2021-6-7 21:29
提示: 作者被禁止或删除 内容自动屏蔽
作者: fengwhen    时间: 2022-9-4 18:56
学习了，正好我也需要这个



欢迎光临 无忧启动论坛 (http://bbs.wuyou.net/) Powered by Discuz! X3.3