Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ADOQuery1.Parameters.AddParameter

volph © (2002-06-21 10:51:00)
есть SQL-запрос:
DECLARE @GUID AS CHAR(35)
DECLARE @Rid AS INT
DECLARE @OwnerID AS INT
DECLARE @Region AS CHAR(10)
DECLARE @DateTime AS DATETIME
DECLARE @Version AS INT
DECLARE @Author AS CHAR(64)

SET @GUID = :GUID
SET @Rid = 12
SET @OwnerID = 333
SET @Region = "2300"
SET @DateTime = "6/14/2002 8:27:20 AM"
SET @Version = "1"
SET @Author = "Author"

BEGIN TRANSACTION
INSERT INTO Headers VALUES(@GUID,@Rid,@OwnerID,@Region,@DateTime,@Version,@Author)
COMMIT

а вто исходник на делфи, который почему-то не работает:

ADOQuery1.Open;
ADOQuery1.SQL.Text := SQLd.GetData("data/update/addTranFile");

with ADOQuery1.Parameters.AddParameter do begin
Name := "@GUID";
DataType := ftString;
Value := "tester";

end;
ADOQuery1.ExecSQL;

volph (2002-06-21 11:08:00) [1]
Ну вопервых такая строка тоже не пашет

ADOQuery1.Paramentrs.ParamByName("GUID").AsString:="jhkjkkh"

типа не может оно присвоить значение и типа AsString такого свойства нет

а это значит что я sql-запрос храню в xml-файле
ADOQuery1.SQL.Text := SQLd.GetData("data/update/addTranFile");

Fiend (2002-06-21 11:00:00) [2]
а что это значит:
ADOQuery1.SQL.Text := SQLd.GetData("data/update/addTranFile");
К тому же, какая то странная методика: сначала открыть источник, затем изменить текст запроса и потом задавать параметры. Намекните хоть что вы хотели этим сделать?????
И какую ошибку выдаёт

Alex_Sudakov (2002-06-21 10:59:00) [3]
В запросе надо использовать такую строку:

BEGIN TRANSACTION
INSERT INTO Headers VALUES(:GUID,:Rid,:OwnerID,:Region,:DateTime,:Version,:Author)
COMMIT

А перед запуском устанавливаешь параметры:

ADOQuery.Paramentrs.ParamByName("GUID").AsString:="jhkjkkh"
...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »