>DECLARE INTEGER InternetQueryOption IN WinInet.dll ;
> INTEGER hInternet, ;
> STRING dwOption, ;
> STRING @lpBuffer, ;
> LONG @lpdwBufferLength
>
>DECLARE INTEGER InternetOpen IN WININET.DLL ;
> STRING, ;
> INTEGER, ;
> STRING, ;
> STRING, ;
> INTEGER
>
>hInternet = InternetOpen("EKraft Web Application", 0, NULL,NULL,0)
>
>lpdwBufferLength = 0
>lpBuffer = SPACE(0)
>dwOption = NumToDWord(41)
>?InternetQueryOption(hInternet, dwOption, @lpBuffer, @lpdwBufferLength)
>
>BOOL InternetQueryOption( > IN HINTERNET hInternet, > IN DWORD dwOption, > OUT LPVOID lpBuffer, > IN OUT LPDWORD lpdwBufferLength >); >>
DECLARE INTEGER InternetQueryOption IN WinInet.dll; INTEGER hInternet, INTEGER dwOption, STRING @lpBuffer, INTEGER @lpdwBufferLength