PowerBuilder提供的BLOB（Binary Large Object）数据类型可以用来处理大型数据，包括图像、大文本、Word文档、二进制文件和多媒体等各种数据，它的长度可以是0～2GB字节，我们利用BLOB类型的变量可以将数据传递给数据库以大字段方式存储。但是用通常的数据窗口技术无法将BLOB类型数据加入到数据库中，也不能将数据库中相应字段的数据提取出来，即使在程序中直接使用UPDATE和SELECT等SQL语句也是无法对BLOB类型数据进行操作的。下面笔者将介绍在PowerBuilder 7.0中操作BLOB类型数据的技巧。
程序设计原理
在PB中实现BLOB类型数据的入库和查询，主要要用到两条特殊的SQL命令——UPDATEBLOB和SELECTBLOB，首先定位要进行操作的记录，然后使用UPDATEBLOB命令就可以将BLOB类型变量中存放的数据传递给数据库，而使用SELECTBLOB则是将指定记录中的大字段数据传递给BLOB变量。
使用BLOB类型变量获取外界文件的数据内容，还必须借助于PB提供的可视化OLE控制对象，通过它可以将指定的文件内容显示成相应的对象（如BMP图片），双击它就可以激活相应的OLE服务器应用程序，来编辑修改对象的内容，同时也可以读取对象的数据内容（利用OLE控件的ObjectData属性），给BLOB类型变量赋值。
下面结合一个简单的程序实例，讲述如何处理BLOB数据类型。在这个例子中，BMP图片将作为一个大字段存储在数据库中。我们选择Microsoft Access 2000作为后台数据库，它的字段类型中包含“OLE对象”类型（如果选择MS SQL Server作为数据库服务器，可以使用TEXT或IMAGE类型字段存放大字段数据），这样就为管理多媒体数据、大文件和图片提供了支持。
操作BLOB字段的实现过程
我们在Access中创建一个新的数据库文件，文件名是bmp.mdb，在其中定义BMP图片数据表bmptable如下：
各字段的其它设置（如字段宽度等），均采用缺省形式即可。
编程前还需要做的一步准备工作是在操作系统的ODBC配置中建立指向bmp.mdb数据库的连接，名称定为bmptable。
下面的程序片段实现了数据库的连接，图片的插入、更新、删除和查询。考虑文章的篇幅，本文只列出与主题相关的程序源码。
1. 连接Access数据库
SQLCA.DBMS = "ODBC"
// SQLCA为全局transaction事务变量
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=bmptable;UID=;PWD='"
CONNECT USING SQLCA;
If SQLCA. SQLCode ＜＞ 0 Then
MessageBox ("数据库错误", "连接失败！")
Halt close;
End If
2. 将BMP图片存入数据库
integer bmpno,icount
//变量bmpno存放给定的图片编号
string filepath,filename
blob blb_tmp
//…此处对图片编号bmpno赋值，例如bmpno=101；可以通过程序实现为弹出对话框窗口提供一个图片编号
//查询指定的图片编号是否已经存在
icount=0
SELECT COUNT() INTO :icount
FROM bmptable
WHERE bmptable.bmpno=:bmpno
USING SQLCA; //:bmpno为给定的图片编号
if icount＞0 then
MessageBox("查询结果",string(bmpno)+" 号图片已经存在，请输入一个新的图片编号")
return
end if
//在OLE控制对象ole_1中插入BMP图片文件
GetFileOpenName("请选择一个需要插入的BMP图片文件",filepath,filename,"BMP","BMP图片文件(.BMP),.BMP")
If Len(filepath)=0 Then
Return
End If
If ole_1.InsertFile(filepath)＜＞0 Then //OLE错误
Return
End If
//新图片入库
string sql
sql= "INSERT INTO bmptable (bmpno,bmpdata,bmpname) &&
VALUES ("&&
+string(bmpno)+",'','"&&
+filename+"')"
EXECUTE IMMEDIATE :sql;
If SQLCA.SQLDBCode=0 Then
COMMIT USING SQLCA;
//提交事务
Else
MessageBox("数据库错误","插入失败")
ROLLBACK USING SQLCA;
//事务回滚
Return
End If
Blb_tmp=ole_1.ObjectData
UPDATEBLOB bmptable SET bmpdata=:blb_tmp
WHERE bmptable.bmpno=:bmpno
USING SQLCA; //更新存放图片的字段
If SQLCA.SQLDBCode=0 Then
COMMIT USING SQLCA;
//提交事务
MessageBox("插入成功","图片入库成功")
Else
MessageBox("数据库错误","更新图片失败")
ROLLBACK USING SQLCA;
//事务回滚
Return
End If
3. 从数据库中删除BMP图片
UPDATE bmptable SET bmpdata=''
WHERE bmptable.bmpno=:bmpno
USING SQLCA;
//bmpno为要删除的图片编号
If SQLCA.SQLDBCode=0 Then
COMMIT USING SQLCA;
//提交事务
Else
MessageBox("数据库错误","更新失败")
ROLLBACK USING SQLCA;
//事务回滚
Return
End If
DELETE FROM bmptable
WHERE bmptable.bmpno=:bmpno
USING SQLCA;
If SQLCA.SQLDBCode=0 Then
COMMIT USING SQLCA;
//提交事务
MessageBox("删除成功","图片删除成功")
Else
MessageBox("数据库错误","删除失败")
ROLLBACK USING SQLCA;
//事务回滚
Return
End If
4. 按图片编号查询图片信息
//需要提供一个图片编号存放在变量bmpno中
SetNull(blb_tmp)
SELECTBLOB bmptable.bmpdata INTO :blb_tmp
FROM bmptable
WHERE bmptable.bmpno=:bmpno
USING SQLCA;
If Not IsNull(blb_tmp) Then
ole_1.ObjectData=blb_tmp
//双击OLE控制唤醒OLE服务器即可编辑图片
End If
使用PB编程时，每次对数据库进行操作后要注意检查返回结果，以保证程序的可靠性。以上程序只是对操作BLOB数据类型的关键技术进行探讨，通过画板设计相应的用户界面，即可形成一个完整的基于Client/Server结构的数据库应用程序。
|
|||
| 名称：网络安全精品应用黄皮书 简介：《2007精品网络安全黄皮书》包括了9个大类24个小类， 800余篇文章，内容包含了熊猫烧香病毒、DDOS攻击、ARP病等热点问题的介绍及解决方案。从病毒查杀、防范、系统、数据等各方面的安全设置到黑客技术的了解、防范，涉及到了安全应用的全部领域, 由浅至深内容全面。 |
|||
| 名称：Vista精品应用黄皮书 简介：《Vista精品应用黄皮书》囊括了Vista的各方面内容。此次的精简版，是将里面的内容做了提取，便于用户下载和使用。内容包含了各种Vista的安装与实施、技巧与解析以及各种Vista相关学习文档和相关软件的安全下载。该电子书是了解和应用Vista人员必备的工具手册，并且也是第一本 |
|||
| 名称：2006中国IT论坛精品集合 简介：本书由“51CTO论坛推广联盟”制作完成。书中所有内容均来自各联盟成员的论坛（网站）。制作本书的目的是为了集中大家的优势资源，将更多更精彩的内容带给广大技术爱好者。本书是联盟成立以来制作的第一本书。 |
|
|||
| · Java基础教程 · VPN技术 · SQL Server 2005全解 · ARP攻击防范与解决方案 · SOA 面向服务架构 · SQL Server 2005全解 · Java编程开发手册 · 三层交换技术专题 |
· SQL Server入门到精通 · Windows Server 2003企.. · Windows远程桌面应用 · C#技术开发指南 · VPN技术 · Solaris 10 配置管理 · C#技术开发指南 · Windows操作系统安装 |
||
|
|||
| · VPN技术 · ARP攻击防范与解决方案 · SQL Server 2005全解 · Java基础教程 · SQL Server入门到精通 · SQL Server 2005全解 · SOA 面向服务架构 · Java编程开发手册 |
· C#技术开发指南 · 三层交换技术专题 · C#技术开发指南 · Windows远程桌面应用 · Windows Server 2003企.. · 邮件服务器专题 · wimax技术与趋势 · Windows操作系统安装 |
||
 DB2 9技术资源中.. 推荐阅读 |
|
| ·DB2 Viper快速入门 ·DB2 9数据库的镜像分割与.. |
·将XML应用程序从DB2 8.x.. ·DB2 9中的pureXML：如何.. |
| 51CTO.com编辑部.. 推荐阅读 |
|
| ·服务器中的“傻瓜机”在.. ·盖茨也喜欢登录Youtube看.. |
· · |
| 白璐 的博客 |
|
| ·将职业教育职业化 - 各IT.. ·思科交换机上实现MAC地址.. |
·关于51CTO合作出书中的职.. ·OSPF动态路由协议入门简介 |
| 杨文飞 的博客 |
|
| ·9月第3周回顾：微软和英.. ·9月第2周回顾：四核之战.. |
·9月第1周回顾：微软国际.. ·什么样的文章更容易被编.. |
| 组网建网 |
安全频道 |
| · NGN:下一代网络 · 网络访问中断大排查 · FTTx光纤接入 |
· 平凡黑客讲述精彩人生（.. · 平凡黑客讲述精彩人生（.. · 平凡黑客讲述精彩人生（.. |
| 编程频道 |
前沿技术 |
| · C++是垃圾语言？！ · 2007年IT界七大抄袭事件 · Java实用开发全集 |
· 解析Ajax开发框架 走进A.. · 基于Google Maps与Ajax.. · 基于Google Maps与Ajax.. |
| 操作系统 |
服务器 |
| · Ubuntu 中文开源频道 · Solaris基础知识入门 · 微软正式发布英文版Wind.. |
· 服务器基础知识入门 · Rambus第二？看全缓冲内.. · 服务器节能对比测试：AM.. |
| 数据库 |
存储频道 |
| · 甲骨文Oracle 11g正式发.. · Oracle数据库开发之PL/S.. · Oracle数据库开发基础教.. |
· 存储2006，一个并购的大.. · IDC宣布浪潮蝉联存储市.. · 双机热备技术 |
相关 
