Ошибка при Выполнении Insert

[nimf]

Я пытаюсь создать скрипт insert. При выполнении запроса возникает следующая ошибка.
The Conversion of a char data type to a datetime data type resulted in an ouf-of-range datetime value. Код такой.

hReadData.CommandText:='select * from xxx where id=1'

val:=' values (';
IncertInto:= 'insert into yyyy (';

hReadField.CommandText:='Select name,type from syscolumns where id = object_id('уууу')';

hReadField.Open;
hReadData.Open;
count:=hReadField.RecordCount;
i:=0;
while not hReadData.Eof do
begin
While not hReadField.Eof do
begin
Flag:=false;
IncertInto:=IncertInto+hReadField.F ieldByName('name').AsString;
val:=val+''''+hReadData.FieldByName (hReadField.FieldByName('name').AsS tring).AsString+'''';

inc(i);
hReadField.MoveBy(1);

if i<count then
begin
IncertInto:=IncertInto+', ';
val:=val+', ';
end;

if i=count then
begin
IncertInto:=IncertInto+')';
val:=val+')';
end;
end;

[Domovoy]

Скорее всего ты используешь SQL Server. Если я прав то дело вот в чём:
у тебя запрос пуляет дату так '30.12.2007'
а надо так '12.30.2007'

[dron-s]

использовать в запросах работу через параметры и проблема в формате даты отпадёт сама...