设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1356|回复: 8
打印 上一主题 下一主题

[其它] 自动访问网页的程序如何写点击按钮代码

[复制链接]
跳转到指定楼层
1#
发表于 2006-4-27 23:09:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
自动访问网页的程序如何写点击按钮代码?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2006-4-27 23:49:00 | 只看该作者
不太明白你的意思,是不是说一点按钮就能打开某个网页?

Private Sub IE_Click()
On Error GoTo Err_IE_Click

    Dim stAppName As String

    stAppName = "C:\Program Files\Internet Explorer\IEXPLORE.EXE   www.sohu.com"
    Call Shell(stAppName, 1)

Exit_IE_Click:
    Exit Sub

Err_IE_Click:
    MsgBox Err.Description
    Resume Exit_IE_Click
   
End Sub
3#
 楼主| 发表于 2006-4-28 00:13:00 | 只看该作者
登录本论坛后,要求点击"搜一搜"这个按钮
4#
 楼主| 发表于 2006-4-28 00:51:00 | 只看该作者
点击按钮的代码知道怎么写了

Set objWB = WebBrowser0.Object
Set objForm = objWB.Document.Forms(0)
objForm.all("A按钮的名称").OnClick

不过有个新问题,点击A按钮会弹出一个对话框,问是否继续,点"是"进入,点"否"不动

程序中能否写代码让他自动点"是"?
5#
发表于 2006-4-28 01:22:00 | 只看该作者
跳过他Confirm的代码,直接调用后面的。
6#
 楼主| 发表于 2006-4-28 01:27:00 | 只看该作者
提示:如果未能成功更改考点,系统仍保留您目前的预定座位。
     <script language="javascript1.2">
     function cancelKD()
     {
      if (confirm("注意:你只有一次更改考点的机会!\n如果未能成功更改考点,系统仍保留你目前的预定座位和更改考点的机会。\n\n★你真的确定更改考点吗?"))
       canSub = true;
      else
       canSub = false;
  
      if (canSub)
      {
       window.location.href="cancelServlet";
      }
     }
     </script>
                   <input name="submit3" type="button" id="submit" value="更改考点" >
网页上是这么一段,不知道如果跳过这段
7#
发表于 2006-4-28 01:53:00 | 只看该作者
window.location.href="cancelServlet";


说白了就是执行这一句,你根本不用调用按钮事件,直接调用location.href="cancelServlet"不就可以了
8#
 楼主| 发表于 2006-4-28 16:35:00 | 只看该作者
直接执行location.href="cancelServlet"报错啊,变量未定义
9#
发表于 2006-4-28 18:20:00 | 只看该作者
objWB.Document.Location.Href="cancelServlet"

怎么载入一个页面,我给你的例程里面不是有的吗?

[此贴子已经被作者于2006-4-28 10:28:10编辑过]

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-26 02:53 , Processed in 0.121839 second(s), 32 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表