VPF::Использование в Delphi хранимой процедуры SQL

anya87

Дата 9.6.2007, 09:02 (ссылка)

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

Загрузка ...

Новичок

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

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

Создала хранимую процедуру на SQL сервере. Кто знает полный алгоритм подключения через компонент ADOStoredProcedure к необходимой процедуре на Delphi? И какой код программы (можно на каком-нибудь примере)? Ещё при подключении через этот компонент возникает ошибка вроде: Stored Procedure ecpected parameter @Kat (в моём случае). Что это за ошибка и как её исправить?!!
Параметры задала в программе, синтаксис самой процедуры правильный... smile

ils

Дата 9.6.2007, 11:01 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 5
Регистрация: 8.9.2006
Где: Москва

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

Примерно так

Код


var
  sp: TADOStoredProc;
begin
  sp := TADOStoredProc.Create(nil);
  try
    sp.Connection := MyConnection; // Настроенное соединение
    sp.ProcedureName := StoredProcName;

    sp.Parameters.ParamByName('@param1').Value := 'Значение параметра';
    sp.Parameters.ParamByName('@param2').Value := null;
// и т.д.

    sp.Open; // или sp.Exec если не возвращается набор данных

// тут обрабатываем данные
  finally
    sp.Free;
  end
end;

Medved

Дата 14.9.2009, 07:10 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 7209
Регистрация: 15.9.2002
Где: Kazakhstan, Astan a

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

Код не рабочий.

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

http://extreme.sport-express.ru/
...и неважно сколько падал, важно сколько ты вставал...

Frees

Дата 14.9.2009, 07:27 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

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

Цитата(Medved @ 14.9.2009, 10:10

)

Код не рабочий.

голословен!

какая ошибка? что не так делается?

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

Кольцов Виктор Владимирович

Medved

Дата 14.9.2009, 08:13 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 7209
Регистрация: 15.9.2002
Где: Kazakhstan, Astan a

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

Цитата(Frees @ 14.9.2009, 10:27

)

голословен!

какая ошибка? что не так делается?

А ты соседнюю тему почитай, там я написал почему: Delphi 7 использование хранимых процедур, программно

В этом коде объект TADOStoredProc создается программно:

Код


var
  sp: TADOStoredProc;
begin
  sp := TADOStoredProc.Create(nil);

А используется этот экземпляр объекта, так, как будто-бы он создан в режиме Design Mode, т.е. когда компонент TADOStoredProc добавлен на форму.

Код


sp.Parameters.ParamByName('@param1').Value := 'Значение параметра';

Метод ParamByName применяется только к уже ранее созданным параметрам (программно, или мышкой). Ну оно и понятно. Логично, что к параметру можно обратиться только к тому, который существует.

На этапе компиляции данная ошибка не обнаруживается. Если скомпилировать и запустить этот код, то при выполнении его, Delphi ругается на то что такого параметра не существует.

Чтобы программно использовать TADOStoredProc, необходимо вручную задавать параметры, например так:

Код


with ADOStoredProc1.AddParameter do begin
  Name := 'NameParam1';
  DataType := ftString;
  Direction := pdInput;
  Size := 50;
  Value := 'Значение1';
end;

или так:

Код


ADOStoredProc1.CreateParameter('NameParam1', ftString, pdInput, 50, 'Значение1');

Это сообщение отредактировал(а) Medved - 14.9.2009, 08:28

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

http://extreme.sport-express.ru/
...и неважно сколько падал, важно сколько ты вставал...

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