陈正法论文.docVIP

数据库存储与显示 （江苏盐城技师学院计算机系 江苏 盐城 224002） ? 摘 要本文VB作为开发工具，分别以Access和SQL Server作为特别是二十世纪九十年代以后，不再仅仅是存储和管理数据，而转变成用户所需要的各种数据管理的方式Access和SQL Server两大类数据库应用更为广泛，Access是微软把数据库引擎的和开发工具结合在一起的一个数据库管理在很多地方得到广泛使用，例如小型企业，大公司的部门微软关系中小型网站在数据库应用系统开发中，经常要对照片进行存取，如在档案管理系统中存取人员的照片。Access而SQL Server不支持INSERT 和UPDATE 语句对image数据类型字段进行因此需编写专门过程来处理图像字段。Access和SQL Server为数据库，VB作为开发工具，分别介绍两种显示与存储照片的方法。Access显示与存储DataSource属性的控件都是对数据敏感的，它们都能通过数据控件直接使用数据库里的数据。比如CheckBox, ComboBox, TextBox, PictureBox,Image 1、从数据库中显示所需要的照片Data数据控件,设置它的DatabaseName和RecordSource属性，strPath = App.PathIf Right(strPath, 1) \ Then 　strPath = strPath \MyData.DatabaseName = strPath ExampleDB.mdb 数据库存地址MyData.RecordSource = Info 表名Image控件用来显示照片，设置它的DataSource和DataField属性。例如本例中: Image1.DataSource=MyData和Image1.DataField= MyPhoto 　2、向数据库中添加需要存储的照片AddNew属性，添加一个按钮，双击后添加如下代码MyData.Recordset.AddNewImage照片控件指定照片路径Image1.Picture = LoadPicture(照片路径)，经过这两步的操作，就可以向数据库中添加照片了。存储与显示在SQL Server2000数据库中，对于小于8000个字节的图像数据可以采用二进制型（Binary、Varbinary）来表示，但通常要保存的照片一般都大于8000个字节。SQL Server提供了一种机制，能存储每行大到2G的二进制对象（BLOB），这类对象可包括image、text 和ntext三种数据类型，其中image数据类型存储的是二进制数据。VB6.0存取SQL Server中BLOB数据有两种方法。一是利用ADO Field对象的AppendChunk和GetChunk方法。 二是利用Stream对象的LoadFromFile和SaveToFile方法。为了更好说明这两种方法，本示例程序存储照片采用ADO Field对象的AppendChunk方法，而读取照片采用Stream对象的 SaveToFile方法。在SQL Server2000中创建数据库DAGL。在DAGL中创建表Student，包括stu_no （char型，存放学号）、stu_name（char型，存放姓名）、stu_photo（image型，存放照片）三个字段。 在VB的“引用”对话框中选择Microsoft DAO 3.6 Object Library和Microsoft ActiveX Data Objects 2.5 Library，VB的“部 件” 对话框中选择Microsoft Common Dialog Control6.0。 新建工程，设置从Sub Main()启动，创建一个模块Module1，其代码如下：Public Rst As ADODB.Recordset 定义SQL Server的全局记录集 Public Cur_Record As ADODB.Recordset 定义临时记录集，保存照片用 Public CNN As ADODB.Connection 定义一个网络数据对象 Public NetPath As String 定义网络服务器路径Public Function ConnectString () As String 返回一个数据库连接 ConnectString = driver=SQL Server;Server= NetPath database=DAGL End Function Sub Main() NetPath = WINSQL ;Uid= sa ;PWD= sa ; 提取网络服务器路径 Set CNN = New ADODB.