请教关于webblower的用法

lordcatus

我想实现的功能是能够用access登录咱这论坛。并能搜索。。

没有恶意。我在另一个项目上想实现这个功能。。

请斑竹帮忙。。

我上传的是咱论坛一大牛的例程。他实现了登录。。我想在此基础上实现搜索。。

但试了几次都不成功。

请高手给指点下。。

tmtony

我以前用这个方法, 给你参考一下
   Set objForm = objWB.Document.Forms(0)
   
    objWB.Document.loginform.UserName.Value = IIf(IsNull(UserName.Value), "", UserName.Value)
    objWB.Document.loginform.Password.Value = IIf(IsNull(Password.Value), "", Password.Value)

    objForm.submit

弄好后做个针对本论坛做一个示例给大家参考一下

lordcatus

这个就是根据这句代码做的。这个功能我已经实现了。。我就是在实现搜索的时候发现无法成功。
我查的资料说是webbrower无法导航。。不知是不是这个原因。。

tmtony

我用你原来的代码无法登陆,会提示出错哦, 改成
objWB.Document.loginform.UserName.Value = IIf(IsNull(UserName.Value), "", UserName.Value)
    objWB.Document.loginform.Password.Value = IIf(IsNull(Password.Value), "", Password.Value)
才可以

wyh

改用
objForm.elements(1).Value = IIf(IsNull(Text9.Value), "", Text9.Value)
可设置 搜索 关键字

nxjswt

[:26] xx学习

lordcatus

这个还有个问题。如果cookie起作用登陆就会出现错误。。

改用
objForm.elements(1).Value = IIf(IsNull(Text9.Value), "", Text9.Value)
可设置 搜索 关键字

不是很明白这里。。

我直接用这句的话提示错误。。是不是我有的地方没有改到？

能帮我改一下吗？

tmtony

我测试 是可以的
可能你出错是你的网页还未完全打开完毕

lordcatus

我想设计一个按钮。按钮按下去切换页面。等页面切换完了执行操作。。请问怎么实现？