PDA

View Full Version : رفع اشکال یک کد



hentjanson
دوشنبه 22 بهمن 1386, 16:46 عصر
سلام بچه ها من می خوام تو جدولم و از تک فیلد name اون تمام رکورد های به اسم احمد رو بشمارم این کد درسته .

بانک اکسس و حالت ado table
این کد رو تو خاصیت sql فرمان adoquery نوشتم



With Query1 Do
begin
Sql.clear;
Sql.add(Select Count(*) as name From Table1);
Sql.add(Where name='Ahmad');
Open;
end;
edit1.text:=fieldbyname('name').asstring

vcldeveloper
دوشنبه 22 بهمن 1386, 17:07 عصر
مشکلی نداره.

SYNDROME
سه شنبه 23 بهمن 1386, 06:53 صبح
فکر کنم "'" را یادتان رفته است.





With Query1 Do
begin
Sql.clear;
Sql.add('Select Count(*) as name From Table1');
Sql.add('Where name=''Ahmad''');
Open;
end;
edit1.text:=fieldbyname('name').asstring


موفق باشید

Vahid_moghaddam
سه شنبه 23 بهمن 1386, 13:09 عصر
یا برای خوانایی بیشتر کد (فقط یه پیشنهاد):



add('select count(*) as '+quotedstr('name')+' from ....')

Mah6447
سه شنبه 23 بهمن 1386, 14:44 عصر
سلام . کدی را که داخل AdoQuery نوشتی فکر می کنم یک اشکال کوچک دارد . این کد را داخل ریداد OnClick یک Butoon بگذار و آزمایش کن . فقط بجای Table1 نام جدول موجود در بانک اطلاعاتی را بگذار .




With ADOQuery1 Do
begin
Sql.clear;
Sql.add('Select Count(*) as name From Table1');
Sql.add('Where name='+QuotedStr('Ahmad'));
Open;
edit1.text:=Fieldbyname('name').AsString;
end;