Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как изменить соединение с интернотм по умолчанию ? [D6, Win95/98, WinME, NT4, Win2k, WinXP]

Alpine © (2005-04-19 17:11:00)
Подскажите плизз как программно изменить соединение с интернотм по умолчанию ?

ВСЕМ СПАСИБО ЗАРАНЕЕ !

Alpine (2005-04-21 15:05:00) [1]
НАШЁЛ ! Вот здесь HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\RAS AutoDial\Default есть строковый параметр DefaultInternet который и решил мою проблемму !
ВСЕМ СПАСИБО !

Alpine (2005-04-20 17:18:00) [2]
Мне нужно через WinInet это реализовать ( ... Я не хочу подключать RasUnit. Ну неужели нет такой функции ?! ((

Digitman (2005-04-20 16:07:00) [3]
загляни в msdn.microsoft.com и поищи все касаемое RasApi, в частности RasEnumConnections() .. решение крутится вокруг ф-ции RasEnumConnections()

Alpine (2005-04-20 15:58:00) [4]
У меня ХР и в HKEY_CURRENT_USER\RemoteAccess\Profile только одна подветка ROL хотя у меня 4 ярлыка (Comstar, Matrix, Comnet, ROL). Как раз ROL у меня по умолчанию и его dword-параметр AutoConnect=0. Делал поиск по реестру других ярлыков(нипример Comstar) ничего не находит ( . Может есть другой способ ? Может какая нидь АПИ функция есть ?

Digitman (2005-04-20 15:21:00) [5]
загляни в реестр в ветку

HKEY_CURRENT_USER\RemoteAccess\Profile

ее подверки ссылаются на ярлыки удал.доступа
каждая из этих веток имеет dword-параметр AutoConnect, он д.б. равен 1, если по дифолту, и 0 в противном случае

Alpine (2005-04-20 14:31:00) [6]
> 2 Digitman

Уважаемы Digitman извините за не правильное изъяснение.
Среди ярлыков удалённого соединения у меня один ярлык с галочкой и это означает что он используется по умолчанию. Мне нужно программно сделать чтоб эта галочка появилась на одном из других ярлыков !

Digitman (2005-04-20 08:56:00) [7]

> У меня несколько соединений с интернетом

нет у тебя никаких "соединений с интернетом"

есть просто ярлыки удаленных соединений, настроенных на дозвон к тем или иным провайдерам

соединение же с провайдером - это просто вход в сеть провайдера, и не более того

провайдер же волен вообще не маршрутизировать твои запросы к хостам за пределами его, провайдера, сети, так что успешное подключение к сети провайдера совершенно не означает "соединение с интернетом" ... да и "соединиться с интернетом" - это нонсенс, можно лишь соединиться с конкретным компьютером в той или иной подсети, если же конечно твой провайдер будет к тебе "благосклонен")

Alpine (2005-04-19 17:44:00) [8]
Объясняю для тех кто не совсем понял ...
У меня несколько соединений с интернетом. С помощью нижеприведённого кода я соединяюсь с соединением по умолчанию :

Подключаюсь так

procedure TForm1.Button1Click(Sender: TObject);
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY;
if not InternetGetConnectedState(@dwConnectionTypes, 0) then
// not connected
if not InternetAutodial(INTERNET_AUTODIAL_FORCE_ONLINE or
INTERNET_AUTODIAL_FORCE_UNATTENDED, 0) then
begin
// error
end;
end;

Отключаюсь так

// hangup the default Internet connection.
procedure TForm1.Button2Click(Sender: TObject);
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY;
if InternetGetConnectedState(@dwConnectionTypes, 0) then
// connected
InternetAutodialHangup(0);
end;

Мне нужно изменять в процессе соединение по умолчанию !

Digitman (2005-04-19 17:37:00) [9]

> соединение с интернотм

дурь.
несусветная.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »