VB程序员博客

+' <td id=menu8 align="center" nowrap="nowrap" width=83> <span color="#082d71" onclick="javascript:ActionHandle(2355703,8);" onmouseover="this.style.cursor='hand';"> <font color="#082d71">&nbsp;管理 </font> </span> </td>'

请问题用VB怎么触发点击如上代码“管理”链接谢谢!!!没有人回答吗？
急引用MSHTML，遍历到这个连接对象，调用这个对象的click()方法<
dim objDoc  as mshtml.htmldocument
dim objLink  as mshtml.htmllinkelement

'取得文档对象接口
set objdoc=WebBrowser1.document

'遍历所有连接
for each objlink in objdoc.links
    if instr(1,objlink.tostring,"管理") then
        objlink.click()
        exit for
    endif
next没有用哦，算了。
自已找别人办法，谢谢你们啊

标签: , 文字, 网页, 触发