نمایش نتایج 1 تا 4 از 4

نام تاپیک: بدست آوردن لیست سرور های موجود در شبکه

  1. #1

    بدست آوردن لیست سرور های موجود در شبکه

    این تکه کد برای بدست آوردن نام سرورهای موجود در شبکه می باشد. گفتم شاید به درد کسی بخوره.
    Dim i As Integer
    Dim oNames As SQLDMO.NameList
    Dim oSQLApp As SQLDMO.Application
    Set oSQLApp = New SQLDMO.Application


    Set oNames = oSQLApp.ListAvailableSQLServers()
    List1.Clear
    For i = 1 To oNames.Count
    List1.AddItem oNames.Item(i)
    Next i


  2. #2

    Thumbs up

    خیلی ممنون.
    من واقعا به این کد نیاز داشتم.

  3. #3
    چرا این کدها روی کامپیوتر من جواب نمی ده ؟ من Microsft SQLDMO Object Library را اضافه می کنم ولی حتی یک پیغام خطا هم نمی ده که متوجه بشم مشکل از کجاست

  4. #4
    نقل قول نوشته شده توسط S_VB.max مشاهده تاپیک
    چرا این کدها روی کامپیوتر من جواب نمی ده ؟ من Microsft SQLDMO Object Library را اضافه می کنم ولی حتی یک پیغام خطا هم نمی ده که متوجه بشم مشکل از کجاست
    کسی نیست به این سئوال جواب بده ؟

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •