Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Fremdes Programm abhorchen und neue Werte setzten !
Autor: Martoeng (Moderator)
Datum: 04.06.03 10:24
Private Declare Function RasEnumConnections Lib "rasapi32" Alias _ "RasEnumConnectionsA" (ByVal lprasconn As Long, ByVal lpcb _ As Long, ByVal lpcConnections As Long) As Long Private Declare Function RasGetConnectionStatistics Lib "rasapi32" _ (ByVal hRasConn As Long, ByVal lpStatistics As Long) As Long Private Type RASCONN dwSize As Long hRasConn As Long szEntryName(0 To 256) As Byte szDeviceType(0 To 16) As Byte szDeviceName(0 To 128) As Byte pad As Byte End Type Private Type RAS_STATS dwSize As Long dwBytesXmited As Long dwBytesRcved As Long dwFramesXmited As Long dwFramesRcved As Long dwCrcErr As Long dwTimeoutErr As Long dwAlignmentErr As Long dwHardwareOverrunErr As Long dwFramingErr As Long dwBufferOverrunErr As Long dwCompressionRatioIn As Long dwCompressionRatioOut As Long dwBps As Long dwConnectDuration As Long End Type Private Sub Form_Load() Dim conn As RASCONN Dim stat As RAS_STATS Dim y As Long, z As Long conn.dwSize = Len(conn) y = conn.dwSize If RasEnumConnections(VarPtr(conn), VarPtr(y), VarPtr(z)) = 0 Then stat.dwSize = Len(stat) If RasGetConnectionStatistics(conn.hRasConn, VarPtr(stat)) = 0 Then Debug.Print stat.dwAlignmentErr Debug.Print stat.dwBps Debug.Print stat.dwBufferOverrunErr Debug.Print stat.dwBytesRcved Debug.Print stat.dwBytesXmited Debug.Print stat.dwCompressionRatioIn Debug.Print stat.dwCompressionRatioOut Debug.Print stat.dwConnectDuration Debug.Print stat.dwCrcErr Debug.Print stat.dwFramesRcved Debug.Print stat.dwFramesXmited Debug.Print stat.dwFramingErr Debug.Print stat.dwTimeoutErr End If End If End Sub vbarchiv.dll (Freeware), Tutorials uvm. auf http://www.martoeng.com.

Fremdes Programm abhorchen und neue Werte setzten !	143	JEGI0605	02.06.03 08:53
Re: Fremdes Programm abhorchen und neue Werte setzten !	72	JEGI0605	03.06.03 11:18
Re: Fremdes Programm abhorchen und neue Werte setzten !	357	Martoeng	03.06.03 13:16
Re: Fremdes Programm abhorchen und neue Werte setzten !	63	JEGI0605	04.06.03 08:11
Re: Fremdes Programm abhorchen und neue Werte setzten !	350	Martoeng	04.06.03 10:24

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen