我用VC的wininet库编了一个程序,想用来访问网页。遇到一些问题,请高手指教。
功能函数如下:
UINT OpenURL(
HWND hWnd,
LPCTSTR lpszVerb,
LPCTSTR lpszServerName,
LPCTSTR lpszServerPort,
LPCTSTR lpszObjectName
)
{
HINTERNET hInt,hConn,hReq;
TCHAR szBuffer;
DWORD uLen;
BOOL bResult;
SetCursor(LoadCursor(NULL,IDC_WAIT));
hInt = InternetOpen(
"Microsoft Internet Explorer",
INTERNET_OPEN_TYPE_DIRECT,
NULL,
NULL,
INTERNET_FLAG_ASYNC
);
if (hConn = InternetConnect(hInt,lpszServerName,atoi(lpszServerPort),NULL,NULL,
INTERNET_SERVICE_HTTP,0,0))
{
if (hReq = HttpOpenRequest(hConn,lpszVerb,lpszObjectName,NULL,"",NULL,0,0))
{
bResult = HttpSendRequest(hReq,NULL,0,NULL,0);
bResult = InternetReadFile(hReq,szBuffer,65535,&uLen);
bResult = TextOut(GetDC(hWnd),0,0,szBuffer,uLen);
}
}
InternetCloseHandle(hInt);
SetCursor(LoadCursor(NULL,IDC_ARROW));
return 0;
}
经过调试,发现运行到以下行时出问题
bResult = HttpSendRequest(hReq,NULL,0,NULL,0);
bResult的值即函数返回值为0,说明运行不正常。
采用GetLastError()获取的出错值为997。
我不知道这个程序的错误在哪里
调试时使用的参数如下:
LPCTSTR lpszVerb "GET"
LPCTSTR lpszServerName "www.online.sh.cn"
LPCTSTR lpszServerPort "80"
LPCTSTR lpszObjectName "/"
请高手不吝赐教,谢谢!
|