如何從ACCESS數(shù)據(jù)庫(kù)中讀取圖形(續(xù))
發(fā)表時(shí)間:2024-02-21 來(lái)源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]注意的是你也可以從一個(gè)文件中新建一個(gè)位圖對(duì)象,但使用這樣的方式保存在數(shù)據(jù)庫(kù)中的圖形格式是瀏覽器不能夠識(shí)別的。當(dāng)你往數(shù)據(jù)庫(kù)中保存圖象時(shí),你應(yīng)該知道你需要使用什么格式來(lái)保存你可以把文件中的每一個(gè)字節(jié)保存下來(lái),或則通過(guò)ACCESS/Foxpro的把圖形保存為一個(gè)OLE格式。你使用什么格式保存圖象決定了你...
注意的是你也可以從一個(gè)文件中新建一個(gè)位圖對(duì)象,但使用這樣
的方式保存在數(shù)據(jù)庫(kù)中的圖形格式是瀏覽器不能夠識(shí)別的。
當(dāng)你往數(shù)據(jù)庫(kù)中保存圖象時(shí),你應(yīng)該知道你需要使用什么格式來(lái)保存
你可以把文件中的每一個(gè)字節(jié)保存下來(lái),或則通過(guò)ACCESS/Foxpro的把圖形保存
為一個(gè)OLE格式。
你使用什么格式保存圖象決定了你在ASP中用什么格式來(lái)讀出圖形來(lái)。
具體來(lái)說(shuō),如果你在ACCESS/FoxPro中將圖形保存為bmp,gif,jpeg(
這個(gè)必須要使用到ACCESS/FoxPro的OLE對(duì)象,即使用ACCESS的插入對(duì)象
對(duì)話框來(lái)完成),這是當(dāng)你使用
image/bmp時(shí)瀏覽器是不能夠解釋的。
現(xiàn)在假設(shè)在數(shù)據(jù)庫(kù)中保存的是你所想要的圖形格式
(GIF, JPEG, BMP, TIFF, 等等等等)現(xiàn)在來(lái)看看要怎么把它們從
數(shù)據(jù)庫(kù)中讀出來(lái)。
在ACCESS中使用了兩個(gè)關(guān)鍵的技術(shù)來(lái)保存圖形
1。使用了bmp格式
2。78個(gè)字節(jié)的文件頭
<%
response.Expires = 0
response.Buffer = True
response.Clear
response.contentType = "image/bmp"
%>
接著你要干的就是去掉那78個(gè)字節(jié)的OLE對(duì)象的文件頭。
<%
Const OLEHEADERSIZE = 78
nFieldSize = rs("photo").ActualSize
oleHeader = rs("photo").GetChunk(OLEHEADERSIZE)
imageBytes = rs("photo").GetChunk(nFieldSize - OLEHEADERSIZE)
Response.BinaryWrite imageBytes
%>
現(xiàn)在舉一個(gè)例子:
如果你要得到一個(gè)職工的信息,這段信息包括一個(gè)介紹和他的圖象。
并且要同時(shí)顯示文字和圖形。
代碼如下:(其中的theImg是一個(gè)代理頁(yè)面)
theImg.asp
<%
response.Expires = 0
response.Buffer = True
response.Clear
response.contentType = Session("ImageType")
response.BinaryWrite Session("ImageBytes")
Session("ImageType") = ""
Session("ImageBytes") = ""
response.End
%>
Function SetImageForDisplay(field, contentType)
OLEHEADERSIZE = 78
contentType = LCase(contentType)
select case contentType
case "gif", "jpeg", "bmp"
contentType = "image/" & contentType
bytes = field.value
case "ole"
contentType = "image/bmp"
nFieldSize = field.ActualSize
oleHeader = field.GetChunk(OLEHEADERSIZE)
bytes = field.GetChunk(nFieldSize - OLEHEADERSIZE)
end select
Session("imageBytes") = bytes
Session("imageType") = contentType
End Function
'注意的是,程序中只使用了4中格式:gif, jpeg, bmp , ole .
<%
sql = "select * from Employees"
Set oRS = Server.CreateObject("ADODB.Recordset")
oRS.CursorLocation = 3
oRS.Open sql, "DSN=NW"
SetImageForDisplay oRS("photo"), "ole"
Set oRS.ActiveConnection = Nothing
%>
要顯示圖象的話,只需要在另外一個(gè)asp中,假設(shè)為getEmpInfo.asp中
<img src="theImg.asp"</img>
但這還有一個(gè)問(wèn)題,因?yàn)閷?duì)每個(gè)職工的圖形都使用了同一個(gè)"theImg.asp"
文件,應(yīng)該再小小修改一下:
<img src="theImg.asp?temp=<%= Request.Form("empLastName")%>"</img>
最后再說(shuō)一點(diǎn),如何顯示多幅圖象呢?
也就是說(shuō)如果數(shù)據(jù)庫(kù)中有多個(gè)字段都保存了圖形,怎么辦?
其實(shí)解決辦法很簡(jiǎn)單,只要給SetImageForDisplay多加一個(gè)參數(shù)
就是用來(lái)保存圖形的一個(gè)session變量。
例如:
SetImageForDisplay oRS1("photo"), "ole", "empPhoto"
SetImageForDisplay oRS2("logo"), "gif", "compLogo"
<img src="theImg2.asp?varName=empPhoto&temp=<%= Request.Form("empLastName")%>">
<img src="theImg2.asp?varName=compLogo&temp=<%= Request.Form("imgCode")%>">
使用這個(gè)方法能夠完成下面的功能:
1。能夠從數(shù)據(jù)庫(kù)中取出圖形字段。(你唯一需要知道的是數(shù)據(jù)庫(kù)中的圖形是什么格式
bmp?gif?jpeg?ole?)
2.采用session變量 來(lái)保存圖形的字節(jié)數(shù)和content type
asp需要這些信息來(lái)聯(lián)結(jié)到<IMG>中的屬性
3。只要把theImg放到你想顯示圖形的地方,就能夠顯示圖象了。