数据库

本类阅读TOP10
·SQL语句导入导出大全
·SQL Server日期计算
·SQL语句导入导出大全
·SQL to Excel 的应用
·Oracle中password file的作用及说明
·MS SQLServer OLEDB分布式事务无法启动的一般解决方案
·sqlserver2000数据库置疑的解决方法
·一个比较实用的大数据量分页存储过程
·如何在正运行 SQL Server 7.0 的服务器之间传输登录和密码
·SQL中两台服务器间使用连接服务器

→ 分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
pb中动态创建浏览器的OLE对象

作者：未知 来源：月光软件站 加入时间：2005-2-28　月光软件站

动态创建浏览器的OLE对象

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

//这个可以执行JS

oleobject WshShell
WshShell = create oleobject
WshShell.connecttonewobject( "WScript.Shell")
integer li_Return
li_Return = WshShell.Run("cscript E:\validate.js", 1, true)
messagebox("",li_return)
WshShell.DisconnectObject ( )
destroy WshShell

OLE嵌入浏览器，如何调用其载入网页中的函数

比如网页中有这么个函数：
<SCRIPT language=JavaScript>
 function showmessage(img_name)
 {
  alert(img_name);
 }
 </SCRIPT>

PB中调用：
ole_1.object.document.parentWindow.showmessage("吞硬币的小猪");

不过注意，JavaScript的函数是区分大小写的，而PB对大小写不敏感：），因此只有网页中函数名称是小写的时候，才能够在PB中调用。

相关文章：

相关软件：