تقييم الموضوع :
  • 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]
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] فك كلمة مرور معقدة على قاعدة البيانات اكسس ahmed saba 7 5,619 28-05-17, 05:30 PM
آخر رد: abiza
  [سؤال] كيفية حفظ ملف pdf في قاعدة بيانات sql abid 5 4,859 10-05-17, 03:13 PM
آخر رد: safalo
  ظهور خطا عند سحب البيانات وعرضها في الداتا كريد باستخدم الـــ Threading HATEM KAREM 0 117 06-05-17, 04:45 PM
آخر رد: HATEM KAREM
  المساعدة في عمل استعلام قاعدة بيانات sqlserver djelloul 0 97 17-04-17, 07:13 PM
آخر رد: djelloul
  [VB.NET] مشكله عند الحفظ على قاعدة بيانات باستخدام Data Source وقاعدة بيانات اكسس2007 coderarab 8 926 03-04-17, 02:48 AM
آخر رد: ابو إياد
  استفسار حول عدم تكرار البيانات المتألق9 3 182 02-04-17, 03:38 AM
آخر رد: حريف برمجة
  جلب البيانات من ملف txt djelloul 7 217 28-03-17, 03:20 PM
آخر رد: djelloul
  [سؤال] طلب صيغة عامة أو وظيفة لأضافة بيانات لقاعدة البيانات ؟ عبد الله 2 186 10-03-17, 09:36 AM
آخر رد: عبد الله
  سرعة ادخال البيانات داخل ملف اكسس atefkhalf2004 1 196 05-03-17, 04:06 AM
آخر رد: thevirus
  استعادة قاعدة البيانات من ملف النسخة الإحتياطية djelloul 2 212 28-02-17, 03:27 PM
آخر رد: djelloul

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


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