這是第一天在CSDN上發表文檔，目的是困惑了兩天的問題終于解決了，說出來，與大家共享一下，希望對遇到這樣問題的朋友有所幫助。



是這樣的，我們在PB中用F1，把報表以EXCEL格式存貯在ORACLE數據庫中，我們剛開始用一個LONG RAW型字段來存放EXCEL大對象，然后，存進去了幾個小的EXCEL文件，做了測試程序，可以把LONG RAW字段的EXCEL大對象讀出來，然后，在ASP中以EXCEL的格式把EXCEL文件顯示出來。
因為測試程序成功。所以我們開始往表中存EXCEL文件，然后又用測試程序測試，出現了錯誤，錯誤提示是遇到末處理的數據類型，苦思明想了兩天，查了很多的資料，也沒找到原因，后來一想，是不是我們把該表調整了一下，把EXCEL大對象存在了LONG型的字段中，后來就又把LONG型改成了LONG ROW 型，測試程序如下：


<%
Dim conn

Dim StrConn

Dim rs

Dim Sql


Set conn=Server.CreateObject("ADODB.Connection")

StrConn = "driver={Microsoft ODBC for oracle};server=dcmis;UID=custometable;Pwd=custometable;"

conn.Open StrConn


sql="SELECT blob_excel FROM sttb_databldinfo where v_databldid = '00000001'"

Set rs =conn.execute(sql)


Response.Buffer = TRUE

Response.ContentType = "application/vnd.ms-excel"

response.write rs("blob_excel") 'blob_excel字段存的是EXCEL文件

rs.close

set rs=nothing

conn.close

set conn=nothing

%>


然后存進了一個很小的EXCEL進行測試，測試又成功了！


就又存進了幾個非常大的EXCEL，這時測試又出現了錯誤！

遇到末處理的數據類型！

這是什么原因呢？會不會是我們存的EXCEL過大？

我在測試程序中加入了以下幾行：

set field = rs("blob_excel")

fieldSize = field.ActualSize


response.write "fieldsize:"&fieldSize

response.end


進行測試，發現當存進去的EXCEL較小時，輸出的fieldsize是真實的字段的大小，但當EXCEL較大時，輸出的fieldsize卻都是4，
終于找到了原因，原來如此，就又修改了程序，如下：

<%
Dim conn

Dim StrConn

Dim rs

Dim Sql


Set conn=Server.CreateObject("ADODB.Connection")

StrConn = "driver={Microsoft ODBC for oracle};server=dcmis;UID=custometable;Pwd=custometable;"

conn.Open StrConn


sql="SELECT blob_excel FROM sttb_databldinfo where v_databldid = '00000001'"

Set rs =conn.execute(sql)



size =32765

i=0

'set field = rs("blob_excel")

'fieldSize = field.ActualSize


'response.write "size:"&fieldSize

'response.end


dim s_stream
Do
'以Rs記錄集的Fields對象的DbGetChunk方法在循環中讀出數據
text=rs.Fields("blob_excel").GetChunk(size)
Response.binarywrite text
'求出每次取出數據的詳細字節數
text_size=Lenb(text)
i=i+1
'如果每次取出數據的詳細字節數小于欲定義的截取字節大小則說明該條數據已經完畢，退出循環。

Loop until text_size<size

Response.Buffer = TRUE

Response.ContentType = "application/vnd.ms-excel"

rs.close

set rs=nothing

conn.close

set conn=nothing

%>

這樣EXCEL就能正常顯示。

總結如下：

使用AD0數據庫連接，必須采用LONG RAW字段才能夠在網頁中正常顯示EXCEL大對象，而且要采用循環讀取大對象的方法進行。

對于BLOB字段同樣如此，但有一點注意：，用ADO連接ORACLE數據庫，不支持BLOB，打不開含有BLOB字段的記錄集。
必段采用OO4O連接ORACLE數據庫。BLOB存取方法同上。