Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

RDSConnection в ADO - вопрос не для слабаков [D6, D7, MSSQL]


krotik ©   (2003-06-03 12:29:00) 

Итак.
Я делаю удаленый сервер, создаю в нем свой бизнес-объект, который выполняет запрос и возвращает результат.
При этом запрос жестко прописан на сервере в бизнес-объекте.
Дальше я пишу клиента, где соединяюсь через RDSConnection со своим сервером, у компоненты ADODataSet в качестве командной строки (CommantText) указываю имя бизнес объекта - "Property1". Разумеется, вместо коннекта - RDSConnect.
Всё работает и я мог бы быть почти счастлив.
Но !!!! Я в своем занудстве усложняю задачу.
Я создаю второй бизнес-объект на сервере, где в функции Get это самое Property указан параметр, в зависимости от значения которого меняется запрос.
Или третий путь, бизнес-объект не как Prperty, а как Method - также возвращающий Набор Данных.

Внимание, вопрос:
КАКИМ ОБРАЗОМ ПЕРЕДАТЬ ЭТИ ХРЕНОВЫ ПАРАМЕТРЫ В CommandText ADODataSet ?????????
Пытался писать Propery1("sdfgsdgfsd") или Method1("sdgfdsfg") - нахрен посылает (((((((((((((((((


Владислав   (2003-06-03 16:09:00) [1]

Что-нибудь бы сказал, да "слабаки" мы :(
Куда уж... нам уж...
...


Мое имя   (2003-06-03 16:04:00) [2]

не слабак кротик, мы тебя великодушно извиняем

слабаки.


krotik   (2003-06-03 15:50:00) [3]

Работает.
Прошу прощения за идиотизм.
Может извинением послужит, что сегодня к нам в контору приехал местный презик (Шаймиев) с президентом UNESCO и прочей мелочевкой и приходится работать разрываясь между истеричными звонками руководства, юзеров, визитами охраны и т.д. Обстановка нерабочая


Polevi   (2003-06-03 15:18:00) [4]

ADODataset1.Recordset:=IUnknown(RDS.AppServer.MyMethod(MyParam)) as _Recordset;



krotik   (2003-06-03 14:50:00) [5]

Спасибо, но этот метод не прокатывает, т.к.
RDS.AppServer.MyMethod(MyParam) - Variant (((((


Polevi   (2003-06-03 13:12:00) [6]

ADODataset1.Recordset:=RDS.AppServer.MyMethod(MyParam)


Наверх

Титульная страница Поиск, карта сайта Написать письмо