Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];

Вниз

Как получить список соединений для Интернет?   Найти похожие ветки 

 
rolex   (2007-01-05 00:46) [0]

Сабж


 
Palladin ©   (2007-01-05 00:49) [1]

соединений для Интернет не бывает, следовательно - никак


 
rolex   (2007-01-05 01:01) [2]

"Какой ты блин врубной в натуре!!! А мы тут со швабрами и с бутылками..."Гайдук - Растаманская Сказка - Про мышу."И тебя нет, и меня нет.  И ничего в натуре вовсе нет. В прикались чувак. А есть лишь одно сплошное глобальное гонево с вспонтом где то шо-то есть. И все на него ведутся как первокласники!!!"
Гайдук - Растаманская Сказка - Про войну.


 
rolex   (2007-01-05 01:08) [3]

СЕТЕВЫЕ ПОДКЛЮЧЕНИЯ
(надеюсь ценители русского языка оценят)


 
Германн ©   (2007-01-05 01:14) [4]


> rolex   (05.01.07 01:08) [3]
>
> СЕТЕВЫЕ ПОДКЛЮЧЕНИЯ
> (надеюсь ценители русского языка оценят)

Люблю русский язык. Но не оценил, поскольку не понял, что нужно :(


 
Ученик чародея ©   (2007-01-05 01:28) [5]

Если открытых TCP соединений то
GetTcpTable
This function retrieves the TCP connection table.

Искать в MSDN группу
IP Helper Functions


 
Palladin ©   (2007-01-05 01:29) [6]

нет, ты разницу между "список соединений для Интернет" и "сетевые подключения" не чувствуешь чтоли???? нашелся, тут, блин, критик-цитатор...

телепатор вообще мне подсказывал что тебе список dialup подключений нужен был... однако-ж нет...

про tcp соединения уже сказали, а про dialup... наслаждайся
http://forum.sources.ru/index.php?showtopic=30572


 
antonn ©   (2007-01-05 11:56) [7]

rolex   (05.01.07 0:46)
в инете поищи rasapi.pas (есть на http://www.torry.net/) и подключи его к проекту.

function HrasRASConnections(i:integer): integer;
const INTERNET_CONNECTION_MODEM = 1;
     MaxEntries = 100;
var
 BufSize: Integer;
 dwConnectionTypes:dword;
 NumEntries: Integer;
 Entries: array[1..MaxEntries] of TRasConn;
 State:TRasConnStatus;
begin
 result:=0;
 Entries[1].dwSize := SizeOf(TRasConn);
 Bufsize := SizeOf(TRasConn) * MaxEntries;
 RasEnumConnections(@Entries[1], BufSize, NumEntries);
 if (numentries>0) then begin
    result:= Entries[i].hrasconn;
 end;
end;

function CheckRASConnections: integer; //кол-во активных подключений
const INTERNET_CONNECTION_MODEM = 1;
 MaxEntries = 100;
var
 BufSize: Integer;
 dwConnectionTypes:dword;
 NumEntries: Integer;
 Entries: array[1..MaxEntries] of TRasConn;
 State:TRasConnStatus;
begin
 result:=0;
 Entries[1].dwSize := SizeOf(TRasConn);
 Bufsize := SizeOf(TRasConn) * MaxEntries;
 RasEnumConnections(@Entries[1], BufSize, NumEntries);
 result:=numentries;
end;

procedure Scan_New_Conn(St:Tstrings); //находим все подключения удаленного доступа
const
 MaxEntries = 100;
var
 BuffSize: Integer;
 Entries:integer;
 Entry : Array[1..MaxEntries] of TRasEntryName;
 Result_,i:integer;
begin
Entry[1].dwSize := SizeOf(TRasEntryName);
BuffSize := SizeOf(TRasEntryName) * MaxEntries;
Result_:=RasEnumEntries(nil, nil, @Entry[1], BuffSize, Entries);
if (Result_ = 0) and (Entries > 0) then
 begin
   for i:=1 to Entries do begin
    St.Add( Entry[i].szEntryName  );
   end;
end;
end;

для работы с каждым, для примера - ras.RasHangUp(HrasRASConnections(номер из списка));


 
DrPass ©   (2007-01-05 12:11) [8]


> antonn ©   (05.01.07 11:56) [7]

И чё? Вот, например, у меня на компе есть два RAS-соединения, и из них ни одно не ведет в Интернет. Зато есть PPPoE-соединение к провайдеру.
Сам по себе вопрос не имеет решения...


 
antonn ©   (2007-01-05 13:41) [9]

DrPass ©   (05.01.07 12:11) [8]
Через плечо:)
Конференция для начинающих, соответственно и вопросы задаются не профессионально и ТЗ не выкладывается. Поэтому смею продположить, что у автора есть RAS-соединение для выхода в интернет. Для остальных типов кто нибудь другой подскажет:)


 
Anatoly Podgoretsky ©   (2007-01-05 13:44) [10]

> antonn  (05.01.2007 13:41:09)  [9]

Ты телепат.


 
antonn ©   (2007-01-05 14:13) [11]

Anatoly Podgoretsky ©   (05.01.07 13:44) [10]
да, я тоже замечал за собой такое:)


 
Palladin ©   (2007-01-05 16:30) [12]


>  antonn ©

так ты опоздал со своими советами... уже давно дали наводки и ссылки...
может у тебя и есть задатки телепата, но вот с восприятием действительности - проблемы )


 
antonn ©   (2007-01-05 16:49) [13]

Palladin ©   (05.01.07 16:30) [12]
как вошел в интернет, так и дал:Р
вроде и день сегодняшний у темы, не месячной давности...
да и вообще, у меня клиент, кто еще спросит - поиск по клиенту и пост ответа:)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.038 c
2-1167763029
Zver1992
2007-01-02 21:37
2007.01.21
Поиск в файле


15-1166785722
MBo
2006-12-22 14:08
2007.01.21
Пятничные задачки ;)


15-1167852055
AntiUser
2007-01-03 22:20
2007.01.21
Mysql отказывается от GPL v3?


15-1167821218
0x07BBh
2007-01-03 13:46
2007.01.21
SOAP & DELPHI


3-1162210429
Rickkk
2006-10-30 15:13
2007.01.21
Проблема с lookup-полями в запросе





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский