vc获取跳转地址

  DWORD GetHttpRedirectUrl( LPCTSTR lpSrcUrl, LPTSTR pszDesUrl, DWORD dwSize )

{

CONNECT_INFO info;

ZeroMemory( &info, sizeof(CONNECT_INFO) );

_tcsncpy(pszDesUrl, lpSrcUrl, dwSize);

if ( !ParseURL( lpSrcUrl, &info ) )

return -1;

if ( info.dwServiceType != INTERNET_SERVICE_HTTP )

{

if ( info.dwServiceType== INTERNET_SERVICE_FTP )

return HTTP_STATUS_OK;

return -2;//只支持http和ftp

}

DWORD dwStatusCode = 0;

do 

{

TCHAR szAgentName[128] = {0};

_stprintf( szAgentName, _T("KDWS_%x"), this );

// 创建链接

m_hInternet = InternetOpen( szAgentName, INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);

if ( NULL == m_hInternet )

break;

unsigned long lms = 15*1000;

::InternetSetOption(m_hInternet, INTERNET_OPTION_CONTROL_RECEIVE_TIMEOUT, &lms, sizeof(lms) );

m_hSession = InternetConnect(m_hInternet, 

info.szHostName, 

info.nPort,

_tcslen(info.szUserName) > 0 ? info.szUserName : NULL,

_tcslen(info.szPassword) > 0 ? info.szPassword : NULL,

info.dwServiceType,

0,0 );

if ( NULL == m_hSession) 

break;

//初始化下载请求 

DWORD dwFlags = 

INTERNET_FLAG_EXISTING_CONNECT|INTERNET_FLAG_RAW_DATA|INTERNET_FLAG_RELOAD|         

INTERNET_FLAG_NO_AUTO_REDIRECT|INTERNET_FLAG_DONT_CACHE|INTERNET_FLAG_PRAGMA_NOCACHE;  

m_hRequest = HttpOpenRequest(m_hSession, _T("GET"), info.szObject, NULL, _T(""), NULL, dwFlags,  NULL);

if ( NULL == m_hRequest )

break;

const TCHAR szHeaders[] = _T("Accept: */*\r\nUser-Agent:  Mozilla/4.0 (compatible; MSIE 5.00; Windows 98)\r\n");

int ilen = _tcslen(szHeaders);

BOOL bResult = HttpAddRequestHeaders(m_hRequest, szHeaders, ilen, HTTP_ADDREQ_FLAG_ADD);

if ( !bResult )

{

InternetCloseHandle(m_hRequest);

break;

}

if ( HttpSendRequest(m_hRequest, NULL, 0, NULL, 0) )

{

dwStatusCode = GetStatusCode(m_hRequest);

if ( HTTP_STATUS_OK == dwStatusCode )

{

break;

}

if (dwStatusCode == HTTP_STATUS_MOVED ||

dwStatusCode == HTTP_STATUS_REDIRECT ||

dwStatusCode == HTTP_STATUS_REDIRECT_METHOD)

{

//获取跳转地址

TCHAR szBuffer[INTERNET_MAX_URL_LENGTH] = {0};

DWORD dwLen = sizeof(szBuffer);

BOOL bRet = HttpQueryInfo(m_hRequest, HTTP_QUERY_LOCATION,

szBuffer, &dwLen, NULL);

_tcsncpy(pszDesUrl, szBuffer, dwSize);

}

}

} while ( false );

CloseConnect();

return dwStatusCode;

}