Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Sub GetmyCSV()
Dim WinHttpReq As WinHttp.WinHttpRequest
' Create an array to hold the response data.
Dim d() As Byte
Set WinHttpReq = New WinHttpRequest
' Assemble an HTTP Request.
WinHttpReq.Open "GET", _
"[URL unfurl="true"]http://test.bc.prv/corpserv/cis/sit/test.csv"[/URL]
' Send the HTTP Request.
WinHttpReq.Send
' Put response data into a file.
Open "c:\testmycsv.csv" For Binary As #1
d() = WinHttpReq.ResponseBody
Put #1, 1, d()
Close
End Sub