利用CMD批处理调用VBS创建弹窗来显示系统信息

创建弹窗来显示系统信息.bat

   @echo off
   REM 获取系统信息并存储到临时文件
   systeminfo > temp_sysinfo.txt
   REM 使用VBScript创建弹窗来显示系统信息
   echo Set objShell = CreateObject("WScript.Shell") > show_sysinfo.vbs
   echo Set objFSO = CreateObject("Scripting.FileSystemObject") >> show_sysinfo.vbs
   echo Set objFile = objFSO.OpenTextFile("temp_sysinfo.txt", 1) >> show_sysinfo.vbs
   echo strContent = objFile.ReadAll >> show_sysinfo.vbs
   echo objFile.Close >> show_sysinfo.vbs
   echo objShell.Popup strContent, 0,"System Information", 64 >> show_sysinfo.vbs
   REM 运行VBScript文件
   cscript show_sysinfo.vbs
   REM 删除临时文件
   del temp_sysinfo.txt
   del show_sysinfo.vbs

system_info.vbs

Set objShell = CreateObject("WScript.Shell") 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFile = objFSO.OpenTextFile("C:\Users\KEJIZH~1\AppData\Local\Temp\temp_sysinfo.txt", 1) 
strContent = objFile.ReadAll 
objFile.Close 
objShell.Popup strContent, 0,"System Information", 64   

分享到：

赞 (0) 打赏