开发学院数据库 MSSQL Server MS SQL Server2k数据转换服务部署阅读

MS SQL Server2k数据转换服务部署

　2007-11-11 04:08:31　来源：WEB开发网　　　

核心提示： ·把xml(标准化越来越近了)的数据转换成多列表格形式·sql server(WINDOWS平台上强大的数据库平台) 2005 数据转换服务中的模·mssql(WINDOWS平台上强大的数据库平台)Server2k数据转换服务部署·使用sql server(WI

(标准化越来越近了)

(WINDOWS平台上强大的数据库平台)

(标准化越来越近了)

(WINDOWS平台上强大的数据库平台)

(标准化越来越近了)

　　2.2. 重新设计DTS包

为了处理DTSRun传入的自定义参数，DTS包需要重新设计。我们可以增加一个ActiveX Script任务，在ActiveX Script任务中通过VB Script或者Java Script对DTS编程，并且定义流程，把ActiveX Script任务设置成最开始的一个任务。由于DTS COM对象线程模式与ActiveX Script任务宿主的不一致，需要将ActiveX Script任务工作流属性设置成在主包线程中执行，否则可能会出现调用错误。

下面的例子是ActiveX Script任务中的脚本。例子中的DTS包包含名称为"DBConnection"的数据库连接对象。

　　'************************************************************************
　　' Visual Basic ActiveX Script
　　'************************************************************************

Function Main()
　　Dim sDBDataSource
　　Dim sDBCatalog
　　Dim sDBUserID
　　Dim sDBPassword
　　Dim bDBUseTrusted
　　Dim sOLAPServer
　　Dim sOLAPCatalog
　　Dim oPackage
　　Dim oConnection
　　Dim oTask
　　Dim oCustomTask
　　
　　' 获取DTSRun传入的自定义参数
　　sDBDataSource = DTSGlobalVariables("DBDataSource").Value
　　sDBCatalog = DTSGlobalVariables("DBCatalog").Value
　　sDBUserID = DTSGlobalVariables("DBUserID").Value
　　sDBPassword = DTSGlobalVariables("DBPassword").Value
　　bDBUseTrusted = DTSGlobalVariables("DBUseTrusted").Value
　　sOLAPServer = DTSGlobalVariables("OLAPServer").Value
　　sOLAPCatalog = DTSGlobalVariables("OLAPCatalog").Value
　　
　　' 取得当前DTS包对象的技巧
　　Set oPackage = DTSGlobalVariables.Parent
　　' 取得包中的数据连接对象
　　Set oConnection = oPackage.Connections("DBConnection")

' 配置数据源对象的数据连接信息
　　If bDBUseTrusted Then
　　oConnection.UseTrustedConnection = bDBUseTrusted
　　Else
　　oConnection.UserID = sDBUserID
　　oConnection.Password = sDBPassword
　　End If