VPF::INSERT INTO - Форум программистов

Slyfox

Дата 30.11.2007, 09:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 62
Регистрация: 15.11.2007

Репутация: нет
Всего: нет

Код


with Form1.ADOQuery1 do begin
  Close;
  SQL.Clear;
  //SQL.Add('INSERT INTO SP (FIO,Number_pas,Name,Rate,Quantity,SP,Date_time) VALUES("'+Edit1.Text+'","'+Edit2.Text+'","'+Name+'",'+Rate+','+Edit3.Text+',"'+SP+'",:Prm)');
  //Parameters.ParamByName('Prm').Value:=Now();

  SQL.Add('INSERT INTO SP (FIO,Number_pas,Name,Rate) VALUES(:FIO,:Number_pas,:Name,:Rate)');
  Parameters.ParamByName('FIO').Value:=Edit1.Text;
  Parameters.ParamByName('Number_pas').Value:=Edit2.Text;
  Parameters.ParamByName('Name').Value:=Edit6.Text;
  Parameters.ParamByName('Rate').Value:=Edit7.Text;
  ExecSQL;
  //Open;
  //DataSource1.DataSet:=ADOQuery1;
 end;

 end;

Использую на подобие
Parameters.ParamByName('Number_pas').Value:=Edit2.Text;
Там где поле тип текстовый, то все работает, а где необходимо занести в числовой - ошибка.
Rate-столбец является чиловым и поэтому
Parameters.ParamByName('Rate').Value:=Edit7.Text;
не работает.

Помогите кто-чем знает, я пока не знаю в чем дело.
Помогите.

Rodman

Дата 30.11.2007, 10:16 (ссылка)

(нет голосов)

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122

Цитата(Slyfox @ 30.11.2007, 09:32

)

занести в числовой - ошибка.

ошибку в студию

по твоему коду не важу проблем - он нормальный... значит трабла где то в другом месте

--------------------

CRM с функцией АвтоОбзвона

Лотереи мира

Slyfox

Дата 30.11.2007, 10:58 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 62
Регистрация: 15.11.2007

Репутация: нет
Всего: нет

Все уже проблема решена. В чем ошибка была я так и не понял - просто я написал все с самого начала. Возможно в название поставил русскую букву, а у меня все англ.
Спасибо за помощь.

P.S.
Но основная проблема в том, что я мало поспал и выгляжу теперь вот так smile

Vas

Дата 30.11.2007, 11:31 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 830
Регистрация: 29.6.2005
Где: Stavropol region

Репутация: 23
Всего: 28

А может все таки явно преобразовать текст в число?

Код


Parameters.ParamByName('Rate').Value:=StrToInt(Edit7.Text);

--------------------

И опыт, сын ошибок трудных, И гений, парадоксов друг, И случай, бог изобретатель. ... (А.С. Пушкин)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »