2

リモート ホスト サーバー上の SQL Server にファイルを保存しています。アップロードできます。しかし、ファイルをリモート サーバー パスにダウンロードする必要があります。以下のコードはファイルを抽出しますが、クライアントに保存します。

Response.BinaryWrite(bytes) を Response.TransmitFile( Server.MapPath("~/App_Data/DS/sailbig.jpg") に置き換えてみましたが、エラー ファイルが見つかりません。

SQLに保存したファイルを抽出し、サーバー上のディレクトリに配置して、後でコードで使用できるようにしたいだけですが、わかりません。これは私の趣味です。

    Dim filePath As String = HttpContext.Current.Server.MapPath("~/App_Data/DS/")
    Dim bytes() As Byte = CType(dt.Rows(0)("Data"), Byte())
    response.Buffer = True
    response.Charset = ""
    response.Cache.SetCacheability(HttpCacheability.NoCache)
    response.ContentType = dt.Rows(0)("ContentType").ToString()
    Response.AddHeader("content-disposition", "attachment;filename=" & dt.Rows(0)("FileName").ToString())
    Response.BinaryWrite(bytes)
    Response.Flush()
    Response.End()
4

1 に答える 1

1

File.WriteAllBytesを使用します。

Dim filePath As String = HttpContext.Current.Server.MapPath("~/App_Data/DS/")
Dim bytes() As Byte = CType(dt.Rows(0)("Data"), Byte())

File.WriteAllBytes(filePath & dt.Rows(0)("FileName").ToString(), bytes)
于 2013-10-03T01:58:53.707 に答える