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

مشكلة في ربط ثلاث شروط بعبارة and

بدأه زينب العراقية في 2 سبتمبر 2013 · 3 رد · 590 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

اخوتي المبرمجين قمت بربط ثلاث شروط بعبارة sql

Dim cmd1 As New OleDbCommand("select * from main where trim(mm)=trim(textbox8.text) and trim(yy)=trim(textbox9.text) and trim(nn)= trim(combobox1.selecteditem)", con1)

If cmd1.ExecuteScalar <> Nothing Then

MsgBox(" انتبه ..تم ادخال بيانات هذا الحساب !!!")

con1.Close()

Exit Sub

End If

con1.Close()

وظهرت عندي رسالة الخطأ التالية

No value given for one or more required parameters.

#2

اعتذر اللكود اعلاه غير واضح 

الكود التالي للاستعلام بواسطة ثلاثة شروط

Dim cmd1 As New OleDbCommand("select * from main where trim(mm)=trim(textbox8.text) and trim(yy)=trim(textbox9.text) and trim(nn)= trim(combobox1.selecteditem)", con1)
If cmd1.ExecuteScalar <> Nothing Then
MsgBox(" انتبه ..تم ادخال بيانات هذا الحساب !!!")
con1.Close()
Exit Sub
End If
con1.Close()

تظهر لدي رسالة الخطأ

No value given for one or more required parameters.

#3

اليك الحل :

Dim cmd1 As New OleDbCommand("select * from main where mm = " & Trim(textbox8.text) & " and  yy = " & Trim(textbox9.text) & " and nn = " & Trim(combobox1.selecteditem) & "", con1)
#4

شكرا لك اخي العزيز جزاك الله خيرا

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