现在我们有一套基于IE的应用系统,中间件是JBOSS,因为无法直接访问其数据库(安全权限要求),所以想用delphi的功能,直接调用其报表功能函数(JBOSS中的函数),直接将数据查询出来,自动登录功能已经实现,但是其部分网页使用了js脚本动态生成,不知道如何做了,哪位大哥给个解决方案?网上关于ihtmldocument2接口的文章均已查看过,没有一个能用的上的,不在乎分数多少,解决就结贴,谢谢。
附自动登录功能:
procedure TForm1.Button1Click(Sender: TObject);
var
Doc:IHTMLDocument2;
form:IHTMLFormElement;
userinputelement,pwdinputelement:ihtmlinputelement;
i:Integer;
begin
doc:=webbrowser1.document as ihtmldocument2;
userinputelement:=(doc.all.item('username_temp',0) as ihtmlinputelement);
userinputelement.value:='3876';
pwdinputelement:=(doc.all.item('password',0) as ihtmlinputelement);
pwdinputelement.value:='12345678';
WebBrowser1.OleObject.document.parentWindow.execScript('loginJudge()','JavaScript');
end;
但是,登录过后,进入到系统中,需要点击相应的几个按钮才会到相应的画面中,输入查询条件,点击查询按钮生成报表,然后提供了导出功能,我想实现的是,delphi直接调用查询按钮的功能函数,直接取得数据。