![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Аналог ExecSQL для ADODataSet
leklerk © (2012-03-26 14:23:00)Добрый день. Создаю ADODataSet в консольном приложении и хочу, чтобы он выполнил запрос на изменение на сервере. В ADOQuery есть метод ExecSQL, а как надо с ADODataSet? На этот код ругается:
begin
{ TODO -oUser -cConsole Main : Insert code here }
CoInitialize(nil);
ADO := TADODataSet.Create(nil);
with ADO do begin
ConnectionString:='Provider=SQLOLEDB.1;Integrated Security=SSPI;'+
'Persist Security Info=False;Initial Catalog=Work_pk;'+
'Data Source=PROG\SQLEXPRESS';
CommandText := 'Вход ' + QuotedStr(GetComputer());
Open();
end;
ADO.Close;
ADO.Free;
CoUninitialize;
end.
leklerk (2012-03-26 15:04:00) [1]
> ???
Запускает хран. процедуру "Вход" и передает в качестве параметра имя компьютера.
Германн (2012-03-26 14:49:00) [2]
> CommandText := 'Вход ' + QuotedStr(GetComputer());
???
leklerk (2012-03-26 14:49:00) [3]Да, спасибо, понял, с TAdoCommand нормально.
Плохиш (2012-03-26 14:34:00) [4]
> Аналог ExecSQL для ADODataSet
TAdoCommand
Anatoly Podgoretsky (2012-03-26 14:33:00) [5]> leklerk (26.03.2012 14:23:00) [0]
Зачем такое странное желание, тебе что компонент не хватает? Ъочешь иметь
всего один компонент, типа "TProgram"