以编程方式与浏览器中的“打开文件”对话框交互

Question

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

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

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

Answer 1

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