تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طباعة معلومات من قاعدة البيانات
#1
السلام عليكم ارجوا المساعدة في كود vb لطباعة معلومات من قاعدة البيانات 
فبعد ما اعمل select للمعلومات كيف يمكنني طباعتها بشكل منظم ومرتب فمثلا في php وال asp.net يمكننا فعلها من خلال tables فكيف يمكن ذلك في vb
انا استخدم visual basic 2008,لغة c++ وليس c# واستخدم قاعدة بيانات sql وليس access
وكنت قد جربت هذا الكود ولكن لم ياتي بالنتيجة المطلوبة ارجوا المساعدة ولكم الاجر والثواب
كود :
Dim da As SqlDataAdapter
       Dim dt As DataTable
       Dim sqlconn As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\m7md\Documents\Visual Studio 2008\Projects\Cars\Cars\cars.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
       dt = New DataTable
       da = New SqlDataAdapter
       Dim sql As String = ("select * from tbl_cars ")
       da = New SqlDataAdapter(sql, sqlconn)
       sqlconn.Open()
       da.Fill(dt)
       For Each drRow As DataRow In dt.Rows
           Label6.Text= (drRow.Item("db_type").ToString)
           Label7.Text = (drRow.Item("db_gender").ToString)
           Label8.Text = (drRow.Item("db_color").ToString)
           Label9.Text = (drRow.Item("db_price").ToString)

       Next
الرد
تم الشكر بواسطة:
#2
السلام عليكم و رحمة الله و بركاته
بهذا الكود لا يمكنك إظهلر إلا السجل الأخير في الليبل 
أذا أرذت إظهار جميع السجلات استعمل أداة DataGridView
السلام عليكم و رحمة الله و بركاته
الرد
تم الشكر بواسطة:
#3
شكرا لكم وهذا الكود للاستفادة 
كود :
Dim currentDate As DateTime = DateTime.Now
        Dim da As SqlDataAdapter
        Dim sqlconn As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\m7md\Documents\Visual Studio 2008\Projects\Cars\Cars\cars.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
        Dim cm As String = ("select * from tbl_cars ")
        Dim ds As New DataSet
        da = New SqlDataAdapter(cm, sqlconn)
        ds.Clear()
        DataGridView1.DataSource = Nothing
        da.Fill(ds, "tbl_cars")
        DataGridView1.DataSource = ds
        DataGridView1.DataMember = "tbl_cars"
        DataGridView1.Columns(0).Width = 50
        DataGridView1.Columns(1).Width = 200
        DataGridView1.Columns(1).Width = 200
        DataGridView1.Columns(3).Width = 200
        DataGridView1.Columns(4).Width = 200
        DataGridView1.Columns(0).HeaderText = "N"
        DataGridView1.Columns(1).HeaderText = "TYPE"
        DataGridView1.Columns(2).HeaderText = "Gender"
        DataGridView1.Columns(3).HeaderText = "COLOR"
        DataGridView1.Columns(4).HeaderText = "PRICE"
الرد
تم الشكر بواسطة:
#4
من وجهة نظري للطباعة أستخدم تقارير rdcl المرفقة مع الفيجوال

[صورة مرفقة: 15-06-2012%2022.50.49.jpg]
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة قاعدة البيانات لا تقبل البيانات بعد التنصيب abozeyd 8 236 10-09-18, 08:02 AM
آخر رد: elgokr
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 493 25-08-18, 10:00 PM
آخر رد: elgokr
  [سؤال] حول تحديث البيانات داخل DataGridView مبرمج بلا حدود 20 3,590 14-08-18, 09:00 PM
آخر رد: elgokr
  كيفية حفظ التعديل في Data Grid View مباشرا الى قاعدة البيانات اللورد محمود 1 306 02-08-18, 07:26 PM
آخر رد: سعود
  [سؤال] كيفية ربط قاعدة بيانات اكسس 2007 بالفيجوال 2008 mohmedhosen 3 5,330 16-07-18, 08:48 PM
آخر رد: aridje34
  خطأ في الإتصال بقاعدة البيانات الموجودة على هذا السيرفر (ويندوز 10) djelloul 0 186 04-05-18, 12:14 AM
آخر رد: djelloul
  بحث و اظهار سجلات من قاعدة البيانات في حال تساوت اول 4 ارقام من text بالقيمه الموجود ahmed_elwerfalli 0 230 25-04-18, 04:12 PM
آخر رد: ahmed_elwerfalli
Tongue ربط قاعدة بينات اكسل مع الفيجوال عمار عيثاوي 3 2,363 02-03-18, 05:13 PM
آخر رد: محمد بن عطية
  إضافة الصورة في قاعدة البيانات iFanfan 0 314 01-03-18, 06:02 PM
آخر رد: iFanfan
  [سؤال] طباعة DataGridView AL - WafaaPro 0 196 21-02-18, 08:23 PM
آخر رد: AL - WafaaPro

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


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