دخول

ouazanilarbi · 08-09-2011, 01:59 PM

السلام عليكم
لدي إستعلام عبارة عن عملية حسابية لمجموع حقلcofMA ومجموع الحقلMGCH لكن هذه العملية تجرى وفق شروط وهي الملونة بالأحمر
أين يكمن المشكل في هاتيه التعليمة

ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT SUM(cofMA),SUM(MGCH)');
ADOQuery2.SQL.Add('FROM Bult');
ADOQuery2.SQL.Add('WHERE (codAS='+ chr(39)+DBLookupComboBox6.Text+chr(39)+')');
ADOQuery2.SQL.Add('and(codCH='+ chr(39)+DBLookupComboBox7.Text+chr(39)+')');
ADOQuery2.SQL.Add('and(codET='+ chr(39)+DBLookupComboBox8.Text+chr(39)+');');
ADOQuery2.Active:=true;
ADOQuery2.Open;

justnick · 16-09-2011, 06:58 PM

السلام عليكم ورحمة الله
لقد قمت بكتابة جملة تقوم بجمع حقلين من جدول الاصناف لدى وذلك الى حد كبير يشبه الحالة التى تتكلم عنها

كود :
with ADOQuery1 do
begin
  close;
  sql.Clear;
  sql.Add('select sum (sale_price) as SalePrice, sum(cost_price) as CostPrice  from items where item_no < '+QuotedStr(Edit3.Text));
  open;
end;

اذن يكون كود الاستعلام الخاص بيك كالاتى:

كود :
with ADOQuery2 do
begin
  close;
  sql.Clear;
  sql.Add('select sum (cofMA) as total_cofMA, sum(MGCH) as total_MGCH  from Bult '+
  ' where codAS=  ' + QuotedStr(DBLookupComboBox6.Text) +
  'and codCH = ' + QuotedStr(DBLookupComboBox7.Text) +
  'and codET = ' + QuotedStr(DBLookupComboBox8.Text));
  open;
end;

هذا والله اعلم

**Lam.Abdeldjalil** · 20-09-2011, 08:11 PM

و عليكم السلام

كود :
ADOQuery2.Active:=true;
---
ADOQuery2.Open;

إختر واحدة فقط

+ لم تذكر المشكل !

بالتوفيق

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة