الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أريد أحتساب عدد ٌRows

مغلق
بدأه Al-Mohana في 25 ديسمبر 2006 · 3 رد · 776 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

أريد مساعده في حل هذه المشكله

وهي

أريد أحتساب عدد ٌRowsفي جدول المسمى Issue للعمودIs_IdMember عندما Is_IdMember = Me.MeNo.Text

يعني يحسب عدد السطر الذي يكون مسجل فيه سجل محدد الذي مكتوب في textbox

و بأعباره أخرى يحسب عدد الأسطر التي قيمة Me.MeNo.Text موجوده فيه فقط

وأريد أن أظهر العدد الأسطر في Me.id.Text

 Dim id As String = Me.id.Text
			Me.OleDbConnection1.Open()
			id = Me.OleDbDataAdapter5.SelectCommand.CommandText = " SELECT Is_IdMember COUNT(*) FROM Issue WHERE Is_IdMember = ‘" & Me.MeNo.Text & "’ "



			Me.OleDbDataAdapter5.SelectCommand.ExecuteNonQuery()



			Me.OleDbConnection1.Close()

وعندما أجرب هذا الكود يظهر في =Me.id.Text False

علما أني أستخدم VB.NET2003معMS.Access

علما أني لم أستخدم dataGrid

أرجوا منكم أن تساعدوني في هذه المعضله

تم تعديل هذه المشاركة بواسطة Al-Mohana في 25 ديسمبر 2006 في 13:50

تعلم فليس المرء يولد عالماً------ وليس أخو علماً كمن هو جاهلا

العلم نور وجمال يقتبس--------------- صاحبه مكرم اين ما جلس

من فاته العلم ساعة تظعظع ونتكس----شتان شتان بين حمار وفرس

#2

استعمل

ExecuteScalar()

#3
aaaaaForum كتب:
استعمل

ExecuteScalar()

حاولت ولكن بدون جدوا

أرجوا كل من لديه فكره فلايبخل علينا

وشكر جزيلا

تعلم فليس المرء يولد عالماً------ وليس أخو علماً كمن هو جاهلا

العلم نور وجمال يقتبس--------------- صاحبه مكرم اين ما جلس

من فاته العلم ساعة تظعظع ونتكس----شتان شتان بين حمار وفرس

#4

السلام عليكم 

 
			Me.OleDbConnection1.Open()
			Me.OleDbDataAdapter5.SelectCommand.CommandText = " SELECT COUNT( Is_IdMember ) FROM Issue WHERE Is_IdMember = ‘" & Me.MeNo.Text & "’ "

					  dim x As integer											  

			x= OleDbDataAdapter5.SelectCommand.executescalar()
messagebox.show(x)


			Me.OleDbConnection1.Close()

{وَاتَّقُواْ يَوْمًا تُرْجَعُونَ فِيهِ إِلَى اللّهِ ثُمَّ تُوَفَّى كُلُّ نَفْسٍ مَّا كَسَبَتْ وَهُمْ لاَ يُظْلَمُونَ} (281) سورة البقرة

br17.gif

برنامج الإتصلات الإدارية والارشيف الالكتروني

برنامج الخبير لنقاط البيع المباشرة

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…