2

我正在尝试从网站中提取高程数据

http://www.gpsvisualizer.com/convert_input

我已经成功地弄清楚了如何以编程方式单击打开文件对话框的“选择文件”按钮。

Private Sub browser_DocumentCompleted() Handles browser.DocumentCompleted
    hDoc = browser.Document
    Dim hInp As HtmlElement = hDoc.GetElementById("uploaded_file_1")

    If hInp IsNot Nothing Then
        hInp.Focus()
        hInp.InvokeMember("Click")
    End If
End Sub

现在我对如何与弹出框进行交互感到困惑。我需要填写我需要转换的文件的文件名,然后在此对话框中单击打开。有谁知道如何做到这一点?谢谢!

4

1 回答 1

0

目前,我正在将要上传到列表框的文件的路径添加到列表框中,然后将每个文件复制到剪贴板并使用 sendkeys。我对这种方法并不感到兴奋,但它确实有效。

于 2013-09-20T09:20:33.593 回答