تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] اريد مساعدتي في تصحيح او تعديل الكود
#1
هذا الكود وضيفته البحث عن sql server name


كود :
Try
           Cursor = Cursors.WaitCursor
           Timer2.Enabled = True
           Dim dataTable As DataTable = SmoApplication.EnumAvailableSqlServers(True)
           cmbServerName.ValueMember = "Name"
           cmbServerName.DataSource = dataTable
           Dim serverName As String = cmbServerName.SelectedValue.ToString()
           Dim server As New Server(serverName)
       Catch ex As Exception
           MessageBox.Show("Sorry unable to find SQL Server instance" & vbCrLf & "If you have installed SQL Server then enter name of SQL Server instance manually", "Info", MessageBoxButtons.OK, MessageBoxIcon.Information)
       End Try
لكن يوجد به خطأ بسيط وهو لايستطيع اظهار الاسم ليقوم بختياره صحيح
الرد }}
تم الشكر بواسطة:
#2
السّلام عليكم و رحمة الله و بركاته
عيد فطر سعيد كل سنة و أنت بمليون خير إن شاء الله
أستخدمت نفس الكود أخي الكريم .. و يعمل بشكل عادي
تحياتي


الملفات المرفقة
.rar   CREATION_DATABASE.rar (الحجم : 949.66 ك ب / التحميلات : 42)
مجموعتنا على الفايسبوك
الرد }}
تم الشكر بواسطة: elgokr
#3
لدي سؤال بخصوص هذه الطريقة هل من الممكن رفع القاعدة في موقع معين ويتم الاتصال بالقاعدة المرفوعة اون لاين ؟؟
الرد }}
تم الشكر بواسطة:
#4
بخصوص الاتصال بقاعدة البيانات
تابع الرد التالى

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة: عبد العزيز البسكري
#5
إضافة ممكن تفيد ..
مجموعتنا على الفايسبوك
الرد }}
تم الشكر بواسطة: elgokr
#6
مشاركة لاخواني اكتب ما اعرفه بهذا الخصوص
PHP كود :
Private Function servers() As List(Of String)
 
       Dim lst As New List(Of String)
 
       Dim instance As SqlDataSourceEnumerator SqlDataSourceEnumerator.Instance
        Dim dt 
As DataTable instance.GetDataSources()
 
       For Each row As System.Data.DataRow In dt.Rows
            lst
.Add(row("ServerName"))
 
       Next
        Return lst
    End 
Function 
و للاستخدام ضمن زر امر او اي اجراء
PHP كود :
For Each h As String In servers()
 
           ListBox1.Items.Add(h)
 
       Next 
=====* التوقيع *======
=================
الرد }}
تم الشكر بواسطة: elgokr , عبد العزيز البسكري
#7
ممكن مثال لهذا الكود

مع دمجه بالكود او بالمثال المرفوع بالاعلى ولكم جزيل الشكر
الرد }}
تم الشكر بواسطة:
#8
اين انتم يا شباب
الرد }}
تم الشكر بواسطة:
#9
راجع اخى الرد رقم 4
ستجد به ملخص ما تريد

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم