StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POTrying to stream a PDF file from server1 to server2 getting file is “damaged file”
text
Body
copied!<p>i have pdf and doc file in server1 folder path(d:\files\a.pdf) now i want to read file located in server1 from server2 and show in popup with option save and open.</p> <p>below code i written in server1:</p> <p>If File.Exists(d:\files\a.pdf) Then Dim fs As New FileStream(isFullFilePath & filename, FileMode.Open, FileAccess.Read, FileShare.Read) 'Try Try</p> <pre><code> fs = New FileStream(isFullFilePath & filename, FileMode.Open, FileAccess.Read, FileShare.Read) ' Catch ex As FileNotFoundException 'UploadDoc.PostedFile.SaveAs(UploadDoc.PostedFile.FileName) ' fs = New FileStream(UploadDoc.PostedFile.FileName, FileMode.Open, FileAccess.Read, FileShare.Read) 'End Try Dim byteArray(fs.Length) As Byte fs.Read(byteArray, 0, fs.Length) Response.ContentType = "application/pdf" Response.BinaryWrite(byteArray) Catch ex As Exception Finally fs.Close() End Try </code></pre> <p>and in server2 :</p> <pre><code> Dim objHttpWebRequest As HttpWebRequest Dim objHttpWebResponse As HttpWebResponse objHttpWebRequest = HttpWebRequest.Create(DownloadURL) objHttpWebRequest.Method = WebRequestMethods.Http.Post objHttpWebRequest.Timeout = 600000 objHttpWebRequest.MaximumResponseHeadersLength = 80000000 objHttpWebResponse = objHttpWebRequest.GetResponse() If objHttpWebResponse.StatusCode = HttpStatusCode.OK Then 'Dim dataStream As Stream = objHttpWebResponse.GetResponseStream Dim BArr(objHttpWebResponse.ContentLength - 1) As Byte 'Dim fs As StreamWriter 'Request.InputStream.Read(BArr, 0, objHttpWebResponse.ContentLength) objHttpWebResponse.GetResponseStream.Read(BArr, 0, objHttpWebResponse.GetResponseStream.ReadByte) Response.ContentType = "application/pdf" Response.Charset = "UTF-8" Response.AddHeader("Content-Disposition", "attachment;filename=" & strFileNameID(0)) Response.AddHeader("Content-Length", objHttpWebResponse.ContentLength) Response.BinaryWrite(BArr) </code></pre> <p>but getting error PDF is damage,after 8 hour spending.....</p> <p>Please help me </p> <p>Thanks in advance Raghvendra</p>

Querying!

Guidance

An individual column

Larger individual text columns get their own page to allow for proper reading.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload