| 网站首页 | 业界新闻 | 群组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 编程论坛
共有 290 人关注过本帖
标题:小白一枚 求各位大佬指点 万分感谢
只看楼主 加入收藏
a260128534
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2018-3-25
  问题点数:0  回复次数:0   
小白一枚 求各位大佬指点 万分感谢
感谢您点进我的帖子 有一个疑问想向您请教
一段网页代码如下:
<input class="pub_input" required="true" type="text" placeholder="(必填)" value="" key="取票人联系方式" regtype="notempty">
图片如上
如何利用vb编写代码 在打开程序在框内输入想要的数据。
Sub Main()

    Dim ie As Object

    Set ie = CreateObject("InternetExplorer.Application")

    ie.Visible = True

    ie.Navigate "https://www.owhat.cn/goods/goodsselect.html?id=34667"
    While ie.ReadyState <> 4 Or ie.Busy = True

    DoEvents
    Wend
    ie.Document.getElementById("buyNum").Value = "3"
   
End Sub
   现在编写的程序如上
附件: 您没有浏览附件的权限,请 登录注册
2018-03-25 10:55







关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024432 second(s), 9 queries.
Copyright©2004-2018, BCCN.NET, All Rights Reserved