將excel行中的值提交到網頁並獲取返回值

Question

我有一個帶有用戶列表的excel表單，有沒有一種方法可以將此列表一個接一個地發送到接受用戶名的內部網站文本框來檢查此用戶是否存在並將輸出打印到新列？

當找到用戶時，它將打印用戶詳細信息。 未找到時會顯示未找到。

Answer 1

有可能需要一些與此類似：

Function testHttpGet() 
    Dim oHttp As Object 
    Set oHttp = CreateObject("Microsoft.XMLHTTP") 
    MyUrl = "http://10.0.21.130/test.php?name=mikeqq" 
    oHttp.Open "GET", MyUrl, False 
    oHttp.send 
    'MsgBox oHttp.Status 
    If oHttpPost.Status < 300 Then 
     SomeVar = oHttpPost.responseText 
     MsgBox SomeVar 
    End If 
End Function