编写数据库脚本

作者：Andrew Clinick
我在“If It Moves, Script It”（英文）这篇文章中曾谈到，如何使用“Windows Script Host(WSH)”( Windows 脚本主机) 管理 Windows 和 Windows 中的应用程序。文中的大多数示例都是基于管理 Windows 操作系统自身的，并不基于在该操作系统下运行的应用程序。为迎接新千年，我想我应该谈谈，如何在众多显露可脚本化接口的应用程序中使用脚本。这次只涉及“SQL Server”。在以后的几个月中，我将着重谈 Exchange、Office 和“系统管理服务器”。

您可以通过使用“分布式管理对象”、“数据转换服务”和新的“SQL Server xml(标准化越来越近了)”实现，将脚本用于“SQL Server”。
许多人都能够通过“Active Data Object(ADO)”和“Active Server Page (ASP)”技术访问数据库了。ADO 在帮助您查询和更新数据库方面做了大量的工作 — 但在备份（Y2K 问题带给我们的警惕）或是数据库之间的传输数据方面，其表现又如何呢？而这时就非涉及到 xml(标准化越来越近了) 不可了。

在此，我将告诉您如何通过使用 ADO 的伴随技术 － 特别是“分布式管理对象”、“数据转换服务”和新的“SQL Server xml(标准化越来越近了)”实现，将脚本用于“SQL Server”。

分布式管理对象
“分布式管理对象 (DMO)”是一组 COM 对象，它将“SQL Server”数据库和复制管理封装在一起。这意味着您可以编写一个 WSH 脚本，将特定表中的所有数据都复制到用制表符分隔的文件中，这有助于大量数据的移动。我之所以选择这个示例，是因为它的代码编写起来简单，但 DMO 允许您获取“SQL Server”中的每个对象，使您能够编写出一些非常优秀而有意义的管理脚本。

DMO 的关键是 SQLDMO.SQLServer 对象，它是基本的对象，它允许您连接到服务器并获取所有可用对象。在这种情况下，我将使用 Database 集合来选择数据库，然后从 table 集合访问要转储到文件的表。如果不提供数据库，将出现错误消息，并且脚本也就结束了。如果不提供表名，脚本将在数据库所有的表中循环，并导出非系统表。如果提供了数据库，它就导出该表。该示例虽然功能有限，但它为“SQL Server”提供了基于命令行的简单的导出实用程序，您可以以它为根据。

现在先看一段代码：

声明与 sql 谈话时使用的变量
Dim oServer  SQL Server 对象
Dim oDatabase  要使用的目标数据库
Dim oBCP  BCP 对象
Dim nRows  从 bcp 返回的行数
dim table  表对象
on error resume next
 第一个参数必须是数据库
if WScript.Arguments(0) = "" then
WScript.Echo "您没有提供要连接的数据库"
WScript.Quit
end if
 创建 SQL DMO 的实例
Set oServer = CreateObject("SQLDMO.SQLServer")
 创建 SQL DMO Bulkcopy 对象的实例
Set oBCP = CreateObject("SQLDMO.BulkCopy")
oServer.EnableBcp = True
 登录到本地服务器
 希望您已经更改了 sa 口令!!
oServer.Connect ".", "sa" 
 连接到提供的数据库
Set oDatabase = oServer.Databases(Wscript.Arguments(0))

 将分隔符设置为逗号
oBCP.ColumnDelimiter = vbComma