Vb中如下语句列举出网络上所有的SQL Server服务器。我想请句在VC＋＋中要怎样做。

Question

Vb中如下语句列举出网络上所有的SQL Server服务器。我想请句在VC＋＋中要怎样做。
特别是 " 引用Microsoft SQLDMO Object Library "这个要怎样做。谢谢！！！
 引用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

Answer 1

http://www.lihuasoft.net/source/show.php?id=2933

Answer 2

上面的下载的程序在Debug下可以动行。在Release下出现如下错误。请问这是怎么回事
Linking...
SQLInfoEnumerator.obj : error LNK2001: unresolved external symbol _SQLFreeHandle@8
SQLInfoEnumerator.obj : error LNK2001: unresolved external symbol _SQLDisconnect@4
SQLInfoEnumerator.obj : error LNK2001: unresolved external symbol _SQLBrowseConnect@24
SQLInfoEnumerator.obj : error LNK2001: unresolved external symbol _SQLSetEnvAttr@16
SQLInfoEnumerator.obj : error LNK2001: unresolved external symbol _SQLAllocHandle@12
Release/SQLSrvEnumerator.exe : fatal error LNK1120: 5 unresolved externals
Error executing link.exe.SQLSrvEnumerator.exe - 6 error(s), 0 warning(s)

Answer 3

release情况下
工程->设置->link->对象/库模块   加入:odbc32.lib 库

Answer 4

wqs_qiu_shi(Rainy):
你好。谢谢你的帮助。
我想请问你是怎样知道要在这里调置的。请赐教解决问题的方法。谢谢！！！