程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 數據庫知識 >> SqlServer數據庫 >> 關於SqlServer >> 使用SQL-DMO來操控SQL服務器

使用SQL-DMO來操控SQL服務器

編輯:關於SqlServer

SQL的分布式關系對象(SQL-DMO)庫允許你的VB6應用程序自動地同SQL服務器進行交互操作。這對於獲取關於SQL服務器的信息很有用,例如服務器的狀態或者網絡上的可用服務器.

要使用SQL-DMO庫,就要設置一個對“微軟SQL-DMO對象庫”的參照。

Application對象的ListAvailableSQLServers方法會返回一個NameList對象,它包含有網絡上可用服務器的列表。下面的代碼顯示了一個使用這個方法來填充列表框控件的方法:

Dim obJSQLApp As SQLDMO.Application
Dim objNameList As SQLDMO.NameList
Dim intCount As Integer

Set obJSQLApp = New SQLDMO.Application

Set objNameList = obJSQLApp.ListAvailableSQLServers()

For intCount = 1 To objNameList.Count
Call List1.AddItem(objNameList.Item(intCount))
Next

SQL-DMO庫裡另外一個有用的對象是SQLServer對象。這個對象能夠被用來獲取關於特定SQL服務器的信息。Connect方法會建立到數據庫服務器的連接並接受三個參數:數據庫名、用戶名和密碼。一旦對象的連接成功了,關於服務器的信息就能夠被取回:

Dim obJSQLServer As SQLDMO.SQLServer

Set obJSQLServer = New SQLDMO.SQLServer
obJSQLServer.LoginSecure = True
Call obJSQLServer.Connect("MyServerName", "username", "passWord")

Debug.PrintobJSQLServer.Name
Debug.PrintobJSQLServer.HostName
Debug.PrintobJSQLServer.Status

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved