谁能帮俺写个监控网络的小程序呢

林晚晴

谁能帮俺写个监控网络的小程序呢

下载，夜间下载不想让电脑在哪里空运行

能监控网络的，网速低于多少并且持续多少分钟电脑自动关机就好

如果能加入监控某个软件更好，如果低于多少持续多久就执行另外的程序

比如监控旋风下载，旋风的任务完成了他就没有速度了，然后自动启动迅雷继续下载

感谢....

8191

定时关机3000
不过是收费版

limy

winoff就可以，
http://dl.vmall.com/c047sc78ac

li13911

百度一下 千宇智能关机，需要旋风设置成启动后开始下载。然后开启千余智能关机的网络监控当小于多少速度的时候关闭迅雷打开旋风。下载页面http://www.ddeee.com/old/index.php，我这里XP、WIN7 32位下可用，其他没测试。

林晚晴

li13911 发表于 2013-2-19 22:06
百度一下 千宇智能关机，需要旋风设置成启动后开始下载。然后开启千余智能关机的网络监控当小于多少速度的时 ...

谢了，我下载先试试

mmppp9898

绕那么大一圈干嘛？
让下载软件自己下载完就关机啊！都有这个功能！还监控网络，流量低于多少并且持续多少分钟就关机？那不是多此一举么？现成的不用？

wyj915752168

很多下载软件有“下载完自动关机”功能，给跪了。。。

loms126

我用AHK改编了一个，原作者 海盗 <healthlolicon@gmail.com>，在此感谢。倒数第五行添加自己想要执行的动作。
lz 看还需要什么功能，再修改。

---

; AHK版本:                 L:1.1.3.0
; 作者:                        海盗 <healthlolicon@gmail.com>
; 功能:                        WIN7可用的实时流量监控
; 参考:                        http://msdn.microsoft.com/en-us/ ... 6%28v=VS.85%29.aspx
;                                http://msdn.microsoft.com/en-us/ ... 0%28v=VS.85%29.aspx
;                                http://ahk.5d6d.com/forum-43-1.html
;===============================================================

idle_time        :=        60*30        ;空闲时间                单位 秒
low_speed        :=        30                ;最低网速限制         单位 K/s
;===============================================================
idle_count         := 0
objWMIService :=ComObjGet("winmgmts:\\.\root\cimv2")
;获取网卡信息
colNetAdapter:= objWMIService.ExecQuery("Select * from Win32_NetworkAdapter where NetEnabled=true")
for objNetAdapter in colNetAdapter
{
        Name:=objNetAdapter.Name
        Mac:=objNetAdapter.MACAddress
}
StringReplace,Name_,Name_,/,_,all
StringReplace,Name_,Name,#,_,all
StringReplace,Name_,Name_,(,[,all
StringReplace,Name_,Name_,),],all
WQL:="Select * from Win32_PerfRawData_Tcpip_NetworkInterface where Name='" . Name_ . "'"

Gui, Add, Text, x12 y10  , 网卡:%Name%
Gui, Add, Text, x12 y30  , MAC地址:%Mac%
Gui, Add, Text, x12 y50 w80  , 下载速度:
Gui, Add, Text, x102 y50 w100  vSpeed_Received,%Speed_Received%
Gui, Add, Text, x212 y50 w100   , KB/S
Gui, Add, Text, x12 y70 w80 h30 , 上传速度:
Gui, Add, Text, x102 y70 w100   vSpeed_Sent,%Speed_Sent%
Gui, Add, Text, x212 y70 w100   , KB/S
Gui, Show,  w326, 流量监控
Time_1 := A_TickCount
BytesReceivedNew=0
BytesSentNew=0
SetTimer,Speed,1000
Return

Speed:
;获取流量信息
colPerfRawData:= objWMIService.ExecQuery(WQL)
for objPerfRawData in colPerfRawData
{
        BytesReceivedOld:=BytesReceivedNew
        BytesReceivedNew:=objPerfRawData.BytesReceivedPerSec
        BytesSentOld:=BytesSentNew
        BytesSentNew:=objPerfRawData.BytesSentPerSec
}
Time_2 := A_TickCount
Speed_Received:=(BytesReceivedNew-BytesReceivedOld)/(Time_2-Time_1)/1024*1000
Speed_Sent:=(BytesSentNew-BytesSentOld)/(Time_2-Time_1)/1024*1000
Time_1:=Time_2
Gosub,Refresh
Return

Refresh:
GuiControl,,Speed_Sent,%Speed_Sent%
GuiControl,,Speed_Received,%Speed_Received%

if (Speed_Received<low_speed)
        idle_count := idle_count+1
else
        idle_count := 0
if (idle_count>idle_time)
{
        ;此处添加超时后的动作代码
        ;Shutdown,1                ;关机
        ;WinClose QQ旋风 ahk_class Tencent_Downloader_Main_Window
        ;run,thunder.exe        ;迅雷的完整路径，需启动自动进行未完成下载
}

Return

GuiClose:
ExitApp

很多人的哥

楼上技术帝。

林晚晴

mmppp9898 发表于 2013-2-21 23:32
绕那么大一圈干嘛？
让下载软件自己下载完就关机啊！都有这个功能！还监控网络，流量低于多少并且持续多少 ...

如果出现没有速度的情况