Trying to load a file into code.
Current code:
Dim uri As New UriBuilder uri.UserName = "xxx" uri.Password = "xxx" uri.Host = "xxx" uri.Path = "xxx.aspx?q=65" Dim request As HttpWebRequest = DirectCast(WebRequest.Create(uri.Uri), HttpWebRequest) request.AllowAutoRedirect = True request = DirectCast(WebRequest.Create(DownloadUrlIn), HttpWebRequest) request.Timeout = 10000 'request.AllowWriteStreamBuffering = True Dim response As HttpWebResponse = Nothing response = DirectCast(request.GetResponse(), HttpWebResponse) Dim s As Stream = response.GetResponseStream() 'Write to disk Dim fs As New FileStream("c:\xxx.pdf", FileMode.Create) Dim read As Byte() = New Byte(255) {} Dim count As Integer = s.Read(read, 0, read.Length) While count > 0 fs.Write(read, 0, count) count = s.Read(read, 0, read.Length) End While 'Close everything fs.Close() s.Close() response.Close()
Run this code and verify the response. ResponseUri indicates that it is redirected back to the login page, and not to the pdf file.
For some reason, it does not allow access to what I can skip since I am sending the username and password to uri? Thanks for your help.
source share