[系统相关] 批处理如何获取电脑当前上传/下载网速？或者某个程序？

TAT

问题如题，需要判断网速用来写个自动化脚本



批处理如何获取电脑当前上传/下载网速？或者某个程序？

buyiyang

@echo off
title 网速
mode con cols=50 lines=6
echo.
set "CUU="
set /p=[?25l<nul
echo,    下行                  上行
:test
wmic path Win32_PerfFormattedData_Tcpip_Networkinterface get BytesSentPersec,BytesReceivedPersec
echo,%CUU%
timeout /t 1 /nobreak>nul
goto test
复制代码

czjt1234

回复 5# TAT


   纯批处理功能很少的，必须调用外部命令，或者是第三方命令

cscript.exe 是 windows 自带的外部命令，作用是运行 vbs

该 vbs 中调用了windows管理工具 WMI 以获取当前网速

目前只知道 WMI 有这个功能，不知道是否有其它命令可以实现该功能

TAT

回复 2# czjt1234


    首先，很抱歉这么晚回帖，工作事情太多了，最近电脑都没开，感谢分享！
    Win10x64测试能跑，但是代码内容看的不太明白，
    开头第一行为啥非要用cscript.exe这个工具，我一般都是@echo off改个回显，有时开下延迟变量，这块查资料也没理解。
    如下为实际测试截图，计算机进程就有cscript.exe

czjt1234

回复 3# lancer


    字节

lancer

回复 2# czjt1234


    这速度单位是kb？？？

czjt1234

rem 另存为 ANSI 编码
' & cls & cscript.exe /nologo /e:vbscript "%~f0" & pause & exit

n = 3    '几秒刷新一次。改成0则表示只显示一次数据，不循环刷新

Set oWMI = GetObject("Winmgmts:\\.\Root\Cimv2")
Set oRefresher = CreateObject("WbemScripting.SWbemRefresher")
Set oNet = oRefresher.AddEnum(oWMI, "Win32_PerfFormattedData_Tcpip_Networkinterface")

Do
    oRefresher.Refresh()
    For Each i In oNet.ObjectSet
        s = "上行 " & i.BytesSentPersec     & vbCrLf & _
            "下行 " & i.BytesReceivedPersec & vbCrLf
        WScript.Echo s
    Next
    If n = 0 Then WScript.Quit()
    WScript.Sleep n * 1000
Loop
复制代码

win7x64测试通过