ORACLE CLOB/BLOB 字段如何读写呢。。

auto · 发表于 2012-12-4 16:58:37

ORACLE CLOB/BLOB 字段如何读写呢。。找了一段VB 和ASP 始终搞不定
我在oracle中将表的字段设置为CLOB或blob就写不进。。
但是设置为varchar2字符类型就可以。

附ASP 源码

　二、建立数据表：
　　CREATE TABLE SYSTEM.TEST(
BLOB LONG,
ID NUMBER)
/

　　三、源程序：
1、数据存入程序：test.asp

<%
'表单提交处理部分
'--------------------------------------------------

If request("ok")=1 then

'字符转换函数
function tansstr(sstr)
sstr=replace(sstr," "," ")
sstr=replace(sstr,chr(13) & chr(10),"<br>")
tansstr=sstr
end function

'提交数据赋值
a=lenb(request("text"))
b=len(request("text"))
c=tansstr(request("text"))

'打开数据库，打开test数据表以Rs为记录集
Set OraSession=CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase=OraSession.DbOpenDatabase("autop","system/manager",0)
Set rs=OraDatabase.CreateDynaset("select * from test order by id desc",0)

'求ID值
if rs.eof then
id=1
else
id=rs("id")+1
end if

'因为受SQL语句长度大小限制所以，以非SQL语句存入数据
'--------------------------------------------------------

'新建记录
rs.DbAddNew

'经典就在本句：以RS记录集的Fields对象的DbAppendChunk方法处理大字段存入问题。
rs.Fields("blob").DbAppendChunk(c)

'存入ID值
rs("id")=id

'刷新记录集
rs.DbUpdate

'显示结果部分
'---------------------------------------------------------
Response.write "数据已经存入数据库中。<br>"
Response.write "总计占用字符数： <font color=blue>" & formatnumber(b,2,-2,-2,-1) & "</font> 字<br>"
Response.write "总计占用字节数： <font color=blue>" & formatnumber(a,2,-2,-2,-1) & "</font> Byte<br>"
Response.write "<a href='view.asp'>请调阅……</a>"

'关闭数据连接。
rs.close
set rs=nothing
Set OraSession=nothing
Response.end
End If
%>
<html>
<body>
<form method="POST" action="test.asp">
<p><font color="#FF0000"><b>Oracle大字段在ASP中存取问题的解决：</b></font></p>
<p><textarea rows="13" name="text" cols="104"></textarea></p>
<p><input type="submit" value="存入" name="B1"></p>
<input type="hidden" name="ok" value="1">
</form>
</body>
</html>

		自动登录	找回密码
密码			加入

[AU3基础] ORACLE CLOB/BLOB 字段如何读写呢。。

相关帖子