Question

我无法将数据放入网站页面。该页面是一个asp。我想通过userform输入信息。在这个阶段，我只是想访问网页字段来输入数据。我对excel vba知之甚少，但我知道它可以成为我使用的好工具。

我追求的结果是能够找到特定区号的街道地址。如果我不能自动化它，我将不得不手工完成，这将是乏味和耗时的。数据将存储在excel中。

我想与之互动的网页位于本地评估网站上。我的问题是什么是最好的路线。我尝试使用getElementsByTagName表单和ID但它不起作用或我使用了错误的方法。

Itfind字符串是查看它是否正在访问我想要的html代码中的字段。然而它仍然是空洞的。我尝试了一个for循环它没有用。

所有答案都有帮助。请举例让我明白。

由于

以下是我开始使用的代码。

Sub Addrfind()
Dim IE As New InternetExplorer

    IE.navigate ""

    Do
        DoEvents
    Loop Until IE.readyState = READYSTATE_COMPLETE

    Dim doc As HTMLDocument
    Set doc = IE.document
    Dim Itfind As String
    Itfind = doc.getElementsByTagName("Form").Item(1)

以下是我试图操作的字段的缩小版本。我想将数据输入**值=＆＃34;＆＃34; ** s。我知道最初的方法已经关闭但需要一些方向来纠正这个问题。

<table>...</table>
<div Class="">...</div>
<table>...</table>
<table>...</table>
<table>...</table>
<form name="frm1" id="frm1" action="Ad.asp" method="post"></form>
<tbody>
    <tr>...</tr>
    <tr>...</tr>
       <form name="frm2" id="frm2" action="Ad.asp" method="get"></form>
    <tr>...</tr>
    <tr>...</tr>
    <tr>
        <td class="sub_header">Street Name</td>
        <td><input name="stname" type="text" size="20" maxlength="20" value=""></td>
    </tr>
    <tr>...</tr>
    <tr>...</tr>
    <tr>
        <td class="sub_header">Zip</td>
        <td><input name="zip" type="text" size="5" maxlength="5" value=""></td>
    </tr>
  </tbody>

使用vba将数据导出到网页中

0 个答案: