在多个SQL Server存在的情况下……

[cssin]

我所在的局域网中存在多台SQL Server服务器，我想查询哪个服务器是可用的,
应该用哪个类哈？？
（嘿嘿
最好付上一个代码段）

[zjmaskman]

用SQL-DMO类库(SQL2000+SP2)，例子：

Private Sub form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


Dim i As Short

'使用 SQL DMO Application 对象枚举当前可用的 SQL 服务器

Dim oSQLServerDMOApp As New SQLDMO.Application()

Dim namX As SQLDMO.NameList
namX = oSQLServerDMOApp.ListAvailableSQLServers

For i = 1 To namX.Count
Combo.Items.Add(namX.Item(i))
Next
Combo.SelectedIndex = 0
End Sub

[xpilot]

如果只是查询那些Sql开放,那些关闭,只需随便下一个扫描端口的程序,扫描一下局域网内的1433端口,那些主机是否存在就可以.

[koruro]

请问 zjmaskman兄，如何让SQL DMO 这个名称空间有效啊，是不是要把sqldmo.dll拷到那个目录？

[jackyhzzjcn]

将sqldmo.dll引入！

[lyhold]

用socket，连接一下，机器的断口（1433）如果能连上，说明服务已开启