Vb脚本使用用户名和密码解析网页

Question

注意：我需要使用类似Vb-Script或批处理的东西，因为这是我所熟悉的，我还需要能够运行，编辑和创建文件。

我需要在网页上命名MS Word文件值。我决定首先使用以下代码将网页下载为HTML：

function download(sFileURL, sLocation, async)
  set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
  objXMLHTTP.open "GET", sFileURL, async
  on error resume next
  objXMLHTTP.send()
  if err.number = 0 then
    do until objXMLHTTP.Status = 200
      wscript.echo objXMLHTTP.Status
      wcript.sleep(200)
    loop
    if objXMLHTTP.Status = 200 Then
      set objADOStream = CreateObject("ADODB.Stream")
      objADOStream.Open
      objADOStream.Type = 1
      objADOStream.Write objXMLHTTP.ResponseBody
      objADOStream.Position = 0    
      set objFSO = Createobject("Scripting.FileSystemObject")
      If objFSO.Fileexists(sLocation) Then objFSO.DeleteFile sLocation
      Set objFSO = Nothing
      objADOStream.SaveToFile sLocation
      objADOStream.Close
      set objADOStream = Nothing
      download = true
    end if
  else
    download = false
  end if
  set objXMLHTTP = Nothing
end function

if download("https://web.example.com\login.php", "C:\", false) then
  wscript.echo "download ok"
else
  wscript.echo "download nok"
end if

唯一的问题是要查看此页面，您需要使用用户名和密码登录。

注意：出于安全原因，我无法使用实际网页。