Cannot find file error on Open dialog, Save works fine

[TaraPriest]

Hi all,

I've got a vb.net web application that is using a web service to
stream documents from a repository. Once the service feeds me the
document I'l downloading it using the browser response functions. If
I choose to Save it works every time. If I choose to open the file I
get an error saying the file cannot be found, create a new file? The
save does occassionally work, every other attempt at best. Any ideas
would be appreciated!

Here is my code...

Private Sub RetrieveDocumen t(ByVal e As Integer)

Dim dr As DataRow
Dim f As Byte()
Dim dtVFDocs As DataTable
Dim DocKey As Integer
Dim DownloadFileNam e As String

dtVFDocs = Session("Virtur alFolderContent s")
dr = dtVFDocs.Rows(e )
DocKey = dr("Key")
DownloadFileNam e = CreateDownloadF ileName(dr("Doc TypeName"),
dr("OriginalFil eName"), dr("StoragePath "))

'Create web service object
Dim a As New WAS.WebArchiveS ervice

'Execute web service function and return results
f = a.GetDocument(S ession("Company ID").ToString ,
Session("Connec tionString").To String, Session("User") , DocKey)

If UBound(f) 0 Then
'send file back to client browser if the file isn't 0
bytes
Response.Clear( )
Response.Append Header("Content-Disposition", "attachment ;
filename=" & DownloadFileNam e)
Response.Append Header("Content-Length", UBound(f))
Response.Conten tType = "applicatio n/octet-stream"
Response.Conten tType = "text/plain"
Response.Flush( )
Response.Binary Write(f)
Response.End()
End If

'cleanup
a = Nothing
f = Nothing
dr = Nothing
dtVFDocs = Nothing
End Sub