您的位置：程序门 -> delphi -> 网络通信/分布式开发

如何将webbrowser页面的内容保存为html文件？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

如何将webbrowser页面的内容保存为html文件？

发表于：2008-01-16 17:01:10 楼主

各位：

请问有什么办法可以将webbrowser控件打开的网页内容保存成html源文件到本地？？

谢谢

发表于：2008-01-16 19:39:511楼得分:0

成员函数ＥＸＥＣwb可以做到

发表于：2008-01-16 21:12:292楼得分:0

// 这个很简单,代码如下:
// 注意要引用mshtml单元,否则编译不了
1. 保存为文本文件:
ihtmldocument2（webbrowser1.document).body.outertext
2. 保存为html
ihtmldocument2（webbrowser1.document).body.outerhtml

发表于：2008-01-16 21:55:253楼得分:0

嗯，向 wxsan 同志学习！

发表于：2008-01-17 00:48:054楼得分:0

谢谢wxsan，非常感谢！

其实我是在做邮件客户端。用indy控件做的。使用webbrowser作为编辑器编辑邮件正文，然后发送。但去网页上收看时，却发现所发的邮件内容要么是乱码，要么就是把html代码显示出来了。

如：

我在webbrowser中输入一句话作为正文： this is a test mail.

发送时的代码为：
with msg do
begin
body.clear;
body.add（（webbrowser1.document as ihtmldocument2).body.outerhtml) ;
from.text := mailaccount.emailaddress;
replyto.emailaddresses := mailaccount.emailaddress;
recipients.emailaddresses := edtrecipients.text; { to: header }
subject := edtsubject.text; { subject: header }
priority := tidmessagepriority（cbbpriority.itemindex); { message priority }
cclist.emailaddresses := edtcc.text; {cc}
receiptrecipient.text := '';
end;
.....
with smtp do
begin
connect;
send（idmsgsend);
disconnect;
end;
.....

但是发送成功后，去网页收到的却是不正常的。收到的结果为：

<body> this is a test mail. </body>

怎么看上去像是浏览器直接把邮件下文的html代码显出来了？

有哪位高手赐教一下，，不胜感激。

发表于：2008-01-17 12:48:495楼得分:0

没有作过这方面的东西,帮你顶!

发表于：2008-01-17 15:47:156楼得分:0

ＥＸＥＣwb这个函数如何能做到，
能说的详细点吗？

下一篇：聘delphi+sql开发（兼职）
上一篇：delphi中如何进行ipx通讯

其他资讯