10-09-15, 02:25 PM
10-09-15, 02:52 PM
اعذرني سؤالك مبهم
لكن سأفترض ان الجدول
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
لكن سأفترض ان الجدول
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
13-09-15, 09:50 AM
سلمت وبارك الله فيك
القاعده emp والحقل money
واللي احتاجه بالضبط اذا اشتغل الفورم يعطيني كم عدد الادخالات لكل دائره طبعا ب lable او text طبعا ماله دخل ب button
القاعده emp والحقل money
واللي احتاجه بالضبط اذا اشتغل الفورم يعطيني كم عدد الادخالات لكل دائره طبعا ب lable او text طبعا ماله دخل ب button
13-09-15, 10:12 AM
سلام
اذا كنت تقصد مجموع المبالغ تستخدم sum كما بينها لك استاذنا ابو عمر
اذا كنت تقصد عدد السجلات فاستخدم count
لكن اذا كان الجدول emp يشمل جميع الدوائر فلابد من تحديدها ب where مثل
موفقين
اذا كنت تقصد مجموع المبالغ تستخدم sum كما بينها لك استاذنا ابو عمر
كود :
SELECT SUM([money]) FROM [emp]اذا كنت تقصد عدد السجلات فاستخدم count
كود :
SELECT COUNT([money]) FROM [emp]لكن اذا كان الجدول emp يشمل جميع الدوائر فلابد من تحديدها ب where مثل
كود :
SELECT COUNT([money]) FROM [emp] WHERE [اسم الدائره او رقمها] = ?موفقين
13-09-15, 11:30 AM
(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
13-09-15, 01:18 PM
الله يرحم والديك
ارفع مثال واي واحد منا يلاقيه راح يعدله لك
ارفع مثال واي واحد منا يلاقيه راح يعدله لك
14-09-15, 11:47 AM
الله لا يهينكم هذا المثال على فجوال بيسك 2010
14-09-15, 12:48 PM
سلام
موفقين
كود :
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موفقين
14-09-15, 03:42 PM
وعليكم السلام
اسعدك الله في الدارين تمام التمام
اعتذر منك فأنا نوعا ما مبتدأ
اسعدك الله في الدارين تمام التمام
اعتذر منك فأنا نوعا ما مبتدأ