我正在尝试为网站网址集生成html文档对象。 我正在发送页面的表单名称以生成对象。前三页加载正常。当它进入第四页时,它没有生成对象,它什么都没有。表单名称对所有页面都是通用的。但是第四页在表单定义中包含一个类名,它与其他页面不同。
有什么方法可以解决这个问题吗?
Friend WithEvents AxWbEfile As AxSHDocVw.AxWebBrowser
Dim htmObject As HTMLDocument
Dim i_strFormName as string="myform" /*(form name)*/
htmObject=AxWbEfile.Document
Dim objForm As HTMLFormElement
blnCntrlFoundError = True
objForm = htmObject.all.item(i_strFormName)
objForm.action = i_strURL
objForm.submit()
' htmObject.all.item(i_strFormName)'正在给予什么'所以我无法加载URL。当它命中提交函数时,它会抛出以下错误。
"500 - Internal server error.There is a problem with the resource you are looking for, and it cannot be displayed"
对于其他页面,htmObject.all.item(i_strFormName)的值为'是" {System .__ ComObject}"。