首页    技术博客    PHP教程    数据库技术    前端开发   HTML5    Nginx    php论坛
新用户注册 | 会员登录
加入会员，解锁专属内容
取消
热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

当按钮没有关联的“名称”时，请使用ExcelVBA在InternetExplorer中单击按钮

作者：LC--Vincent | 来源：互联网 | 2023-05-24 21:54
如何解决《当按钮没有关联的“名称”时，请使用ExcelVBA在InternetExplorer中单击按钮》经验，为你挑选了1个好方法。

我正在尝试使用excel自动在时间表中输入值。时间表在网页上。现在，我可以加载页面，输入我的用户名和密码，然后自己输入时间表。请参见下面的代码。

此时，我需要单击一个按钮以打开子表单。我不知道将要打开多少个子表单。我知道当按钮具有“名称”时如何单击。但是在这种情况下，没有任何东西。因此，我下面的更新代码使用循环来打开其他所有子窗体。第一次起作用，但是当我再次起作用时

有人可以指出我如何确定页面中有多少个按钮以及如何单击每个按钮吗？在放置直到现在及其下方的代码之后，我才需要与之交互的页面的HTML代码。 

Private Sub time_sheet_filling()

    Dim I As Long
    Dim IE As Object
    Dim doc As Object
    Dim objElement As Object
    Dim objCollection As Object

    ' Create InternetExplorer Object
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True

    ' Send the form data To URL As POST binary request
    IE.navigate "http://timesheet.cccc.ca/timesheet/"

    ' Wait while IE loading...
    Do While IE.Busy
        Application.Wait DateAdd("s", 1, Now)
    Loop

        'Load the logon page
    Set objCollection = IE.Document.getElementsByTagName("input")
    I = 0
    While I 


因此，以下是html代码的摘录。我试图单击下面的html代码的最后一行中编码的按钮



Tx Tim提供答案。现在，我可以选择第一个子窗体按钮将其打开。  
links(j).click   'j = 0 

然后，将其保存，关闭，然后返回主窗体。但是当我尝试去做
links(j).click   'j = 2 this time

第二次我收到运行时错误70：权限被拒绝。再次请您提供帮助。问候


1> excelguigui1..：
在蒂姆·威廉姆斯（Tim Williams）的友好帮助下，我终于找到了遗漏的最后细节。这是下面的最终代码。  
Private Sub Open_multiple_sub_pages_from_main_page()


Dim i As Long
Dim IE As Object
Dim Doc As Object
Dim objElement As Object
Dim objCollection As Object
Dim buttonCollection As Object
Dim valeur_heure As Object


' Create InternetExplorer Object
Set IE = CreateObject("InternetExplorer.Application")
' You can uncoment Next line To see form results
IE.Visible = True

' Send the form data To URL As POST binary request
IE.navigate "http://webpage.com/"

' Wait while IE loading...
While IE.Busy
        DoEvents
Wend


Set objCollection = IE.Document.getElementsByTagName("input")

i = 0
While i 

                

        
        
    


    

        
    




    

    

        
推荐阅读

        

            
        

    




















    


    

        

            
            

                
                author-avatar
            


            

                LC--Vincent            


            

                这个家伙很懒，什么也没留下！            



        

    


    

    

    
    

    

        
Tags | 热门标签

        

            
        

    


    
    

        

            

            

        

        
RankList | 热门文章

        

            
        

    

    

    





    PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具  | 在线工具

    Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved  |   京公网安备 11010802041100号  |  京ICP备19059560号-4 | PHP1.CN 第一PHP社区      版权所有