繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > Oracle大文本在ASP中存取问题的解决
- ASP
- [原创]asp下用实现模板加载的的几种方法总结
- asp下利用fso实现文件夹或文件移动改名等操作函数
- asp cint clng的范围与防止cint和clng的溢出解决方法大全
- asp防范跨站点脚本攻击的的方法
- 独孤剑写的马克斯迅雷片库采集插件1.4 官方最新版提供下载了
- 根据日期得到生肖的ASP函数
- 不错的主要用于加密的vbs(asp)位移运算类
- Script.VBS.Agent.ai juan.vbs专杀
- 循环取值Request.QueryString的用法
- asp下实现字符串的补充fill()
- 无服务器做任意二级米子站
- 几种另类的ASP后门
- asp事物功能简单小应用
- ASP获取网页全部图片地址并保存为数组的正则
- 通过客户端验证上传图片文件大小的ASP源码
- asp下计算分页的几种方法
- 谈动态多行多列，循环行和列，输出M行N列的ASP代码
- asp在线执行sql语句的函数
- asp正则html的图片,对图自动缩放大小
- 文件名 正则表达式提取方法
Oracle大文本在ASP中存取问题的解决
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 50 ::
收藏到网摘: n/a
一、运行环境：
1、Microsoft Windows 2000 Server + IIS 5.0
2、Oracle8i中文标准版
二、建立数据表：
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>
2、数据调出程序：view.asp
<%
'连接数据库，以只读方式打开数据表
Set OraSession=CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase=OraSession.DbOpenDatabase("autop","system/manager",0)
Set Rs=OraDatabase.DbCreateDynaset("select * from test order by id desc",4)
'赋初值：定义每次截取字节大小为1024byte,最大可以设为65280byte （64K）
Size=65280
I=0
Do
'以Rs记录集的Fiel
评论 (0) All
