打印本文 打印本文 关闭窗口 关闭窗口
用Delphi对SQL-DMO进行封装的一种实现
作者:武汉SEO闵涛  文章来源:敏韬网  点击数12252  更新时间:2007/11/14 12:18:56  文章录入:mintao  责任编辑:mintao
p; end;  //取的这个数据库中所有的表名字,添入TStringList

    result:=True;

  Except

    TableList.Clear ;

    result:=False;

  end;

end;

类似的,用相似的方法可以以取得数据库中所有的视图(Views)、一个表或视图的所有字段(Columns)、一个数据库的所有数据文件组以及数据文件(FileGroupsDBFiles)等等,这些可以具体参考SQL-DMO的对象结构树。

SQL-DMO对象的使用可以遵循以下的基本步骤:通过上层对象取得某个对象或集合对象,然后使用对象或取得集合对象中某一个对象再使用。一般来说,如果是集合对象都有一个Item方法,可以根据IndexName返回集合成员对象。需要注意的是Index是从1开始的而不是从0开始的。

上面的这些方法都是演示如何从数据库取得信息,下面我再演示一个方法,此方法的功能是备份数据库到一个文件。通过这个方法来展示如何对数据库进行维护操作的。

function TDBCTRL.BackupDB(DBName, BackupFile: String): Boolean;

//传入的参数为欲备份的数据库名和备份文件名

var

  dmoBack:_Backup;         //备份对象

  backupdrv:_backupdevice;   //备份设备对象

begin

 

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ...  下一页 >> 

打印本文 打印本文 关闭窗口 关闭窗口