Andhi
Andhi> Kalau untuk menemukan nama SQL Server sih udah ketemu:

Andhi> Private Sub Command1_Click()
Andhi>     Dim dmo As New SQLDMO.Application
Andhi>     'Don't forget to check mark on reference Microsoft SQLDMO Object
Library
Andhi>     'List all available SQL Servers in the Server field.
Andhi>     Combo1.Clear
Andhi>     For Each Server In dmo.ListAvailableSQLServers()
Andhi>         Combo1.AddItem Server
Andhi>     Next Server
Andhi> End Sub

mas Andhi untuk Server kok dia error ya ...
dia bilang variable not define
Server itu didefine sebagai apa ?

Jawab:
Kamu pakai Option Explicit ya? Coba tambahkan :
Dim Server As Variant

Kirim email ke