gwinetworks
New member
Hello all,
I am working on a service for monitoring our network (company too cheap to buy software)
Anywho, I can get the pings to run through, but takes a long time as it waits for each ping to complete before sending the next ping.
[XCODE] Whilerdr.Read
pingInfo.strLocation = rdr("txtLocation").ToString
pingInfo.strHost = rdr("txtHost").ToString
pingInfo.strIP = rdr("txtIPAddress").ToString()
sendPing(pingInfo)
End While
[/XCODE]
Anythoughts on how to fire these all at the same time? I tried a threadpool and tpool.queworkeritem, but then it didn't update the pinginfo for each and I got 300 responses from the first location in my list.
I am working on a service for monitoring our network (company too cheap to buy software)
Anywho, I can get the pings to run through, but takes a long time as it waits for each ping to complete before sending the next ping.
[XCODE] Whilerdr.Read
pingInfo.strLocation = rdr("txtLocation").ToString
pingInfo.strHost = rdr("txtHost").ToString
pingInfo.strIP = rdr("txtIPAddress").ToString()
sendPing(pingInfo)
End While
[/XCODE]
Anythoughts on how to fire these all at the same time? I tried a threadpool and tpool.queworkeritem, but then it didn't update the pinginfo for each and I got 300 responses from the first location in my list.