Finding out the bytes sent/received in an Internet Connection

Anyone know, how to find out how many bytes are being transferred / received, via VB?

If you are using the Winsock control, the byte count is returned in the DataArrival routine.

Code:

---

Private Sub tcpClient_DataArrival(ByVal bytesTotal As Long)

---

If you use the API function recv, the byte count is the return value.

Code:

---

Declare Function recv Lib "wsock32.dll" (ByVal s As Long, buf As Any, ByVal length As Long, ByVal flags As Long) As Long

---

ccoder,

That's nice. But I did not want information a single socket, but the actual Internet Connection on the OS. For e.g. The dialog box that shows up when you are connected to the ISP showing the bytes received/sent.