PowerBuilder嵌入浏览器

公司最近计划搞一个报表服务器，用FineReport作为后台Web Server，浏览器作为客户端。

公司的ERP是使用PowerBuilder 9.0开发的，为了实现在ERP中集成FineReport，想到了在PowerBuilder中嵌入IE控件的处理方式。

在网上搜到下面代码：

Integer result
oleobject objExplorer

objExplorer = CREATE oleobject
result = objExplorer.ConnectToNewObject( "InternetExplorer.Application")
IF result = 0 THEN
    objExplorer.Navigate("about:blank")
    objExplorer.ToolBar = 0
    objExplorer.StatusBar = 0
    objExplorer.Width = 300
    objExplorer.Height = 150
    objExplorer.Left = 0
    objExplorer.Top = 0
    objExplorer.Visible = 1
END IF

上面的代码可以实现在PB里面打开一个浏览器窗口，不过这个窗口是另外开的，没有嵌入到PB中。

修改一下：
1. 插入一个OLE对象Microsoft Web Browser，命名为ole_1。
2. 写一段代码：ole_1.object.Navigate("http://www.baidu.com")。
3. 运行程序，成功。

如何在PB中调用浏览器的JavaScript？
1. 在网页中写入要调用的脚本：

<SCRIPT language=JavaScript>
function showmessage(img_name) 
{
    alert(img_name);
}
</SCRIPT>

2. 在PB中调用：

ole_1.object.document.parentWindow.showmessage("吞硬币的小猪");