一楼正解~有可能和编码有关utf-8,gb2312,或者你的js中有不和<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 互相兼容的方法,声明,写法等等
顺便帮我看看这句Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Dim doc As HTMLDocument Dim js As HTMLScriptElement Set js = doc.createElement("script") js.defer = True js.src = "http://localhost/a.js" doc.body.appendChild js End Sub 注:上述代码是vb6.0下的代码。据说这个是给webbrowser注册js的. 不知道对不对。
javascript是.js
vbscript用.asp
vb?
互相兼容的方法,声明,写法等等
将html字符串写入WebBrowser控件。当包含 <script type="text/javascript" src="b.js"> </script>时。调用b.js里的方法时提示“缺少对象”
vb写的程序。调用webbrowser控件,用来以web的方式打开一个html文档,html文档中使用了js脚本.
因为我在程序中对html文档进行了一些操作,比如替换一些值。
然后将操作后的html文档写入webbrowser控件.
再加这段之前,程序已经测试使用过一段时间.
<script type="text/javascript" src="b.js"> </script>
现在需要加上一些js脚本,所以将js脚本存储在b.js文件中但是此时再运行到执行js里方法的位置时
就提示"缺少对象"
不知我说明白没....谢谢大家..
Dim doc As HTMLDocument
Dim js As HTMLScriptElement
Set js = doc.createElement("script")
js.defer = True
js.src = "http://localhost/a.js"
doc.body.appendChild js
End Sub 注:上述代码是vb6.0下的代码。据说这个是给webbrowser注册js的.
不知道对不对。
可以加上<script type='text/javascript' charset='gb2312'></script>如果是.net可以到web.config里去改把utf-8改为gb2312