将数据库中的二进制流文件生成到硬盘上

如何将数据库中的二进制流文件生成到硬盘上? 

 

<%
dim conn, rs

set conn = server.createObject("adodb.connection")
conn.open "Provider=OraOLEDB.Oracle;Data Source=oracle.mydomain.com;User ID=scott;PASSWORD=tiger;Persist Security Info=True"

set rs = conn.execute("Select blobcolumn FROM blobtable Where id = 7")

'Write it to the browser
response.binaryWrite rs.fields("blobcolumn").value

'Write it to disk
dim stream
set stream = server.createObject("adodb.stream")
stream.type = adTypeBinary
stream.open
stream.write(rs.fields("blobcolumn").value)
stream.saveToFile folderAndFileName, adSaveCreateOverWrite
stream.close
%>

版权声明:
作者:Kiyo
链接:https://www.wkiyo.cn/html/2008-01/i109.html
来源:Kiyo's space
文章版权归作者所有,未经允许请勿转载。

THE END
分享
二维码
< <上一篇
下一篇>>