[فراس صلاح]

السلام عليكم أخوان الكرام في هذا المنتدى الرائع أخواني طلبي هذه المرة هو كود بحث في قاعدة بيانات لكن هناك شرطين يجب أن يتحققو ليتم عرض النتائج الأول موجود فيtextbox1.text إن تحقق الأول ينظر لل textbox2.text إن تحقق أيضا يعرض البيانات 

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

كود :

 sqL = "SELECT IDescription, UnitPrice, SUM([Quantity]) as ItemQuantity, POSDate, (UnitPrice * SUM([Quantity])) As TotalAmount FROM Item as I, POS as P, POSDetail as PD WHERE I.ItemNo = PD.ItemNo AND PD.InvoiceNo=P.InvoiceNo AND StaffID =" & Format(TextBox1.Text) & " Group By IDescription, UnitPrice, [Quantity], POSDate ORder By IDescription"

ختاماً شكراً جزيلاً لكم

[أبو عمر]

وعليكم السلام
اذا الكود السابق فيه البحث عن قيمة في
StaffID
بدلالة
textbox1
الشرط الثاني يكون البحث في اي حقل
بدلالة
textbox2
?

[فراس صلاح]

CustomerNo أخي وشكراً لك

[أبو عمر]

جرب

sqL = "SELECT IDescription, UnitPrice, SUM([Quantity]) as ItemQuantity, POSDate, (UnitPrice * SUM([Quantity])) As TotalAmount FROM Item as I, POS as P, POSDetail as PD WHERE I.ItemNo = PD.ItemNo AND PD.InvoiceNo=P.InvoiceNo AND StaffID =" & Format(TextBox1.Text) & "' and CustomerNo=" & textbox2.Text & " Group By IDescription, UnitPrice, [Quantity], POSDate ORder By IDescription"

[فراس صلاح]

لم ينجح أخي أرجوك ساعدني فأنا بأمس الحاجة إليه..

[أبو عمر]

اذا لم ينجح هذه المرة فضع مثالا
Sql = "SELECT IDescription, UnitPrice, SUM([Quantity]) as ItemQuantity, POSDate, (UnitPrice * SUM([Quantity])) As TotalAmount FROM Item as I, POS as P, POSDetail as PD WHERE I.ItemNo = PD.ItemNo AND PD.InvoiceNo=P.InvoiceNo AND StaffID ='" & Val(TextBox1.Text) & "' and CustomerNo=" & Val(TextBox2.Text) & " Group By IDescription, UnitPrice, [Quantity], POSDate ORder By IDescription"

[فراس صلاح]

شكراً جزيلا لك نجح لكن كيف التعديل على هذا الكود sqL = "SELECT IDescription, UnitPrice, SUM([Quantity]) as ItemQuantity, POSDate, (UnitPrice * SUM([Quantity])) As TotalAmount FROM Item as I, POS as P, POSDetail as PD WHERE I.ItemNo = PD.ItemNo AND PD.InvoiceNo=P.InvoiceNo AND POSDate >= #" & dtpFrom.Text & "# AND POSDate <=#" & dtpTo.Text & "# Group By IDescription, UnitPrice, [Quantity], POSDate ORder By IDescription"

[أبو عمر]

مثل التعديل على اي كود
لكني لم افهم ماذا تعني او ما الذي تحتاج اليه بالضبط؟

[فراس صلاح]

أقصد التعديل كما عدلت أنت على الكود السابق لكن عدلت عليه أنا شكراً لك