杭州印象西湖在哪里:列举出网络上所有的SQL Server服务器

来源：百度文库编辑：中科新闻网时间：2024/05/12 15:33:26

操作系统：win2000
编程工具：visual basic 6.0
问题：如何列举出网络（局域网）上所有的SQL Server服务器。
Sql Server客户端连接向导中的那个sql server服务器列表如何做。

引用Microsoft SQLDMO Object Library
Private Sub Nsqlser_DropDown()
If Nsqlser.ListCount > 0 Then Exit Sub
Dim Server As SQLDMO.NameList '名字列表namelist
Dim appDMO As New SQLDMO.Application 'sqldmo应用
Dim i As Integer
Set Server = appDMO.ListAvailableSQLServers '得到所有的sql sever 列表
For i = 1 To Server.Count
Nsqlser.AddItem Server(i) 'Nsqlser为下拉列表框
Next
End Sub

利用 "select name from sysdatabases" 语句,可以得到服务器中所有数据库名称!

列举出网络上所有的SQL Server服务器列举出无锡所有的职业技术学校请列举出所有的博客程序？学校出的关于SQL server 2000的几道题列举出中国所有的名牌大学，要全。 SQL SERVER的教程 SQL SERVER 的驱动程序？ sql server的问题 SQL Server 的安装 SQL Server的下载