Question

我正在尝试输入包裹ID：220022400803300并尝试获取结果，但即使将包裹ID放入搜索框并单击提交按钮，它也没有找到结果。

任何人都可以帮助我，或者如果有更好的方法，请告诉我。

网站访问该网站{@ 3}}后点击页面底部的Search your Real Property. Click Here.，然后选择parcel #单选按钮并输入包裹ID号220022400803300并点击{{ 1}}按钮，但它不会返回任何结果，而手动执行它会得到1个结果。

Search

Answer 1

页面上有一个隐藏的Pid，其中包含不同的字符串格式。

添加到您的代码：

    'SearchByTB
    'Delete the first 2 digits from the excel data
    '(parcel ID), e.g. 22002240080330000000 (instead of 0122002240080330000000)
    'pID = Right(pID, Len(pID) - 2)

    'Creating an hidden pid with string format like this: 22 00 22 4 008 033.00
    hiddenPID = Left(pID, 2) & " " & _
                Mid(pID, 3, 2) & " " & _
                Mid(pID, 5, 2) & " " & _
                Mid(pID, 7, 1) & " " & _
                Mid(pID, 8, 3) & " " & _
                Mid(pID, 11, 3) & "." & _
                Mid(pID, 14, 2)

    Doc.getElementById("Iframe1"). _
        contentDocument.getElementById("SearchText"). _
        Value = pID  'Put id in text box
    Doc.getElementById("Iframe1"). _
        contentDocument.getElementById("HidParcelNo"). _
        Value = hiddenPID  'Put hidden pID in the hidden element
    Doc.getElementById("Iframe1"). _
        contentDocument. _
        getElementById("Search").Click  'search button

创建简单查看POST请求时，页面点击了搜索框。

如何提交表格数据excel vba

1 个答案: