五、上傳圖像並使用ASP.Net 2.0數據源控件代碼存儲二進制數據
盡管ADO.NET方法工作在一個 ASP.NET 2.0應用程序環境下,但是,你還能夠使用ASP.NET 2.0的數據源控件來把二進制數據存儲到一個數據庫,這不要求你編寫ADO.Net代碼。在這個演示程序中所使用的SqlDataSource控件包含了 一個InsertCommand,以及相應於Title,MIMEType和ImageData值的參數:
<ASP:SqlDataSource ID="UploadPictureDataSource" runat="server"
ConnectionString="..."
InsertCommand="INSERT INTO [Pictures] ([Title], [MIMEType], [ImageData]) VALUES (@Title, @MIMEType, @ImageData)">
<InsertParameters>
<ASP:Parameter Name="Title" Type="String" />
<ASP:Parameter Name="MIMEType" Type="String" />
<ASP:Parameter Name="ImageData" />
</InsertParameters>
</ASP:SqlDataSource>
注意,在此,ImageData參數並沒有指定一個類型。如果你試圖使用GUI向導來構建SqlDataSource的語法,那麼,它 將可能給它指定Type="Object",然而,這個Type="Object"將會產生一個sql_variant類型的參數。然而,該 sql_variants類型不能用來存儲圖像或varbinary(MAX)數據類型,因為該sql_variant的內在數據大小不能超過8,000 個字節。(如果你試圖使用Type="Object",然後試圖保存超過8,000字節大小的二進制數據,那麼,系統將拋出一個異常並顯示消息 "Parameter '@ImageData' exceeds the size limit for the sql_variant datatype";如果你試圖添加不到8,000字節大小的二進制數據,那麼,該異常將顯示消息"Implicit conversion from data type sql_variant to varbinary(max) is not allowed")。
另外, DetailsView控件包含了兩個TemplateField。其中,一個TemplateFIEld中使用一個TextBox控件來顯示標題欄;另 一個使用一個FileUpload控件來表示ImageData欄。最終結果是得到一個看上去類似於在"上傳圖像並使用ADO.Net代碼存儲二進制數據 "一節中的用戶接口。當點擊DetailsVIEw的"Insert"按鈕時,它的Inserting事件激發,這時二進制數據必須從 FileUpload控件中獲取,讀到一個字節數組中,並且賦值給適當的參數:
Protected Sub UploadPictureUI_ItemInserting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DetailsVIEwInsertEventArgs) Handles UploadPictureUI.ItemInserting
'引用FileUpload控件
Dim UploadedFile As FileUpload = CType(UploadPictureUI.FindControl("UploadedFile"), FileUpload)
'確保已經成功上傳一個文件
If UploadedFile.PostedFile Is Nothing OrElse String.IsNullOrEmpty(UploadedFile.PostedFile.FileName) OrElse UploadedFile.PostedFile.InputStream Is Nothing Then
...顯示錯誤信息...
e.Cancel = True
Exit Sub
End If
'確保我們在處理一個JPG或GIF文件
Dim extension As String = Path.GetExtension(UploadedFile.PostedFile.FileName).ToLower()
Dim MIMEType As String = Nothing
Select Case extension
Case ".gif"
MIMEType = "image/gif"
Case ".jpg", ".jpeg", ".jpe"
MIMEType = "image/jpeg"
Case ".png"
MIMEType = "image/png"
Case Else
'無效文件類型上載
... 顯示錯誤信息...
e.Cancel = True
Exit Sub
End Select
"指定MIMEType和ImageData參數的值
e.Values("MIMEType") = MIMEType
'把FileUpload的InputStream加載進字節數組中
Dim imageBytes(UploadedFile.PostedFile.InputStream.Length) As Byte
UploadedFile.PostedFile.InputStream.Read(imageBytes, 0, imageBytes.Length)
e.Values("ImageData") = imageBytes
End Sub
就象前面的"Insert"按鈕的Click事件處理器一樣,該DetailsView的Inserting事件處理器也執行相同的邏 輯-只有一些小小的語法差別。首先,既然FileUpload控件位於一個模板內,所以,必須使用FindControl("controlID")方法 以編程方式來引用它。一旦對它進行了引用,即對之進行相同的檢查以確保一個文件被成功上傳,並且允許相應的擴展名。對於DetailsView的 Inserting事件處理器存在一個微小的區別是,如果出現了錯誤,那麼,我們需要通知該DetailsVIEw停止相應的插入工作-這是通過把 e.Cancel屬性設置為True實現的
檢查完之後,MIMEType和ImageData參數將被使用e.Values("parameterName")=value語法進行賦值。就象在前面的ADO.Net示例中一樣,首先把該二進制數據讀取到一個字節數組中,然後把該字節數組賦值給該參數。
六、 顯示二進制內容
無論你使用什麼技術把數據存儲在數據庫中,為了檢索並顯示二進制數據,我們需要創建一 個新的ASP.Net頁面。這個名字為ShowPicture.aspx的頁面,將通過querystring把一個PictureID傳遞給它,並且從 指定的產品的ImageData域中返回該二進制數據。一旦完成,通過訪問/ShowPicture.ASPx?PictureID=picutreID 地址即可看到一個特定的圖片。因此,為了把一個圖像顯示在一個web頁面上,我們可以使用一個圖像控件並把它的ImageUrl屬性設置成適當的URL。
注意,這個ShowPicture.aspx在其.ASPx頁面中並沒有包括任何Html標記。在code-behind類的Page_Load事件處 理器中,將使用ADO.Net代碼從數據庫中檢索指定的Pictures行的MIMEType和ImageData。然後,該頁面的 ContentType被設置為MIMEType域的值,並且使用Response.BinaryWrite(ImageData)輸出該二進制數據:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim PictureID As Integer = Convert.ToInt32(Request.QueryString("PictureID"))
'與數據庫連接並且返回指定的圖片的圖像內容和MIME類型
Using myConnection As New SqlConnection(ConfigurationManager.ConnectionStrings("ImageGalleryConnectionString").ConnectionString)
Const SQL As String = "SELECT [MIMEType], [ImageData] FROM [Pictures] WHERE [PictureID] = @PictureID"
Dim myCommand As New SqlCommand(SQL, myConnection)
myCommand.Parameters.AddWithValue("@PictureID", PictureID)
myConnection.Open()
Dim myReader As SqlDataReader = myCommand.ExecuteReader
If myReader.Read Then
Response.ContentType = myReader("MIMEType").ToString()
Response.BinaryWrite(myReader("ImageData"))
End If
myReader.Close()
myConnection.Close()
End Using
End Sub