dsoframer CDsoFramerControl类下新增接口函数,为何网页不能调用?
STDMETHODIMP CDsoFramerControl::SetWebInf(VARIANT URL, VARIANT ser)
{
m_lpURL = LPWSTR_FROM_VARIANT(URL) ;
m_lpSer = LPWSTR_FROM_VARIANT(ser) ;
return S_OK ;
}
以上是整个新增接口函数,网页中执行vbs语句
Sub SetURL()
Dim sUrl,sUrl2
sUrl = "http://192.168.89.133:8080/ccses"
sUrl2 = "http://ws.service.com"
On Error Resume Next
oframe.setwebinf sUrl,sUrl2
if err.number then
MsgBox "Unable to Open URL: " & err.description
end if
MsgBox "设置完毕"
End Sub
却弹出对象不支持该属性或方法
我原意是增加一个接口函数,让网页调用,但是却无法解决问题,希望各位高手帮忙,谢谢