开发学院数据库 MSSQL Server 使用SQL-DMO备份数据库并进行校验阅读

使用SQL-DMO备份数据库并进行校验

　2007-05-19 09:43:08　来源：WEB开发网　　　

核心提示： 下面是verify.asp文件代码，它列出备份装置名字并提供最近备份的有关信息，使用SQL-DMO备份数据库并进行校验(4)，<%@ Language=VBScript %><HTML><BODY><!--Login information --&

下面是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>