السلام عليكم ورحمه الله وبركاته
لدى search form بها textboxes و button وdatagrid
والselect code هو مثلا
select col1 ,col2,col3 from table where col1 = @ col
والselect code وضعته فى select command
عن طريق كتابة المراد البحث عنه فى textbox1 وبالضغط على الbutton يعرض المطلوب
sqlcommand1.paramerters("@col").value = textbox1.textوسؤالى هو اننى عندما اضع فى الtextbox قيمة غير موجودة فى قاعدة البيانات يظهرلى فى messagebox ان هذة القيمة غير موجودة
وشكرا
أنا أسفة إن كنت قد أثقلت عليكم بأسألتى
يا حى يا قيوم برحمتك أستغيث اصلح لى شأنى كله ولا تكلنى إلى نفسى طرفة عين
اللهم أعنا على ذكرك وشكرك وحسن عبادتك
اللهم انك عفو كريم حليم تحب العفو فاعفو عنا
اللهم إنى أسألك رضاك والجنة وأعوذ بك من سخطك والنار
اللهم إرحمنا فوق الأرض وإرحمنا تحت الأرض وإرحمنا وإعتق رقابنا يوم العرض
اللهم لا تدع لنا ذنبًا إلا غفرته ولا همًا إلا فرجته ولا مريضًا ولا دينًا إلا قضيته ولا عيبا إلا سترته ولا حاجًا هى لك رضا إلا قضيتها
اللهم انى أسألك موجبات رحمتك وعزائم مغفرتك والسلامة من كل إثم والغنيمة من كل بر والفوز بالجنة و النجاة من النار اللهم أمين يا رب العالمين
السلام عليكم
اذا كنت تستخدم قارئ البيانات DataReader استخدم الطريقة HasRow وهى تعود بقيمة منطقية تحدد اذا ما كان يحتوى على صفوف
....
If dr.HasRow Then
....
Else
MsgBox("Not Found")VB.NET and C# Comparison
http://www.harding.edu/fmccown/vbnet_csharp_comparison.html
=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده
السلام عليكم
MessageBox.Show(" لم يتم العثور على " & " ( " & Me.txtFind.Text.Trim & " )" & " فى جدول اسم الجدول ", "ناتج البحث ", MessageBoxButtons.OK, MessageBoxIcon.Information){وَاتَّقُواْ يَوْمًا تُرْجَعُونَ فِيهِ إِلَى اللّهِ ثُمَّ تُوَفَّى كُلُّ نَفْسٍ مَّا كَسَبَتْ وَهُمْ لاَ يُظْلَمُونَ} (281) سورة البقرة
شكرا مرة اخرى
ولكن كيف استخدم هذه الmessagebox
فانا لدى sqldataadpter وتعرض البيانات كما ذكرت من قبل فى datagrid
الكود الذى استخدمه هو
If da.SelectCommand.Parameters("@col").Value = TextBox.Text Then
dat.Fill(ds, "table")
DataGrid1.DataSource = ds.tableفأين اضع الmessagebox
وشكرا
يا حى يا قيوم برحمتك أستغيث اصلح لى شأنى كله ولا تكلنى إلى نفسى طرفة عين
اللهم أعنا على ذكرك وشكرك وحسن عبادتك
اللهم انك عفو كريم حليم تحب العفو فاعفو عنا
اللهم إنى أسألك رضاك والجنة وأعوذ بك من سخطك والنار
اللهم إرحمنا فوق الأرض وإرحمنا تحت الأرض وإرحمنا وإعتق رقابنا يوم العرض
اللهم لا تدع لنا ذنبًا إلا غفرته ولا همًا إلا فرجته ولا مريضًا ولا دينًا إلا قضيته ولا عيبا إلا سترته ولا حاجًا هى لك رضا إلا قضيتها
اللهم انى أسألك موجبات رحمتك وعزائم مغفرتك والسلامة من كل إثم والغنيمة من كل بر والفوز بالجنة و النجاة من النار اللهم أمين يا رب العالمين
If ds.tables(0).Rows.Count=0 Then 'msgbox here ... else 'do action ... end if
VB.NET and C# Comparison
http://www.harding.edu/fmccown/vbnet_csharp_comparison.html
=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده
السلام عليكم ورحمة الله وبركاته
أستاذ SOLO.NET
لقد فشلت وسأشرح لك الخطوات التى أعمل بها الSearch
1) قمت بعمل sqldatadapter (dameet)
select command = SELECT Serial AS م, Name AS [الإســـــــــــم], Age AS السن, Nationality AS [الجنســــية], Position AS [الوظيفــــــــة], Payment AS [المبلــغ], PersonalInfo AS [بيانات شخصــــية], Date AS [التاريـــــخ], MeetingNo AS [رقـم الجلســـة], PaidOrNot AS [مدفوع أم لا], FileNo AS [رقـم الملــف] FROM Elmosaadat WHERE (MeetingNo = @meet)
2) generate dataset (dsmeet)
3) button_click
conn.open
If dsMeet.Tables("Elmosaadat").Rows.Count = 0 Then
CMessageBox.Show(" لم يتم العثور على " & " ( " & Me.MeetingNoTextBox.Text.Trim & " )" & _
" فى جدول اسم الجدول ", "ناتج البحث ", MessageBoxButtons.OK, _
MessageBoxIcon.Information, MessageBoxDefaultButton.Button1 _
, MessageBoxOptions.RtlReading)
Else
daMeet.SelectCommand.Parameters("@meet").Value = MeetingNoTextBox.Text
daMeet.Fill(dsMeet, "Elmosaadat")
DataGrid1.DataSource = dsMeet.Elmosaadat
End If
conn.closeعندما احاول ان استعلم بقيمة موجودة فعلا تظهر لى الmessagebox وايضا بقيمة غير صحيحة
فمن قضلك انا اعلم انى اثقلت عليك ولكن اذا كان هناك خطأ فأذكره لى
شكرًا
يا حى يا قيوم برحمتك أستغيث اصلح لى شأنى كله ولا تكلنى إلى نفسى طرفة عين
اللهم أعنا على ذكرك وشكرك وحسن عبادتك
اللهم انك عفو كريم حليم تحب العفو فاعفو عنا
اللهم إنى أسألك رضاك والجنة وأعوذ بك من سخطك والنار
اللهم إرحمنا فوق الأرض وإرحمنا تحت الأرض وإرحمنا وإعتق رقابنا يوم العرض
اللهم لا تدع لنا ذنبًا إلا غفرته ولا همًا إلا فرجته ولا مريضًا ولا دينًا إلا قضيته ولا عيبا إلا سترته ولا حاجًا هى لك رضا إلا قضيتها
اللهم انى أسألك موجبات رحمتك وعزائم مغفرتك والسلامة من كل إثم والغنيمة من كل بر والفوز بالجنة و النجاة من النار اللهم أمين يا رب العالمين
السلام عليكم
جزاك الله خيرا اخى جملة الاختبار التالية:
If dsMeet.Tables("Elmosaadat").Rows.Count = 0 Thenتضعها بعد عمل Fill للDataset
daMeet.Fill(dsMeet, "Elmosaadat")
فليس من المنطقى ان تختبر الجدول اذا كان يحتوى على صفوف قبل ملئه بالبيانات على حسب جملة الاستعلام
ولهذا السبب تكون نتيجة الاختبار دائما True
conn.open
daMeet.SelectCommand.Parameters("@meet").Value = MeetingNoTextBox.Text
daMeet.Fill(dsMeet, "Elmosaadat")
If dsMeet.Tables("Elmosaadat").Rows.Count = 0 Then
CMessageBox.Show(" لم يتم العثور على " & " ( " & Me.MeetingNoTextBox.Text.Trim & " )" & _
" فى جدول اسم الجدول ", "ناتج البحث ", MessageBoxButtons.OK, _
MessageBoxIcon.Information, MessageBoxDefaultButton.Button1 _
, MessageBoxOptions.RtlReading)
Else
") DataGrid1.DataSource = dsMeet.Tables("Elmosaadat
End If
conn.closeبالتوفيق
واذا فى اى مشاكل لا تتردد فى السؤال
VB.NET and C# Comparison
http://www.harding.edu/fmccown/vbnet_csharp_comparison.html
=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده
السلام عليكم ورحمه الله وبركاته
الف الف شكر من أختك إنجى
جزاك الله كل الخير وجعلك فى عون كل سائل
ربنا يبارك لك
يا حى يا قيوم برحمتك أستغيث اصلح لى شأنى كله ولا تكلنى إلى نفسى طرفة عين
اللهم أعنا على ذكرك وشكرك وحسن عبادتك
اللهم انك عفو كريم حليم تحب العفو فاعفو عنا
اللهم إنى أسألك رضاك والجنة وأعوذ بك من سخطك والنار
اللهم إرحمنا فوق الأرض وإرحمنا تحت الأرض وإرحمنا وإعتق رقابنا يوم العرض
اللهم لا تدع لنا ذنبًا إلا غفرته ولا همًا إلا فرجته ولا مريضًا ولا دينًا إلا قضيته ولا عيبا إلا سترته ولا حاجًا هى لك رضا إلا قضيتها
اللهم انى أسألك موجبات رحمتك وعزائم مغفرتك والسلامة من كل إثم والغنيمة من كل بر والفوز بالجنة و النجاة من النار اللهم أمين يا رب العالمين
هذا الموضوع مغلق.