Исходники.RU - Информационный сервер для программистов: исходники со всего света.

Класс CWinInetConnection

Данный класс представляет собой набор WINAPI функций для установления и разрыва соединения с Интрнетом. Также класс позволяет определять каким образом в данный момент компьютер подключён к Интернету (напрямую, через прокси или через модем). Класс позволяет контролировать в каком состоянии в данный момент находится подключение (онлайн или оффлайн)

Скачать CWinInetConnection пример проекта (wininet_connection.zip, 11,6 Kb)

Методы	Описание
SetGlobalOnline	Переключает систему в состояние Online
SetGlobalOffline	Переключает систему в состояние Offline
GoOnline	Показывает Пользователю диалог для коннекта и позволяет выбрать нужное соединение
AutoDial	Показывает Диалог установления связи по умолчанию
Dial	Показывает Диалог связи с определённым "удалённым соединением"
AutoDialHangUp	разрывает связь, установленную AutoDial методом
HangUp	разрывает связь, установленную Dial методом
Refresh	обновляет все свойства класса
Таблица 1. методы класса CWinInetConnection

wininet_connection.gif (14112 bytes)

Свойства	Описание
IsConnected	Возвращает True если связь с интернетом установлена
ConnectionName	Возвращает строку с именем активного соединения
IsConnectionConfigured	Возвращает True если система произвела корректировки при коннекте в интернет
IsOffline	Возвращает True если система в режиме Offline
IsRasInstalled	Возвращает True если Remote Access Service (RAS) установлен в системе
UseProxy	Возвращает True если интернет настроен через прокси сервер
UseLAN	Возвращает True интернет настроен через локальную сеть
UseModem	Возвращает True система использует для интернета только модем
Таблица 2. CWinInetConnection свойства

Перед вызовом функции InternetGetConnectedStateEx её параметры инициализируются следующим образом:

Резервируем буфер для имени соединения
strConnectionName = Space(256)
'инициализируем переменную lNameLen - длина буфера
lNameLen = 256
'получаем указатель на пароль и логин
'to the function InternetGetConnectedStateEx
lPtr = StrPtr(strConnectionName)
lNameLenPtr = VarPtr(lNameLen)
'вызываем функцию InternetGetConnectedStateEx.
'ВНИМАНИЕ: в функции 2 параметра ByVal
lRetVal = InternetGetConnectedStateEx(lConnectionFlags, _
ByVal lPtr, ByVal lNameLen, 0&)

'Проверяем биты lConnectionFlags
'и инициализируем свойства класса CWinInetConnection
mvarUseModem = lConnectionFlags And INTERNET_CONNECTION_MODEM
mvarUseLAN = lConnectionFlags And INTERNET_CONNECTION_LAN
mvarUseProxy = lConnectionFlags And INTERNET_CONNECTION_PROXY
mvarIsRasInstalled = lConnectionFlags And INTERNET_RAS_INSTALLED
mvarIsOffline = lConnectionFlags And INTERNET_CONNECTION_OFFLINE
mvarIsConnectionConfigured = lConnectionFlags And _ INTERNET_CONNECTION_CONFIGURED
'получаем имя текущего соединения
mvarConnectionName = StringFromPointer(lPtr)