Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

IBDataset.ParamByName 


Eduard   (2002-03-20 11:19) [0]

Здравствуйте, мастаки !
Подскажите, пожалуйста, почему в нижеприведенном коде возникает ошибка "Field "SomeField" not Found . Во-первых, поле такое существует, параметр с таким именем существует, база написана на диалекте 3, все поля и имена таблиц в запросах введены в кавычках.

IBDataSet1.Open;
IBDataSet1.ParamByName("SomeField").AsString := "SomeStringValue";
IBDataSet1.Prepare;
IBDataSet1.Insert;
IBDataSet1.ApplyUpdates;
IBTransaction1.Commit;
IBDataSet1.Open;


Если я что-то упустил, поправьте меня, и я дополню вопрос. Заранее спасибо.



Alexandr   (2002-03-20 11:25) [1]

бред какой-то написан



Eduard   (2002-03-20 11:27) [2]

Почему бред ?



OlegE   (2002-03-20 11:31) [3]

Диалект 3 чувствителен к регистру. Проверь какими символами у тебя набрано SomeField. SomeField и SOMEFIELD - для 3 диалекта разные вещи.



Eduard   (2002-03-20 11:32) [4]

Написано все в нормальном регистре.



Alexandr   (2002-03-20 11:32) [5]

слушай, напиши, что ты хотел сделать этим кодом.
А то это просто на набор комманд похоже.
А также напиши, что у тебя написано в selectSQL и InsertSQL



Alexandr   (2002-03-20 11:33) [6]

и всетаки в нормальном или в нужном (правильном)?



Eduard   (2002-03-20 11:45) [7]

SelectSQL : select "N", "Monitor" from "Monitors"
InsertSQL : insert into "Monitors"
("Monitors"."N", "Monitors"."Monitor")
values
(:"N", :"Monitor")

Этим кодом я хотел вставить строку "SomeStringValue" в таблицу Monitors



Alexandr   (2002-03-20 11:54) [8]

values
(:"N", :"Monitor")

тут кавычки ненадо.
т.е.
values
(:N, :Monitor)

а вот это так надо


try
IBDataSet1.Open;
IBDataSet1.Insert;
IBDataSet1.FieldByName("Monitor").AsString := "SomeStringValue";
IBDataSet1.FieldByName("N").AsInteger := N;
IBDataSet1.Post;
IBDataSet1.ApplyUpdates;
IBTransaction1.Commit;
except
IBTransaction1.RollBack;
raise;
end;
IBDataSet1.Open;





Eduard   (2002-03-20 12:01) [9]

Так получилось:

try
IBDataSet1.Open;
IBDataSet1.Insert;
IBDataSet1.FieldByName("Monitor").AsString := "SomeStringValue";
//IBDataSet1.FieldByName("N").AsInteger := N;
IBDataSet1.Post;
IBDataSet1.ApplyUpdates;
IBTransaction1.Commit;
except
IBTransaction1.RollBack;
raise;
end;
IBDataSet1.Open;


А на кой тогда ParamByName ???



Alexandr   (2002-03-20 12:10) [10]

дык когда к параметру надо обращаться.
а FieldByname кагда к полю. А тебе надо к полю.



Eduard   (2002-03-21 09:41) [11]

И все равно я ни черта не понял. Моя цель такова: присвоить значение какого-нибудь Edit.Text параметру :Monitor , затем выполнить InsertSQL, который выглядит как "INSERT INTO "Monitors" ("Monitors"."Monitor")
VALUES (:"Monitor")"
. То, что Вы мне предлагаете - простое присваивание значения полю.



Alexandr   (2002-03-21 10:46) [12]

дык, у тебя же кэшированные обновления, поэтому компонент при applyUpdates смотрит, в каких записях изменились значения в твоем датасете и сам запускает соответствующие InsertSQL и UpdateSQL на основе твоих изменений и вставок, и какие параметры туда подставлять датасет сам разбирается.



Alexandr   (2002-03-21 10:50) [13]

да, и еще, чтоб было совсем понятно.
свой InsertSQL можешь записать в TIBQuery,
а там уже вызвать запрос на исполнение (execQuery, по-моему), передав ему параметры через ParamByName




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.74 MB
Время: 0.021 c
1-32892           atmospheric           2002-03-29 16:57  2002.04.11  
Потоки


1-32837           CrazyAngel            2002-03-28 18:00  2002.04.11  
Как найти приложение , которое блокирует файл ?


3-32665           tovSuhov              2002-03-20 12:05  2002.04.11  
Oracle Pipes


1-32843           snoup                 2002-03-29 09:54  2002.04.11  
Дайте пожалуйста пример как создавать и загружать какие то данные


1-32776           Roman_Tutov@mail.ru   2002-03-28 14:31  2002.04.11  
Текущее время