asp读取oracle LONG 类型字段的方法

'--------------------------------------------------

'读取oracle LONG 类型字段

Response.Buffer = True

Server.ScriptTimeOut=150

'size定义的是字符数，而Lenb取出来的是字节数

size =32768

s_stream=""　　 '保存数据

text=""　　 '取数据用

i=0

Do 

'以Rs记录集的Fields对象的DbGetChunk方法在循环中读出数据 

text=rs.Fields("content").GetChunk(size) 

s_stream=s_stream+text

'求出每次取出数据的详细字节数 

text_size=Lenb(text) 

If (text = "" Or IsNull(text)) then text_size=-1

'response.write CStr(text_size)+"--"

i=i+1 

'如果每次取出数据的详细字节数小于欲定义的截取字节大小则说明该条数据已经完毕，退出循环。  

 

Loop until text_size<size*2    '切记这里要乘以2，开始没有乘以2，进入了一个死循环  

content=s_stream

'-------------------------------------------------------------------