Модераторы: marykone
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Програмный выбор сетевого подключения. 
:(
    Опции темы
creo
Дата 15.5.2005, 13:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 15.5.2005

Репутация: нет
Всего: нет



Есть 2(3,4...N) сетевых подключений (модемных), которые уже подключены.
Необходимо програмно выбрать подключение, по которому будет происходить передача данных.
Вопрос: возможен ли такой програмный выбор и если ДА, то каким обазом?
Заранее благодарен за ответ.
PM MAIL   Вверх
dvs
Дата 15.5.2005, 13:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Владимир Драпалюк
**


Профиль
Группа: Участник Клуба
Сообщений: 660
Регистрация: 25.8.2003
Где: Воронеж->Москв а

Репутация: нет
Всего: 19



Цитата(creo @ 15.5.2005, 14:04)
Есть 2(3,4...N) сетевых подключений (модемных), которые уже подключены.

Тут понятно.

Цитата(creo @ 15.5.2005, 14:04)
Необходимо програмно выбрать подключение, по которому будет происходить передача данных.

Где? Windows? Linux? DOS? Или это твоя программа?

Расскажи поподробнее о проблеме, пожайлуста.


--------------------
Любите друг друга!
PM MAIL WWW ICQ   Вверх
creo
Дата 15.5.2005, 21:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 15.5.2005

Репутация: нет
Всего: нет



Конечная цель - реализовать параллельную передачу данных через несколько сетевых подключений (модемных). Передача будет происходить в моей программе под Windows.
PM MAIL   Вверх
dvs
Дата 15.5.2005, 22:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Владимир Драпалюк
**


Профиль
Группа: Участник Клуба
Сообщений: 660
Регистрация: 25.8.2003
Где: Воронеж->Москв а

Репутация: нет
Всего: 19



Цитата
Способ 1 - из реестра:


uses Registry;

function DUNGetConnections(out OutList: TStringList): Boolean;
  var Reg: TRegistry;
begin
  OutList.Clear;
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_CURRENT_USER;
  if Reg.OpenKey('\RemoteAccess\Profile', False) then
  begin
    Reg.GetKeyNames(OutList);
    Result := True;
  end
  else
    Result := False;
  Reg.Free;
end;


Способ 2 - через RASApi:

Для этого воспользуемся функцией Use RASEnumConnections.

Далее можно определить состояние каждого соединения при помощи RASGetConnectStatus.

Так же можно использовать RASEnumEntries для получения всех сервисов из определённой телефонной книжки.

Толька для этого потребуется преобразовать заголовочный файл RAS.h в эквивалент Delphi.

Что взято Тут

Теперь осталось выяснить, в какой среде работаешь и под какую систему. Потом модератор перенесет тему в соответствующий раздел.



--------------------
Любите друг друга!
PM MAIL WWW ICQ   Вверх
DENNN
Дата 16.5.2005, 09:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 3878
Регистрация: 27.3.2002
Где: Москва

Репутация: 10
Всего: 43



PM ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Сетевые технологии | Следующая тема »


 




[ Время генерации скрипта: 0.0524 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.