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

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

عدد السجلات فى الوضع المتصل - صالح الشنطى - 07-12-15

السلام عليكم

هذا الكود لمعرفة عدد السجلات فى الجدول بشرط 
عن طريق الوضع المتصل
ياريت احد من الاخوة  يكتب لنا كود
عن طريق الوضع المنفصل
ولكم جزيل الشكر
PHP كود :
 Dim cm As New OleDbCommand("SELECT count(*) from  Tabel1 where  date1=k1", cn)
        cm.Parameters.AddWithValue("K1", Format(DateTimePicker1.Value.Date, "yyyy/MM/dd"))
        Dim x As Integer = cm.ExecuteScalar()
        TextBox1.Text = x 


RE: عدد السجلات فى الوضع المتصل - HASAN6.0 - 07-12-15

ماذا تقصد بالوضع المنفصل ؟

RE: عدد السجلات فى الوضع المتصل - صالح الشنطى - 07-12-15

الوضع المتصل هو التعامل مع قاعدة البيانات مباشرة
والوضع المنفصل هو اخد نسخة من قاعدة البيانات عن طريق الداتا ست

RE: عدد السجلات فى الوضع المتصل - HASAN6.0 - 07-12-15

PHP كود :
Dim x As Integer = 0
        Dim result() As DataRow = Tabel1.Select("date1 = '" & Format(DateTimePicker1.Value.Date, "yyyy/MM/dd") & "'")
        For Each row As DataRow In result :             x += 1 :         Next
        MsgBox(x) 
Shy

RE: عدد السجلات فى الوضع المتصل - صالح الشنطى - 08-12-15

(07-12-15, 11:11 PM)HASAN6.0 كتب :
PHP كود :
Dim x As Integer = 0
        Dim result() As DataRow = Tabel1.Select("date1 = '" & Format(DateTimePicker1.Value.Date, "yyyy/MM/dd") & "'")
        For Each row As DataRow In result :             x += 1 :         Next
        MsgBox(x) 
Shy

شكرا ياصديقى

وقد تم تعديل الكود  بهدا الشكل

PHP كود :
Dim da As New OleDbDataAdapter("select * from  employ1 where  tt9=#" & Format(DateTimePicker1.Value.Date, "MM/dd/yyyy") & "#", cn)
        Dim dt As New DataTable
        da.Fill(dt)
        Dim x As Integer = 0
        For Each row As DataRow In dt.Rows : x += 1 : Next
        MsgBox(x) 


RE: عدد السجلات فى الوضع المتصل - khodor1985 - 08-12-15

أيضا يمكن احتساب عدد السجلات بهذه الطريقة :
PHP كود :
Dim dt as new DataTable
da.Fill(dt)
For i as integer = 0 to dt.Rows.Count -1
TextBox1.Text = i
Next