![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
![]() сам запрос:
Код:
procedure TForm1.Button1Click(Sender: TObject); var q: TADOQuery; begin q:= TADOQuery.Create(nil); q.Connection:= fDM.ADOConnection1; q.SQL.Text:= 'select count(*) as cnt from LichDan where [Увольнение] ='+QuotedStr('По статье'); q.Open; Label15.Caption:= q.FieldByName('cnt').Asstring; q.Close; q.Free; end; Мне нужно добавить отбор по еще одному столбцу этой же таблици, например по полю должность с записью инженер. Пробовал сделать но практики не хватает, кому не сложно помогите пожалуйста. заранее спасибо. |
#2
|
||||
|
||||
![]() SELECT statement
"c:\Program Files\Common Files\Borland Shared\BDE\LOCALSQL.HLP" Пишу программы за еду. __________________ |
#3
|
|||
|
|||
![]() Справка это конечно хорошо, но мне она как то не очень помогла с запросом)))
|
#4
|
|||
|
|||
![]() Код:
q.SQL.Text:= 'select count(*) as cnt from LichDan where [Увольнение] ='+QuotedStr('По статье') and 'select count(*) as cnt from LichDan where [Должность]='+QuotedStr('Инженер'); |
#5
|
||||
|
||||
![]() а так:
Код:
q.SQL.Text:= 'select count(*) as cnt from LichDan where [Увольнение] ='+QuotedStr('По статье')+' and [Должность]='+QuotedStr('Инженер'); ![]() Пишу программы за еду. __________________ |
Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
Aps (11.04.2012)
|
#6
|
|||
|
|||
![]() Компильнулся, но при нажатии на кнопку вылетает ошибка несоответствие типов данных в выражении условия отбора...
|