работа с Dbf

Ответить

Код подтверждения
Введите код в точности так, как вы его видите. Регистр символов не имеет значения.
BBCode ВКЛЮЧЁН
[img] ВКЛЮЧЁН
[url] ВКЛЮЧЁН
Смайлики ОТКЛЮЧЕНЫ
Обзор темы
   

Развернуть Обзор темы: работа с Dbf

Re: работа с Dbf

vav1lon » 28 июн 2007, 07:54

Вот такое кусок кода

Код: Выделить всё

 
  Form1.ADOQuery5.Close;
  Form1.ADOQuery5.SQL.Clear;
  Form1.ADOQuery5.SQL.Add('SELECT count(LPU_NAPR)    FROM '+ FileName1 +' WHERE (LPU_NAPR = 0) or (LPU_NAPR IS NULL);');
  Form1.ADOQuery5.Active := true;
  If (Form1.ADOQuery5.Fields[0].AsString > '0') Then Begin Form1.Label57.Font.Color := clRed; Form1.Label57.Caption := Form1.ADOQuery5.Fields[0].AsString; End
   Else Begin Form1.Label57.Font.Color := clGreen; Form1.Label57.Caption := 'Ошибок нет';End;
проблема в том что в поле LPU_NAPR в FoxPRO я вижу значение .Null а вот при проведении скрипта он не выдает пустых полей

Re: работа с Dbf

Игорь Акопян » 25 июн 2007, 10:01

выполни их последовательно, сначала один, потом второй

Re: работа с Dbf

vav1lon » 22 июн 2007, 17:45

извеняюся за глупость

Если не секрет скажите какнаписать 2 SQL завпроса сразу

ADOQuery1.SQL.Add не катит

Код: Выделить всё

Form1.ADOQuery1.SQL.Add('SELECT count(YEAR) FROM '+ FileName1 +' WHERE YEAR IS NULL');
Form1.ADOQuery1.SQL.Add('SELECT count(YEAR2) FROM '+ FileName1 +' WHERE YEAR2 IS NULL');

Re: работа с Dbf

Игорь Акопян » 22 июн 2007, 16:54

выполнить запрос, результат ADOQuery.Fields[0].AsString присвоить в кэпшн

Re: работа с Dbf

vav1lon » 22 июн 2007, 13:43

как мне сделать завпрос

Код: Выделить всё

Form1.ADOQuery1.SQL.Add('SELECT count(YEAR) FROM '+ FileName1 +' WHERE YEAR IS NULL');
чтобы он выводился в

Код: Выделить всё

Form1.Label45.Caption :=

Re: работа с Dbf

Игорь Акопян » 13 июн 2007, 12:25

выполняй запрос типа:
[syntax='sql']
select count(*)
from MyTable
where MyField is null
[/syntax]
если результат запроса <> 0 то рисуй ошибку.

Re: работа с Dbf

vav1lon » 08 июн 2007, 06:16

необходимо проверять определенные столбцы на наличие в них пустых ячеек и выводить надпись что в столбце ошибка

Re: работа с Dbf

Игорь Акопян » 08 июн 2007, 00:03

vav1lon, огласи поточнее условие. Выдать все записи у которых в заданном столбце не Null?

Re: работа с Dbf

vav1lon » 06 июн 2007, 07:29

спасибо ето помогло он проверяет но проверяет тока первую ячейку...
а как сделать чтобы весь столбец проверял?

Re: работа с Dbf

Игорь Акопян » 31 май 2007, 15:21

vav1lon, не в ту сторону копаешь
Проверять значение поля надо не через грид, а через Dataset...
типа

Код: Выделить всё

if Dataset.FieldByName('MyField').IsNull then
проверит поле на Null у текущей записи.
Если тебе надо проверить есть ли null'ы в таблице вообще - проще выполнить отдельный SQL-запрос

Вернуться к началу