محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - نسخة قابلة للطباعة

محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم (/showthread.php?tid=13191)

محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - hglogtd - 10-09-15

السلام عليكم

محتاج كود فجوال بيستك 2010 جلب وعرض عدد الصفوف فقط ( العدد الاجمالي ) لجدول معين وليكن emp

القاعدة من نوع اكسس

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - أبو عمر - 10-09-15

اعذرني سؤالك مبهم
لكن سأفترض ان الجدول
emp
والحقل
money
select sum(money) as money from emp
td.load( Order.ExecuteReader)
For Each ff As DataRow In dt.Rows
msgbox (ff("money").ToString)
next

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - hglogtd - 13-09-15

سلمت وبارك الله فيك

القاعده emp والحقل money

واللي احتاجه بالضبط اذا اشتغل الفورم يعطيني كم عدد الادخالات لكل دائره طبعا ب lable او text طبعا ماله دخل ب button

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - الطالب - 13-09-15

سلام

اذا كنت تقصد مجموع المبالغ تستخدم sum كما بينها لك استاذنا ابو عمر

كود :

SELECT SUM([money]) FROM [emp]

اذا كنت تقصد عدد السجلات فاستخدم count

كود :

SELECT COUNT([money]) FROM [emp]

لكن اذا كان الجدول emp يشمل جميع الدوائر فلابد من تحديدها ب where مثل

كود :

SELECT COUNT([money]) FROM [emp] WHERE [اسم الدائره او رقمها] = ?

موفقين

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - hglogtd - 13-09-15

(13-09-15, 10:12 AM)الطالب كتب : سلام

اذا كنت تقصد مجموع المبالغ تستخدم sum كما بينها لك استاذنا ابو عمر

كود :

SELECT SUM([money]) FROM [emp]

اذا كنت تقصد عدد السجلات فاستخدم count

كود :

SELECT COUNT([money]) FROM [emp]

لكن اذا كان الجدول emp يشمل جميع الدوائر فلابد من تحديدها ب where مثل

كود :

SELECT COUNT([money]) FROM [emp] WHERE [اسم الدائره او رقمها] = ?

موفقين

وفقنا الله واياكم واشرك كل الشكر

لكن انا اللي احتاجه عدد السجلات كم

عملته مثل ما شرحت لي طبعاً اضفته في كود leabl

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - أبو عمر - 13-09-15

الله يرحم والديك
ارفع مثال واي واحد منا يلاقيه راح يعدله لك

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - hglogtd - 14-09-15

الله لا يهينكم هذا المثال على فجوال بيسك 2010

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - الطالب - 14-09-15

سلام

كود :

Private Sub logo_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    TextBox1.Text = My.User.Name

    TextBox2.Text = My.Computer.Name

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no1", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label10.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no2", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label6.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no3", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label8.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no4", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label11.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no5", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label13.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM no6", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label15.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

    Using cmd As New OleDb.OleDbCommand("SELECT COUNT(no) FROM oared", New OleDb.OleDbConnection(My.Settings.datadoConnectionString12))

        cmd.Connection.Open()

        Label17.Text = cmd.ExecuteScalar

        cmd.Connection.Close()

    End Using

End Sub

موفقين

RE: محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم - hglogtd - 14-09-15

وعليكم السلام

اسعدك الله في الدارين تمام التمام

اعتذر منك فأنا نوعا ما مبتدأ