SQL分布式管理对象(SQL Distributed Management objects, SQL-DMO)为开发者提供了使用程序和脚本语言执行普通任务的方法,从而扩展了SQL Server功能。本文谈论如何用SQL-DMO创建数据库备份和校验的ASP应用。
以下是示例中的backup.asp文件:
<%@ Language=VBScript %>
<HTML>
<BODY>
<!--contains all the login information -->
<!--#include file=login.asp -->
<%
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方法来确认备份是否成功。
下面是verify.asp文件代码,它列出备份装置名字并提供最近备份的有关信息。
<%@ Language=VBScript %>
<HTML>
<BODY>
<!--Login information -->
<!--#include file=login.asp-->
<P>
<%
Dim objDevice
Dim objResults
Dim iCount
Dim xCount
'创建备份装置对象
Set objDevice = Server.CreateObject("SQLDMO.BackupDevice")
'循环直到找到匹配的装置
For Each objDevice In srv.BackupDevices
If objDevice.Name = Request("fname") Then
'找到匹配装置,开始读取结果
Set objResults = objDevice.ReadBackupHeader
For iCount = 1 To objResults.Rows
For xCount = 1 To objResults.Columns%>
<B><%=objResults.ColumnName(xcount)%></B>:
<%=objResults.GetColumnString(icount,xcount)%><br>
<%Next %>
<HR>
<%Next %>
<%End If%>
<%Next%>
<%
srv.Disconnect
set srv = nothing
set objDevice = nothing
set objResults = nothing
%>
</BODY>
</HTML> |
ReadBackupHeader方法返回QueryResults对象。用其Rows属性可以得到备份的纪录数。然后对每行纪录作列信息搜索。
其他功能
SQL-DMO还提供远程备份和恢复功能。本文没有涉及数据库恢复,但SQL-DMO有很强的恢复功能。