Как определить хендл открытого удаленного подключения к ине...

← →
Alek_1 (2007-02-09 15:18) [0]

Как определить хендл открытого удаленного подключения к инетернету....подключение через обычный модем....

и потом как его и закрыть....???

либо может кто знает как закрыть уже открытый ком порт

← →
Dmitrij_K (2007-02-09 19:24) [1]

> подключение через обычный модем

RasDial

← →
Alek_1 (2007-02-12 14:01) [2]

Вроде немного начинаю разбираться...
теперь еще вопросик :)
а как отследить что соединение нарушено...например кто-то кабель вытянул... из модема...винда сразу на экран ошибку выдает в программка моя все время пишет что соединение установлено :(

Пытаюсь вот так получить статус соединения...но все время выдает статус ошибки 0...

var status: TRasConnStatus; begin status.dwSize:=SizeOf(TRasConnStatus); RasGetConnectStatus(hRas,status);

или может подругому нада как-ТО?

← →
dimod (2007-02-28 18:44) [3]

Писал раньше счетчик инета

uses
uRas; { описания RAS }

var
BufSize : Integer;
NumEntries : Integer;
X : Integer;
Entries : Array[1..MaxEntries] of TRasConn;
Result_ : Integer;
Stat : TRasConnStatus;
begin
// получить активные соединения
Entries[1].dwSize := SizeOf(TRasConn);
Bufsize:=SizeOf(TRasConn)*MaxEntries;
Result_:=RasEnumConnections(@Entries[1], BufSize, NumEntries);
if Result_=0 then begin
if (NumEntries > 0)
then begin // получить доп. информацию о соединении
FillChar(Stat, Sizeof(TRasConnStatus), 0);
Stat.dwSize:=Sizeof(TRasConnStatus);
RasGetConnectStatus(Entries[1].HRasConn, Stat);
// Entries[1].HRasConn нужный хендл
// Stat.RasConnState
// Stat.dwError
end;
// закрываем все активные соединения, если нужно
if (NumEntries > 0) then
for X:=1 to NumEntries do RasHangUp(Entries[X].HRasConn);
end;
end;

Как определить хендл открытого удаленного подключения к ине... Найти похожие ветки