باسلام
من با vb2003.net کار می کنم . می خواهم لیست تمام sqlserverهای روی شبکه رو در یک کومبوباکس نمایش بدهم . کد زیر رو می نویسم ولی error می ده .



  Dim i As Integer



        goSQLServerDMOApp = New SQLDMO.ApplicationClass

             Dim namX As SQLDMO.Names

        namX = goSQLServerDMOApp.ListAvailableSQLServers()

        For i = 1 To namX.Count

                      cmbserver.Items.Add(namX.Item(i))

        Next

                   cmbserver.SelectedIndex = -1

این error هستش :

queryinterface for interface sqldmo.namelist failed
در ضمن این کد در وبی 6 به خوبی کار می کنه ولی در 2003 مشکل داره .
باتشکر
راستی من وقتی کدهامو در ادیتور برنامه نویس می نویسم ، آشفته و قاطی - پاطی می شن . باید چیکار کنم که این مشکل واسم پیش نیاد؟