تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
محتاج كود عدد الصفوف من قاعدة البيانات وعرض بالفورم
#1
السلام عليكم 

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


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


الملفات المرفقة صورة/صور
   






بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد
تم الشكر بواسطة:
#2
اعذرني سؤالك مبهم
لكن سأفترض ان الجدول
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
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة: الطالب
#3
سلمت وبارك الله فيك

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

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


الملفات المرفقة صورة/صور
   






بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد
تم الشكر بواسطة:
#4
سلام


اذا كنت تقصد مجموع المبالغ تستخدم sum كما بينها لك استاذنا ابو عمر
كود :
SELECT SUM([money]) FROM [emp]

اذا كنت تقصد عدد السجلات فاستخدم count
كود :
SELECT COUNT([money]) FROM [emp]

لكن اذا كان الجدول emp يشمل جميع الدوائر فلابد من تحديدها ب where مثل
كود :
SELECT COUNT([money]) FROM [emp] WHERE [اسم الدائره او رقمها] = ?


موفقين
متغيب
الرد
تم الشكر بواسطة: أبو عمر , khodor1985
#5
(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


الملفات المرفقة صورة/صور
   






بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد
تم الشكر بواسطة: أبو عمر , أبو عمر
#6
الله يرحم والديك
ارفع مثال واي واحد منا يلاقيه راح يعدله لك
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة: الطالب , khodor1985
#7
الله لا يهينكم هذا المثال على فجوال بيسك 2010






بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد
تم الشكر بواسطة: أبو عمر
#8
سلام


كود :
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


موفقين
متغيب
الرد
تم الشكر بواسطة: أبو عمر , khodor1985
#9
وعليكم السلام


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


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






بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن اتصال قاعدة البيانات رسول555 3 44 منذ 2 ساعة مضت
آخر رد: سعود
  [VB.NET] ماهي الطريقة في تحويل قاعدة البيانات sql hglogtd 21 272 19-04-18, 12:39 AM
آخر رد: حريف برمجة
  [VB.NET] رفعت قاعدة بيانات access على Google Drive ولم استطع استعراض التقارير؟؟ abomo3ath 2 118 14-04-18, 03:08 PM
آخر رد: abomo3ath
  [سؤال] الاتصال بقاعدة البيانات باكثر من جهاز ابو يوسف النواوي 2 10 323 14-04-18, 01:29 PM
آخر رد: khodor1985
  كيف اجعل الكود يكتب التاريخ بجوار اسم قاعدة البيانات عند النسخ الاحتياطي السيد الجوهري 2 109 13-04-18, 12:43 AM
آخر رد: سعود
  مساعدة في ربط قاعدة البيانات عزف الرياح 0 58 13-04-18, 12:41 AM
آخر رد: عزف الرياح
Photo عند فتح تقرير البرنامج بيعمل logout قاعدة بيانات mysql servo_eng 0 60 08-04-18, 07:17 PM
آخر رد: servo_eng
  قاعدة بيانات => db4free عبدالرحمن المكاوي 0 57 08-04-18, 06:20 PM
آخر رد: عبدالرحمن المكاوي
  خطأ في كود الحذف من جدول البيانات داخل الداتا جريد فيو Mohamed Samy21 0 60 08-04-18, 05:41 PM
آخر رد: Mohamed Samy21
  [VB.NET] تم الحل لكل المطلوب في قاعدة البيانات اسامه الهرماوي 2 116 02-04-18, 12:33 PM
آخر رد: ahmedfa71

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


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