 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
这是第一天在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存取方式同上。 返回类别: 教程 上一教程: ASP中SPLIT 函数的一例 下一教程: 利用XMLHTTP无刷新添加数据之GET篇 您可以阅读与"在ASP中读取ORACLE中的BLOB类型的字段的值，不用ORACLE OBJECT FOR OBJECT"相关的教程: · 在ASP中用EASYMAILOBJECT组件处理EXCHANGE邮件源代码-读取邮件主题和大小 · 改进 ASP 应用程序中的字符串处理性能 · ASP + ORACLE 分页方式 (不用存储过程) · ASP获取数据库表名，字段名以及对字段的一些操作 · ASP+ORACLE分页方式(不用存储过程) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
