基于PB6和ORACLE8开发“劳动信息管理系统”
一下C:\AUTOEXEC.BAT里边的路径是否包含c:\orawin95\bin(或相应的路径),如果没有此路径说明,PB6和ORACLE8不能连通。
4.3文字类数据(文本)的入库和查询
文本入库和查询可采用PB6的MLE(多行编辑器)作界面,编辑完成后存入ORACLE8的LONG字段中,查询时从LONG字段中取出,放入MLE中查询,下边是一个例子:
//文本的预处理(以去除文本文件中的回车换行符为例说明)
//将文件读入BLOB型变量text中fn=fileopen(txtname,streammode!)
iffn<>-1then
fileread(fn,text)
fileclose(fn)
//将读入的数据流组合成字符串
article=string(text)
s=len(article)
forv=1tos
t=pos(article,char(13)+char(10),v)
ift>0then
article=replace(article,t,2,"")
else
endif
next
mle_1.text=article
//将处理后的文件c:\ldxx.txt存盘,文件中的回车换行符已全部去掉
text1=blob(article)
filname="c:\ldxx.txt"
4.3文字类数据(文本)的入库和查询
文本入库和查询可采用PB6的MLE(多行编辑器)作界面,编辑完成后存入ORACLE8的LONG字段中,查询时从LONG字段中取出,放入MLE中查询,下边是一个例子:
//文本的预处理(以去除文本文件中的回车换行符为例说明)
//将文件读入BLOB型变量text中fn=fileopen(txtname,streammode!)
iffn<>-1then
fileread(fn,text)
fileclose(fn)
//将读入的数据流组合成字符串
article=string(text)
s=len(article)
forv=1tos
t=pos(article,char(13)+char(10),v)
ift>0then
article=replace(article,t,2,"")
else
endif
next
mle_1.text=article
//将处理后的文件c:\ldxx.txt存盘,文件中的回车换行符已全部去掉
text1=blob(article)
filname="c:\ldxx.txt"
- 上一篇论文: 巧解Pretty Park 病毒一例
- 下一篇论文: 谈网络终极优化工具“快猫加鞭”新版