开发基于Oracle数据库的管理信息系统

核心提示： 3．2．2从库中重新生成文本文件filename.txt并存盘selectnrinto:filenfromfwgswherebh=:bh1andlwrq=:zwrq1usingsqlca;fname="c:filename.txt"fh=fileopen(fname,s

3．2．2从库中重新生成文本文件filename.txt并存盘　　selectnrinto:filenfromfwgswherebh=:bh1
　　andlwrq=:zwrq1usingsqlca;
　　fname="c:filename.txt"
　　fh=fileopen(fname,streammode!,write!,lockwrite!,replace!)
　　iffh<>-1then
　　filewrite(fh,filen)
　　fileclose(fh)
　　endif

3．3处理图象文件（大的二进制文件）

图象文件（一般为BMP位图文件）是二进制文件，将其以数据流方式存入ORACLE7的LONG字段中，查询时从LONG字段中取出，放入图象框（如p_1）中查询，下边是一个例子：　　//将图象文件读入BLOB型变量pict中
　　fn=fileopen(picname,streammode!)
　　iffn<>-1then
　　fileread(fn,pict)
　　fileclose(fn)
　　//将图象放入图象框p_1内查看
　　setpicture(p_1,pict)
　　endif
　　//将图象存入表pic的LONG字段bmpt中
　　updateblobpicsetbmpt=:pict;
　　commit;

较大的图象文件一次不能入库，可采取分割图形的方式，分块存入，因为LONG字段所存放的数据大小一般是没限制的（可存放2G的内容）。

4开发应用经验

4．1建议CLIENT端通过SQL*NETV2进行ORACLE数据通信（不用SQL*NETTCPV1产品）

因为在ORACLE7推出以后，SQL*NETV1就没有做一些改进工作，继续支持到ORACLE7.2,ORACLE7.3以后的产品将不支持SQL*NETTCPV1，所以，ORACLE7用户应立即改用SQL*NETV2，不然会影响到库的运行稳定性。

ORACLECDE2和Developer2000提供了CLIENT端ORACLE产品的安装程序ORAINST.EXE，运行该文件来安装SQL*NETV2，选择的产品有:　　aORACLETCP/IPADPTER2.1.4.1.3
　　bsql*net2.1.4.1.4