知识大全 PB中使用FORMULA ONE入门介绍[2]

Posted 2022-07-14 变量

篇首语：追风赶月莫停留，平芜尽处是春山。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 PB中使用FORMULA ONE入门介绍[2]相关的知识，希望对你有一定的参考价值。

PB中使用FORMULA ONE入门介绍[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　If fileexist（ file vts ） then

　　filedelete（ file vts ）

　　End if

　　Return =fileopen（ file vts streammode! write!）

　　以上语句新建了一个临时文件 file vts

　　If return <> then

　　filewrite（return blob 变量）

　　fileclose（return ）

　　Else

　　messagebox（ error Can t open file! ）

　　End if

　　本条件语句将 blob 变量的内容写入临时文件中如出错则告警

　　 FORMULA ONE 文件的内容存入数据库中

　　return =fileopen（ file vts streammode! write!）

　　If return <> then

　　fileread（return blob 变量）

　　fileclose（return ）

　　end if

　　以上语句将临时文件内容读入 blob 变量中

　　if len （ blob 变量）> then

　　updateblob 表名 set 大文本字段名 =:blob 变量 where…

　　end if

　　该条件语句给数据库中的大文本字段赋值

　　如上所述可以利用 FORMULA ONE 的文件实现 POWERBUILDER 窗口中 OLE 对象与数据库大文本字段之间信息传送此外在 POWERBUILDER 中也提供数据窗口中用 EXCEL 做 OLE 对象来存取数据库的大文本字段但它不能调用 EXCEL 的函数因此不够灵活此种方法占用的系统资源是 FORMULA ONE 的数倍在大型数据库的存取操作中会大大增加日志存取速度也会减慢因此不适合大范围应用

　　在日常应用中首先制作一个 FORMULA ONE 的报表模板文件通过 POWERBUILDER 窗口的 OLE 对象打开该文件填好内容后存入数据库此后就可以对数据库中已存在的报表字段进行存取操作如果报表格式发生变化则直接修改模板文件即可不需要改动程序维护相当方便

编辑推荐

ASP NET开发培训视频教程

Microsoft NET框架程序设计视频教程

cha138/Article/program/PB/201311/24624