ASP应用:巧用SQL-DMO创建备份及校验

ReadyGo!技术成就梦想网络搜索 efish 2008-2-24 3:06:16

概述

SQL分布式管理对象(SQL Distributed Management objects, SQL-DMO)为开发者提供了使用程序和脚本语言执行普通任务的方法，从而扩展了SQL Server功能。本文谈论如何巧妙的利用SQL-DMO创建数据库备份和校验的ASP应用。

前提

你需要有SQL Server数据库备份的相关知识。另外还要在global.asa文件中加入SQL-DMO库的引用。以下是SQL Server 2000的引用：

以下为引用的内容：


本文示例代码适用于SQL 7.0, MSDE, 和 SQL Server 2000。

喜与忧

使用SQL-DMO对象让人且喜且忧。它提供了非常丰富的功能，以至于不知该如何使用。本文只讨论示例涉及的对象属性和方法。你可以在SQL Server在线教学上找到许多相关信息。

SQLDMO.SQLServer

用于连接SQL Server数据库：

以下为引用的内容：
<%
Dim srv
Set srv = Server.CreateObject("SQLDMO.SQLServer")
srv.LoginTimeout = 15
srv.Connect "servername", "username", "password"
%>

这里通过代入用户名和口令来连接SQL Server数据库。如果要使用NT的身份认证，就将它的LoginSecure属性设为真(TRUE)，忽略代入的用户名和口令，而使用NT的注册信息。

SQLDMO.Database

列出服务器中的数据库。在本文示例中，对列出的数据库进行备份。下面的代码将服务器中的数据库列于下拉菜单：

以下为引用的内容：
<%
Dim srv
Dim objDB
Set srv = Server.CreateObject("SQLDMO.SQLServer")
srv.LoginTimeout = 15
srv.Connect "servername", "username", "password"
Set objDB = Server.CreateObject("SQLDMO.Database")
%>
<SELECT name="fdatabase">

<%
For Each objDB In srv.Databases
If objDB.SystemObject = False Then
%>
<OPTION><%=objDB.Name%></OPTION>
<%
End If
Next
%>
</SELECT>

SQLDMO.BackupDevice

列出服务器上安装的备份装置。我建议使用备份装置来备份数据库。因为这样可以使用SQL-DMO的校验功能来校验备份情况。下面的代码列出服务器上的备份装置：

以下为引用的内容：
<%
Dim srv
Dim objDevice
Set srv = Server.CreateObject("SQLDMO.SQLServer")
srv.LoginTimeout = 15
srv.Connect "servername", "username", "password"
Set objDevice = Server.CreateObject("SQLDMO.BackupDevice")

For Each objDevice In srv.BackupDevices
Response.Write objDevice.Name + "<BR>"
Next
%>

SQLDMO.Backup

这就是我们要用到的备份核心对象。它有许多属性，让我们作到与企业版SQL管理器一样水平的备份。先讨论一下本文示例用到的属性。

BackupSetName - 备份文件名。

Database - 要备份的数据库。

Action - 全部或增量备份。还有其他选项，不过示例中只用到这二个。

BackupSetDescription - 备份说明。

Files - 文件备份选项。标明备份文件的路径和名字，如：C:\pubs.bak。使用文件备份时，下面的备份装置名要设置为空。

Devices - 服务器上的备份装置。如果使用备份装置，上面的文件备份选项要设置为空。

TruncateLog - 备份日志选项。其选项有：

NoLog - 不备份交易日志。

NoTruncate - 备份交易日志。日志里提供时间标记。

Truncate - 备份交易日志，但不保留交易纪录。

Initialize - 如设置为真(True)，该备份装置将取代其他备份媒介而成为首选。

以下是示例中的backup.asp文件：

以下为引用的内容：
<%@ Language=VBScript %>
<HTML>
<BODY>


<%
Dim objBackup
"创建备份对象
set objBackup      = Server.CreateObject("SQLDMO.Backup")
"设置属性
objBackup.BackupSetName = Request("fname")
objBackup.Database       = Request("fdatabase")
objBackup.Action         = Request("fAction")
objBackup.BackupSetDescription = Request("fdescription")
objBackup.Files        = Request("fbackupfile")
objBackup.Devices      = Request("fdevice")
objBackup.TruncateLog = Request("flog")
objBackup.Initialize   = Request("finit")
"备份数据库
objBackup.SQLBackup srv
"断开与服务器的连接
srv.disconnect
"释放
set srv = nothing
set objBackup = Nothing
%>
<P>
The backup was started, use the <A HREF="devices.asp">verify</A>
option to see if it completed successfully.
<A HREF="default.asp">Click here</A> to return.
</P>
</BODY>
</HTML>

备份校验

如果用VB或C++编程，可以用事件触发来校验备份过程，但在ASP中不行。我们用SQLDMO.BackupDevice对象的ReadBackupHeader方法来确认

责任编辑: efish 参与评论查找更多：

相关文章

使用FSO自动创建多级文件夹的函数！使用FSO自动创建多级文件夹的函数！

ASP模拟MVC模型的编程方式 ASP模拟MVC模型的编程方式

ASP实例：一个简单的ASP无组件上传类 ASP实例：一个简单的ASP无组件上传类

ASP类型个人网站与动网整合非官方方法 ASP类型个人网站与动网整合非官方方法

通过实例学习ASP的对象复制通过实例学习ASP的对象复制

ASP技巧实例：ASP实现最简洁的多重查询的解决方案 ASP技巧实例：ASP实现最简洁的多重查询的解决方案

ASP技巧实例：几行代码解决防止表单重复提交 ASP技巧实例：几行代码解决防止表单重复提交

多个域名后缀同时查询的域名查询系统多个域名后缀同时查询的域名查询系统

ASP无组件上载,带进度条,多文件上载 ASP无组件上载,带进度条,多文件上载

ASP操作XML文件的完整实例 ASP操作XML文件的完整实例

2秒记住本站域名

玩过泡泡龙吗？Readygo?Go! 再加上.Com.Cn的后缀，那就是大名小顶的ReadyGo.com.cn

ASP应用:巧用SQL-DMO创建备份及校验

2秒记住本站域名

分类导航