使用TCppWebBrowser如何保存为:网页，全部（*.htm;*.html）类型文件

[hebei]

我在BCB中使用TCppWebBrowser，为什么
TCppWebBrowser1->ExecWB(OLECMDID_SAVEAS,OLECMDEXECOPT_DODEFAULT);
保存：网页，仅HTML（*.htm;*.html）和文本文件(*.txt)时没问题，保存：网页，全部（*.htm;*.html）时是空文件

[hebei]

up

[叶子哟]

看看msdn吧,没弄过

[storejyjs]

#include "Mshtml.h"
void __fastcall TMainForm::SpeedButton4Click(TObject *Sender)
{
IHTMLDocument2 *document= NULL;
IHTMLElement *body;
BSTR title,source,content;
(void *)document=CppWebBrowser1->Document;
document->get_title(&title); //取title
document->get_body(&body);
body->get_outerHTML(&source);//取源程序
//下面调用Write_String_To_File(),来写文件

document->Release();
}


void __fastcall TForm1::Write_String_To_File(FILE *fp,AnsiString Line)
{
char *p=(char *)malloc(Line.Length()+10); //动态分配内存
memset(p,0,Line.Length());
strcpy(p,Line.c_str());


while(*p!='\0')
{
fputc(*p,fp);
p++;
}

putc('\n',fp);

}

[Friecin]

： storejyjs(独行的狼) 的方法不错，值得推荐！

[hebei]

用storejyjs(独行的狼)的方法即使可以保存 网页，全部（*.htm;*.html）类型文件，但是当需要保存为 文本文件(*.txt) 时怎么办？是不是还得使用
TCppWebBrowser1->ExecWB(OLECMDID_SAVEAS,OLECMDEXECOPT_DODEFAULT);
方法？那不是更麻烦么。

我需要解决用
TCppWebBrowser1->ExecWB(OLECMDID_SAVEAS,OLECMDEXECOPT_DODEFAULT);
既可以保存：网页，仅HTML（*.htm;*.html）和文本文件(*.txt)，又可以保存：网页，全部（*.htm;*.html）文件的方法

[hebei]

up

[storejyjs]

如果要保存为文本，只要做一处改动就可以
body->get_outerHTML(&source);//取源程序
＝＞body->get_outertext(&source);//取文本文件