تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] اريد عرض اسماء الجداول من قاعدة البيانات سكوال سيرفرس
#1
اتمنى تزويدي بكود يعرض اسماء الجداول الموجودة في احد قواعد البيانات سكوال سيرفيس

يعني عند قاعدة بيانات اسمها drt وبها الجدول t1والجدول t2والجدول t3
اريد اجلب اسماء الجداول وعرضها في ليست فيو او ليست بوكس
الرد }}}
تم الشكر بواسطة: ابو انس
#2
تفضل

PHP كود :
SELECT *FROM information_schema.tables 
سورس كود برنامج محاسبة ومبيعات احترافي  -  سورس كود تطبيق ارسال رصيد من الجوال B4A
سورس كود تطبيق مبيعات للجوال
تيليجرام   Abo_anas_kahwaji@
واتساب 00963951283515
الرد }}}
تم الشكر بواسطة:
#3
(07-05-21, 12:01 AM)ابو انس كتب : تفضل

PHP كود :
SELECT *FROM information_schema.tables 

من لا يشكر الناس لا يشكر الله
اشكرك اخي ابو انس

وهذا كود البحث وعرض اسماء الجداول في الكومبوبكس

PHP كود :
 Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        ComboBox3
.Items.Clear()
 
       Dim con As New SqlConnection("DATA SOURCE=" ComboBox1.Text ";INITIAL CATALOG=" ComboBox2.Text ";integrated security=true")
 
       Dim adapter As New SqlDataAdapter("SELECT * from information_schema.tables"con)
 
       Dim dt As New DataTable
        adapter
.Fill(dt)
 
       if dt.Rows.Count 0 Then
            For Each row 
As DataRow In dt.Rows
                ComboBox3
.Items.Add(row("TABLE_NAME").ToString)
 
           Next
        End 
If

 
   End Sub 
الرد }}}
تم الشكر بواسطة: ابو انس
#4
جزاكم الله خير الجزاء وزادك علما وفهما

(07-05-21, 01:45 AM)alsaab120 كتب :
(07-05-21, 12:01 AM)ابو انس كتب : تفضل

PHP كود :
SELECT *FROM information_schema.tables 

من لا يشكر الناس لا يشكر الله
اشكرك اخي ابو انس

وهذا كود البحث وعرض اسماء الجداول في الكومبوبكس

PHP كود :
 Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        ComboBox3
.Items.Clear()
 
       Dim con As New SqlConnection("DATA SOURCE=" ComboBox1.Text ";INITIAL CATALOG=" ComboBox2.Text ";integrated security=true")
 
       Dim adapter As New SqlDataAdapter("SELECT * from information_schema.tables"con)
 
       Dim dt As New DataTable
        adapter
.Fill(dt)
 
       if dt.Rows.Count 0 Then
            For Each row 
As DataRow In dt.Rows
                ComboBox3
.Items.Add(row("TABLE_NAME").ToString)
 
           Next
        End 
If

 
   End Sub 

بارك الله فيك وزادك علما وفهما ونفع بك 
اشكرك يا اخي ابو انس
الرد }}}
تم الشكر بواسطة: ابو انس
#5
اهلا وسهلا ....
شكرا على الكود
سورس كود برنامج محاسبة ومبيعات احترافي  -  سورس كود تطبيق ارسال رصيد من الجوال B4A
سورس كود تطبيق مبيعات للجوال
تيليجرام   Abo_anas_kahwaji@
واتساب 00963951283515
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد اضافة حفظ PDF فى مسار على الهارد- مثال الاستاذ عبدالله الدوسري new_programer 0 49 13-04-24, 12:59 PM
آخر رد: new_programer
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 145 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 171 25-02-24, 06:29 AM
آخر رد: loay775
  انشاء قاعدة بيانات من ملف سكربت strongriseman 5 510 17-02-24, 02:57 PM
آخر رد: strongriseman
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 264 11-02-24, 08:43 PM
آخر رد: assuhimi
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 320 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 270 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 650 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 283 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 282 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1

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


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