InetOpen

Internet ››
Parent Previous Next

Язык программирования FreeBasic

 

InetOpen


InetOpen([szUserAgent = "FB"], [iType = INTERNET_OPEN_TYPE_DIRECT] , [szProxyName = ""] ,[szProxyBypass =""], [iFlags = 0])


Инициализирует использование интернет функций. Возвращает хендл в случае успеха. Данный хендл используется некоторыми другими интернет функциями(например OpenUrl). Если произошла ошибка возвращает 0.


szUserAgent - строка символов, которая передается серверу и идентифицирует программное обеспечение, пославшее запрос.

iType - задает необходимые параметры доступа. Принимает следующие значения:

szProxyName - адрес прокси-сервера. Игнорируется только если параметр iType отличается от INTERNET_OPEN_TYPE_PROXY.

szProxyBypass - список имен или IP - адресов, соединяться с которыми нужно в обход прокси-сервера. В списке допускаются шаблоны. Так же, как и предыдущий параметр, не может содержать пустой строки. Если iType отличен от INTERNET_OPEN_TYPE_PROXY, то значения игнорируются, и параметр можно установить в null.

iFlags - задает параметры, влияющие на поведение Internet - функций . Возможно применение комбинации из следующих разрешенных значений:


Пример:


#Include "window9.bi"

Dim As HINTERNET hOpen,hUrl

hOpen = InetOpen

hUrl = OpenUrl(hOpen,"http://free-basic.ru/user-files/Window9L.zip")

MessBox("Интернет" , "Размер архива = " & GetContentSize(hUrl) & " байт")

InetFreeHandle(hOpen)

InetFreeHandle(hUrl)




http://mneniya.ucoz.ru/

Created with the Personal Edition of HelpNDoc: Easily create Help documents