SQL Server数据库对象信息的获取

　　1. 开发环境

　　本文所列出的代码在Windows NT 4.0(SP6)、Microsoft Visual Basic 6.0、Microsoft SQL Server 2000环境下调试通过。

　　2. 实现思想

　　利用SQL-DMO（分布式管理对象）来访问SQL Server数据库。SQL-DMO是为Windows 9x与 Windows NT提供的32位OLE对象，它为与OLE兼容的应用程序提供了SQL Server管理功能的接口，开发者通过DMO就可以直接访问SQL Server数据对象。

　　3. 实现代码

　　在“菜单->工程->引用”里选中“Microsoft SQLDMO Object Library”。

　　在代码中定义以下全局变量：

    Public oSQLServer As SQLDMO.SQLServer

    ’定义一个SQLDMO.SQLServer对象

    Public oCurrentDB As SQLDMO.Database

    ’定义一个SQLDMO.Database 对象

    Public oCurrentTable As SQLDMO.Table

    ’定义一个SQLDMO.Table 对象

    Public SERVER_NAME As String

    ’用于获得用户输入的SQL Server服务器名称

    Public USERNAME As String

    ’用于获得用户输入的用户名

    Public PASSWORD As String

    ’用于获得用户输入的密码

    ......

    以下为部分关键的程序代码：

    Private Sub cmd_link_Click()

    ’点击“连接”按钮

    ......

原文转自：http://www.ltesting.net