用Indy10中的IdHTTP组件上传提交文件

所属类别：DELPHI
文章作者：老扁
推荐指数：★★★☆
文档人气：711
本周人气：10
发布日期：2007-4-17

1、在C++Builder6 Update4中安装好Indy10，可以在www.ccrun.com中找到Indy10的安装包及安装方法;

2、在C++Builder6中建立一个新的Application，在Form上放置一个IdHTTP组件，再放置一个Button组件，在Button组件的OnClick事件中写入如下代码：

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TIdStringStream* ResponseStream = new TIdStringStream(NULL);
    TIdMultiPartFormDataStream* PostStream = new TIdMultiPartFormDataStream();
    TIdStringList* UploadFile = new TIdStringList();

try{
UploadFile->Values["UpFile"] = "c:\test.doc"; //假设需要上传的文件为C盘根目录下的test.doc

        IdHTTP1->Request->ContentType = PostStream->RequestContentType;
        PostStream->AddFile("UpFile",UploadFile->Values["UpFile"],GetMIMETypeFromFile(UploadFile->Values["UpFile"]));
        IdHTTP1->Post("http://localhost/", PostStream, ResponseStream);
    }
    __finally
    {
        delete UploadFile;
        delete PostStream;
        delete ResponseStream;
    }
}
3、如果想加上进度条，还可以在Form上放置一个ProgressBar组件，然后再分别在IdHTTP组件的OnWorkBegin和OnWork两个事件中写入如下代码：

void __fastcall TForm1::IdHTTP1WorkBegin(TObject *ASender, TWorkMode AWorkMode, __int64 AWorkCountMax)
{
ProgressBar1->Min = 0;
ProgressBar1->Max = AWorkCountMax;
}

void __fastcall TForm1::IdHTTP1Work(TObject *ASender, TWorkMode AWorkMode, __int64 AWorkCount)
{
ProgressBar1->Position = ProgressBar1->Position + AWorkCount;
}
这样就可以模拟HTML中Input的File来进行文件上传了，还可以继续完善这个功能，例如选择文件（可以利用OpenDialog组件）。当然，把这个转换成ActiveX，运行在客户端IE中，那就更加方便了。

Email: 吉ICP备05009985号

感谢长春订餐网友情支持