如何实现网页中按钮的自动点击 50
如题,如何用js代码实现下面网页的自动连点,目标“已抢完”的按钮https://h5.bestpay.com.cn/subapps/myprivilege/ticketc...
如题,如何用js代码实现下面网页的自动连点,目标“已抢完”的按钮
https://h5.bestpay.com.cn/subapps/myprivilege/ticketctr/main.html?hybridVersion=3.0#/details?activityNo=9919153536 展开
https://h5.bestpay.com.cn/subapps/myprivilege/ticketctr/main.html?hybridVersion=3.0#/details?activityNo=9919153536 展开
3个回答
展开全部
Private Sub Command1_Click() WB1.Navigate Text1 End Sub Private Sub Command2_Click() Timer1.Enabled = True End Sub Private Sub Command3_Click() Unload Me End Sub Private Sub Command4_Click() Dim vDoc, vTag Dim I As Integer Set vDoc = WB1.Document List1.Clear For I = 0 To vDoc.All.length - 1 If UCase(vDoc.All(I).tagName) = "INPUT" Then Set vTag = vDoc.All(I) If vTag.Type = "submit" Then List1.AddItem vTag.Name Select Case vTag.Name Case "btnBack" vTag.Click End Select End If End If Next I End Sub Private Sub Form_Load() Timer1.Enabled = False Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer() Dim a As Long a = a + 1 Label1 = "已经运行了" & Fix(a / 60) & "分钟" If a Mod 600 = 0 Then Command4_Click End If End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
那个你可以用“ 阿冲全能点击王 ”这款软件完成啊,只需简单地添加几个按键点击任务就行了,而且 阿冲全能点击王 软件能完成各种网页点击,自动操作的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询