W
wangxd
Unregistered / Unconfirmed
GUEST, unregistred user!
怎样用bcb取得网页中的标题啊?
下面是我的代码:
//取得html中标题
IHTMLDocument2 *bo;
OleInitialize(NULL);
WideString url="d://temp//bde.htm";
CppWebBrowser1->Navigate(url);
bo=(IHTMLDocument2 *)(&(CppWebBrowser1->Document));
wchar_t **a,*b;
wchar_t tmp[100];
b=tmp;
a=&b
bo->get_title(a);
//Edit1->Text=**a;
以上代码编译通过,但执行有误,何故?
看人家用delphi很方便的,我用bcb不爽,以下是delphi的代码,太简单了,bcb就复杂多了,(ole控制office也费劲)
var
DoC: IHTMLDocument2;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Memo1.Lines.Add(Doc.body.outerhtml)
//读源码
Memo1.Lines.Add(Doc.body.outerText)
//Html To Text
end;
问了n个人了~~~~
下面是我的代码:
//取得html中标题
IHTMLDocument2 *bo;
OleInitialize(NULL);
WideString url="d://temp//bde.htm";
CppWebBrowser1->Navigate(url);
bo=(IHTMLDocument2 *)(&(CppWebBrowser1->Document));
wchar_t **a,*b;
wchar_t tmp[100];
b=tmp;
a=&b
bo->get_title(a);
//Edit1->Text=**a;
以上代码编译通过,但执行有误,何故?
看人家用delphi很方便的,我用bcb不爽,以下是delphi的代码,太简单了,bcb就复杂多了,(ole控制office也费劲)
var
DoC: IHTMLDocument2;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Memo1.Lines.Add(Doc.body.outerhtml)
//读源码
Memo1.Lines.Add(Doc.body.outerText)
//Html To Text
end;
问了n个人了~~~~