Allgemeine Fragen zur PROFAN Programmierung

Views (Heute): 249308 (10744)

| Suchen
| Zurück zur Übersicht

Autor | Thema: Online ?
Jürgen K.
| Datum:15.12.01 09:09 |
PROC RAS_EnumConnections DECLARE c_Buffer$, i_Lang&, i_Anzahl& c_Buffer$ = CHR$(156)+CHR$(01)+CHR$(00)+CHR$(00)+MkStr$(CHR$(00),408) i_Lang& = 412 DEF @RasEnumConnections(03) ! "RASAPI32.DLL","RasEnumConnectionsA" RasEnumConnections(ADDR(c_Buffer$), ADDR(i_Lang&), ADDR(i_Anzahl&)) RETURN i_Anzahl& ENDPROC PRINT "Aktive Verbindung :" RAS_EnumConnections Print @&(0) Waitinput
Martin Heller
| Datum:15.12.01 11:50 (martin@technopolis.de) |
Also bei mir funktioniert die Routine einwandfrei er zeigt mir 1 an und ich bin online! Martin
Martin Heller
| Datum:15.12.01 11:54 (martin@technopolis.de) |
Oder war das die Antwort auf "rechner online oder nicht"? Martin
Jürgen K.
| Datum:15.12.01 12:16 |
Ja !
Christian Devilbis
| Datum:15.12.01 12:21 (christian_devilbis@lycos.de) |
Hi, hab ja nun die DLL von Thorsten und den Quellcode hier mal ausprobiert. Naja, setze ich die DEF Anweisung mal aus der PROC raus, ganz nach oben, scheint es soweit unter Win 98/Me zu Funktionieren, genauso wie mit der DLL. Unter Win NT bekomme ich jedoch einen Systemfehler, mit der DLL funktioniert das ebenfalls unter NT. gruss Christian
Jürgen K.
| Datum: 15.12.01 13:55 |
Ungetestet ... unter NT PROC RAS_EnumConnections DECLARE c_Buffer$, i_Lang&, i_Anzahl& c_Buffer$ = CHR$(32)+MkStr$(CHR$(00),31) i_Lang& = 32 DEF @RasEnumConnections(03) ! "RASAPI32.DLL","RasEnumConnectionsA" RasEnumConnections(ADDR(c_Buffer$), ADDR(i_Lang&), ADDR(i_Anzahl&)) RETURN i_Anzahl& ENDPROC PRINT "Aktive Verbindung :" RAS_EnumConnections Print @&(0) Waitinput

| Zurück zur Übersicht