Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2009.05.17;
Скачать: [xml.tar.bz2];

Вниз

ADO и MS SQL - посоветуйте хорошую ссылку   Найти похожие ветки 

 
Anatoly Podgoretsky ©   (2008-09-09 13:53) [40]

> kaif  (09.09.2008 13:27:36)  [36]

Не разбирался, но кажется в рамках транзакции, если задана в транзакции.
И в рамках сессии если задано на уровне AdoConnection.

Подумай также насчет прямой работе с АДО, но через компоненты, а не интерфейсы, можно получить интерсные результаты.


 
sniknik ©   (2008-09-09 13:56) [41]

> А что я корявого выдал?
имя поля более принято задавать через as,  а левая часть выражения логически соответствует то чему присваивается.
хотя это и не смертельно, т.к. синтаксически верны оба варианта.

kaif ©   (09.09.08 12:29) [33]
> зачем мне тебе врать
меня это всегда удивляло (это вообще а не только в тебе), вроде бы и не зачем, вроде и нужно только спрашивающему но тем не менее врут, скрывают исходную инфу, недоговаривают, не следуют советам, мало того даже не проверяют сказанное по их проблеме... т.е. ведут себя неадекватно (имхо), зачем тогда спрашивали?

> я впредь конкретно для тебя буду приводить код, специально переписанный для тебя  в форме типа:

> MyCommand = TADOCommans.Create(nil)
> try
>   MyCommand.Connection := ...
>   и так далее, включая добавление параметров и всего такого
>   MyCommand.Execute;
> finally
>   MyCommand.Free;
> end
если буквально так, то это будет вранье "в волшебных пузырьках". говоря что ты чтото сделал и показывая подобный код который ничего этого не подтверждает, а пропускает...

ну, как я понял, ты так и не удосужился сделать правильно, с установкой типа параметра...
принял другой вариант "обходной и нестандартный" (хотя что такого нестандартного в возврате рекордсета непонятно), ну, твое дело, работают оба варианта.


 
kaif ©   (2008-09-09 14:14) [42]

2 Ega23 ©   (09.09.08 13:47) [38]
Я попробовал.

Но я не знаю, не происходит ли каких-нибудь неявных автокоммитов после команд DDL.

Я открыл два отдельных окна запросов в Microsoft SQL Server Management Studio Express. Похоже, что это две разные сессии (хотя я могу ошибаться). В каждой я вижу, что set nocount Работает независимо.


 
Ega23 ©   (2008-09-09 14:17) [43]


> имя поля более принято задавать через as,  а левая часть
> выражения логически соответствует то чему присваивается.
> хотя это и не смертельно, т.к. синтаксически верны оба варианта.


Исключительно дело привычки. Мне, в принципе, пофиг как писать:
Select Result = @Result
Select @Result as Result
Select @Result Result


В MSSQL все три варианта равнозначны.
Просто так привык.


 
kaif ©   (2008-09-09 14:31) [44]

2 sniknik ©   (09.09.08 13:56) [41]

Блин. Вы меня меня задолбали.
Я сейчас специально для Вас, сударь, напишу код со всемия явными присвоениями, и который НЕ РАБОТАЕТ ТАК, КАК ВЫ НАСТАИВАЕТЕ ЧТО ТИПА ОБЯЗАН РАБОТАТЬ.

А Вы мне, милостивый государь, покажете, где в нем ошибка.

Если же не покажете, то я смею заявить, что Вы, сударь, - бесчестный человек и хам, так как обвиняете меня во вранье, не имея на то никаких оснований.

Вот код. Специально для тупых.

procedure TSimpleReferenceForm.Button1Click(Sender: TObject);
var
 P: TParameter;
begin
 with TADOCommand.Create(nil) do
 try
   Connection := MainData.Connection;

   P := Parameters.AddParameter;
   P.DataType := ftString;
   P.Direction := pdInput;
   P.Name := "NAME";

   P := Parameters.AddParameter;
   P.DataType := ftInteger;
   P.Direction := pdOutput;
   P.Name := "ID";

   CommandText :=
      "INSERT INTO GOODS(GOOD_NAME) VALUES (:NAME)"#13#10+
      "SELECT :ID = SCOPE_IDENTITY()";

   Parameters.ParamByName("NAME").Value := "Дядя Вася";

   Execute;
   if Parameters.FindParam("ID") = nil then
     ShowMessage("Параметр не найден")
   else if Parameters.ParamByName("ID").Value = Null then
     ShowMessage("Параметр вернул значение NULL. sniknik © зря упорствует в свеой неправоте")
   else
     ShowMessage("Происходит нечто третье");
 finally
   Free;
 end;
end;


Догадатесь с трех раз, какое сообщение он у меня вывел?


 
sniknik ©   (2008-09-09 14:42) [45]

Anatoly Podgoretsky ©   (09.09.08 13:41) [37]
> FixedChar <> NVarChar(WideString) = Char ...
> ...
не сталкивался, юникод не использую, только пробовал один раз, както. т.что ничего сказать не могу.

> AutoInc <> Integer, хотя бы потому что он ReadOnly и не только Integer
а вот тут непонятно, как типом AutoInc может быть параметр? насколько понимаю автоинкремент это исключительно свойство поля таблицы или в старших версиях mssql (> 2000, больше всего с ним работаю) уже появились переменные такого типа?
если же речь не о параметрах, а именно о поле, то инфа о его типе запрашивается от сервера через провайдера, и результаты действительно разные, тип от jet позволяет даже редактировать это поле в режиме ltBatchOptimistic, а вот от mssql нет, т.е. это не свойство обертки.


 
sniknik ©   (2008-09-09 14:44) [46]

> Вот код. Специально для тупых.
специально повторить что тип параметрам (да и всему другому) надо задавать после инициализации, а не до? ;)
внесение запроса переинициализирует все и вся... объяснял вроде почему.


 
sniknik ©   (2008-09-09 14:48) [47]

> что Вы, сударь, - бесчестный человек и хам, так как обвиняете меня во вранье, не имея на то никаких оснований.
нет, только хам. и основания есть. говоришь одно код показываешь другой (или не показываешь, предлагая верить на слово, а результаты описываешь нестыкующиеся даже с тем что  есть в исходных данных).

кстати приведенный код, это именно то к чему следует стремится при описании проблемы.


 
sniknik ©   (2008-09-09 14:51) [48]

еще кстати, создавать параметры не нужно (по умолчанию ParamCheck true), только инициализировать. созданием ты добавишь новых а значения будут браться из старых... т.е. не исправив этот глюк, перенос ничего не поменяет.


 
Ega23 ©   (2008-09-09 14:55) [49]


> Вот код. Специально для тупых.


Ашот, ты реально неправ. В коде - косяк на косяке.

1. Если стоит DataSet.paramCheck = True то
 1.1. Если на момент задания коннекшена он (коннекшн) подключенный (Connected=True) то блок инициализация первого параметра нафиг не нужна.
 1.2. Если коннект не подключен, либо ParamCheck=False, то надо инициализировать.

2. В любом случае, инициализацию параметров надо делать ПОСЛЕ задавания CommandText.

З.Ы. Я бы на твоем месте извинился.


 
kaif ©   (2008-09-09 14:58) [50]

А вот решение проблемы. Если бы  sniknik © вместо того чтобы упрекать меня во вранье сам не врал о том, будто он знает, зачем устанавливать значение Direction рантайм, то вопрос был бы исчерпан еще вчера.

var
 DirectionNames: array [0..4] of string = ("pdUnknown", "pdInput", "pdOutput", "pdInputOutput", "pdReturnValue");

procedure TSimpleReferenceForm.Button1Click(Sender: TObject);
var
 P: TParameter;
begin
 with TADOCommand.Create(nil) do
 try
   Connection := MainData.Connection;

   P := Parameters.AddParameter;
   P.DataType := ftString;
   P.Direction := pdInput;
   P.Name := "NAME";

   P := Parameters.AddParameter;
   P.DataType := ftInteger;
   P.Direction := pdOutput;
   P.Name := "ID";

   CommandText :=
      "INSERT INTO GOODS(GOOD_NAME) VALUES (:NAME)"#13#10+
      "SELECT :ID = SCOPE_IDENTITY()";

   Parameters.ParamByName("NAME").Value := "Дядя Вася 7";

   ShowMessage(DirectionNames[ord(Parameters.ParamByName("ID").Direction)]);

   Parameters.ParamByName("ID").Direction := pdOutput; //принудительная установка еще раз

   Execute;

   ShowMessage(DirectionNames[ord(Parameters.ParamByName("ID").Direction)]);

   if Parameters.FindParam("ID") = nil then
     ShowMessage("Параметр не найден")
   else if Parameters.ParamByName("ID").Value = Null then
     ShowMessage("Параметр вернул значение NULL. sniknik © зря упорствует в своей неправоте")
   else
     ShowMessage(Format("Значение выходного параметра ID = %s"#13+
                        "sniknik © был бы прав, если бы сказал, что коллекция Parameters ADO кривая"#13+
                        "и работает не так, как разработчик от нее ожидает,"#13+
                        "то есть параметры меняют свое Direction после парсинга текста запроса"#13+
                        "и их Direction нужно ЕЩЕ РАЗ пересустанавливать ОБЯЗАТЕЛЬНО ПОСЛЕ присвоения"#13+
                        "текста свойству CommandText, а не так как это обычно принято у нормальных людей.",
                        [IntToStr(Parameters.ParamByName("ID").Value)]));
 finally
   Free;
 end;
end;


То есть свойства Direction параметров в коллекции Parameters, редактируемые дизайн-тайм в компонентах ADO Delphi являются никому не нужной бутафорией, призванной лишь сбить с толку разработчика.


 
sniknik ©   (2008-09-09 14:59) [51]

блин, еще одно, сравнение с нил > Value = Null не совсем верно (а в базах/запросах так совсем неверно), для проверок есть свойство isNull.

кстати а почему > Value := "Дядя Вася"; ты вносишь правильно, после? а не при создании. видать чегото подозревал? ;)


 
kaif ©   (2008-09-09 15:01) [52]

2 Ega23 ©   (09.09.08 14:55) [49]

Я готов принести свои извинения, если господин извинится передо мной за то, что многократно обвинил меня во вранье.
Я нигде ни разу не врал.
Мне это совершенно ни к чему.


 
sniknik ©   (2008-09-09 15:02) [53]

> А вот решение проблемы.
поверь ЭТО не решение.

> то вопрос был бы исчерпан еще вчера.
если бы ты вчера привел этот код "для тупых"...

> //принудительная установка еще раз
это не еще раз, это единственная которая нужна...


 
kaif ©   (2008-09-09 15:05) [54]

sniknik ©   (09.09.08 14:59) [51]
блин, еще одно, сравнение с нил > Value = Null не совсем верно (а в базах/запросах так совсем неверно), для проверок есть свойство isNull.

кстати а почему > Value := "Дядя Вася"; ты вносишь правильно, после? а не при создании. видать чегото подозревал? ;)


Подозрительность твоя не знает границ. Я вношу параметр NAME после просто потому что я всегда сначала присваиваю текст, а потом задаю значения параметров. У меня такая привычка. А вот привычки думать, что свойства, определенные в дизайнере меняются на ходу без того чтобы об этом было предупреждение в документации у меня нет.
Я же не предполагаю, например, что после выполнения метода Execute мне нужно еще раз, например, CommandText вписывать.

А откуда я знаю?

Может он очистился сдуру. Команда ведь "ушла на сервер".
От этих ADO я уже чего угодно могу ожидать...


 
kaif ©   (2008-09-09 15:06) [55]

sniknik ©   (09.09.08 15:02) [53]
> А вот решение проблемы.
поверь ЭТО не решение.


Что ты имеешь в виду?


 
sniknik ©   (2008-09-09 15:13) [56]

> Что ты имеешь в виду?
procedure TSimpleReferenceForm.Button1Click(Sender: TObject);
begin
with TADOCommand.Create(nil) do
try
  Connection := MainData.Connection;
  CommandText :=
     "INSERT INTO GOODS(GOOD_NAME) VALUES (:NAME)"#13#10+
     "SELECT :ID = SCOPE_IDENTITY()";

  Parameters.ParamByName("NAME").Value := "Дядя Вася 7";
  Parameters.ParamByName("ID").Direction := pdOutput;
  Execute;

  ShowMessage(Parameters.ParamByName("ID").Value);
finally
  Free;
end;
end;

вот решение, в выделенной строке, все остальное только запутывание себя же (меня уже не удастся...).


 
kaif ©   (2008-09-09 15:13) [57]

sniknik ©   (09.09.08 14:59) [51]
блин, еще одно, сравнение с нил > Value = Null не совсем верно (а в базах/запросах так совсем неверно), для проверок есть свойство isNull.


Ты невнимательно смотришь. Сравнение с nil у меня при поиске параметра методом FindParam. Имеется в виду пустой указатель. А сравнение с Null у меня в другом месте. Там я просто сравниваю две переменные типа Variant. И такое сравнение корректно. Хотя IsNull красивее, разумеется.

А в базах данных NULL никакого отношения к этому вообще не имеет. Просто в Delphi тип данных NULL (неопределенное значение в базе данных) в выходной параметр помещается как типа Variant со значением Null. Больше ничего.


 
MsGuns ©   (2008-09-09 15:15) [58]

>kaif ©   (09.09.08 14:31) [44]

В глубоко научный спор не вмешиваюсь, а только спрошу - зачем, Ашот, ты упорно пытаешься закатить солнце вручную, т.е. пишешь код по созданию и инициализации параметров, ведь это требуется только в исключительных случаях и то, если ParamCheck := false, что, ИМХО, бывает нужным лишь в исключительных случаях ?
И еще вопрос - зачем эти спецсимволы в строке запроса ?

По поводу TADOQuery позволю себе не согласиться с авторитетами - вполне удобный компонент, в частности по простоте анализа RowsAffected. Что же касается глюка SQL.Add (есть такая кака), то вполне лечится SQL.Text := ..

У меня также не возникает проблем с использованием ADO и даже более того, - считаю эту оболочку самой удобной из всех, которыми пользовался при работе с БД

Что же касается транзакций в MSSQL скажу только, что внятного описания самого механизма так и не нашел, хотя искал во вмногих толстых книжках. Все, что вычитал - это приоритет внешних транзакций перед внутренними. И рекомендации использовать явное управление транзакциями в триггерах только в крайних случаях и будучи достаточно уверенным в их необходимости и корректности. По сравнению с ИБ транзакции в МССКЛ "несколько" запутаннее.

И еще, чисто из собственного опыта - старт транзакции и ее завершение на клиенте не рекомендуется вкладывать в текст запроса - лучше это делать, используя TADOConnection.BeginTrans/CommitTrans|RollbackTrans - во-первых "прозрачнее" с т.з. кода, во-вторых в МсСкл нет понятия "транзакция" как самостоятельная величина (как в ИБ) и все они интерпретируются сервером применительно к соединению в целом - поэтому чтобы не запутаться в "ручных" транзакциях (в смысле где внешняя, а где внутренняя), лучше разруливать их в контексте не запроса, а всего соединения в целом.
Что касается бизнес-логики, то там несколько другой принцип, но "база" ессно та же.


 
kaif ©   (2008-09-09 15:17) [59]

sniknik ©   (09.09.08 15:13) [56]

По-твоему я не вижу, в чем разница между тем текстом и этим текстом? Если уж я написал их оба, я наверно знал, что делаю.

Хотя ты сейчас опять скажешь, что я вру.
Похоже ты всерьез думаешь, что все вокруг одни сплошные идиоты, кроме тебя.


 
sniknik ©   (2008-09-09 15:20) [60]

> без того чтобы об этом было предупреждение в документации у меня нет.
вот именно поэтому я думал, что ты не читал документации, раз не знаеш об этом "предупреждении".

> И еще вопрос - зачем эти спецсимволы в строке запроса ?
нормально. если создавать например процедуру то после ее можно будет наблюдать в инспекторе в удобочитаемом виде.
в остальных случаях, когда этого не нужно, просто стиль.


 
sniknik ©   (2008-09-09 15:22) [61]

> я наверно знал, что делаю.
да? и просвети зачем ты это делаешь? создание параметров до запроса имею ввиду.


 
MsGuns ©   (2008-09-09 15:25) [62]

>sniknik ©   (09.09.08 15:20) [60]
>в остальных случаях, когда этого не нужно, просто стиль.

хреновый стиль


 
sniknik ©   (2008-09-09 15:25) [63]

> Хотя ты сейчас опять скажешь, что я вру.
а то. в чем то обязательно, вот например сейчас когда ты "все" знаеш объясни причем тут транзакция которая якобы помогла тебе вернуть параметр в [12].


 
sniknik ©   (2008-09-09 15:27) [64]

> хреновый стиль
ну, в дельфи в отличие от с "\n" нету ;(.


 
Anatoly Podgoretsky ©   (2008-09-09 15:30) [65]

> sniknik  (09.09.2008 14:42:45)  [45]

Речь и полях и о параметрах. В данный момент я не могу сказать про что именно, я просто помню, что тип ранее был Integer (RW) а потом стал AutoInc (RO) как мне и надо.
TParameter.DataType = ftAutoInc
И это не ADO, а ADO.VCL, точнее DB.PAS
Использовать просто
WHERE ID =:id
Вот у :id тип ftAutoInc, ранее Integer
Пример в теме DataType, список типов в теме TFieldType type, он общий и для полей и для параметров.
Параметр должен быть того же типа, что и поле или совместимого.
Если же ftAutoInc меня не особо и волновал, то преобразование ftWideString в ftFixedChar поскольку это уже приводило к полной неработоспособности программы.
При это сначала они исправили только поля, а потом и параметры, но для этого им потребовалось более 4 лет.


 
kaif ©   (2008-09-09 15:31) [66]

MsGuns ©   (09.09.08 15:15) [58]
>kaif ©   (09.09.08 14:31) [44]

В глубоко научный спор не вмешиваюсь, а только спрошу - зачем, Ашот, ты упорно пытаешься закатить солнце вручную, т.е. пишешь код по созданию и инициализации параметров, ведь это требуется только в исключительных случаях и то, если ParamCheck := false, что, ИМХО, бывает нужным лишь в исключительных случаях ?
И еще вопрос - зачем эти спецсимволы в строке запроса ?


В том-то и проблема.
Вот взгляни на этот код.
Здесь я вообще ничего явно не задаю. Надеюсь на ParamCheck.
Получаю фигню.

procedure TSimpleReferenceForm.Button1Click(Sender: TObject);
begin
 with TADOCommand.Create(nil) do
 try
   Connection := MainData.Connection;
   ParamCheck:= TRue;

   CommandText :=
      "INSERT INTO GOODS(GOOD_NAME) VALUES (:NAME)"#13#10+
      "SELECT :ID = SCOPE_IDENTITY()";

   Parameters.ParamByName("NAME").Value := "Дядя Вася 8";
   Execute;
   if Parameters.ParamByName("ID").Value = Null then
     ShowMessage(Format("Значение выходного параметра Null]))
   else
     ShowMessage(Format("Значение выходного параметра ID = %s",
       [IntToStr(Parameters.ParamByName("ID").Value)]));
 finally
   Free;
 end;
end;


Если я обрамлю команды явными стартом и коммитом транзакции, выходной параметр получит нормальное значение.

Почему обрамление транзакцией заставляет ADO работать так, как видится мне, а без этого обрамления я оказываюсь НЕПРАВ, а мой оппонент прав, говоря, что я зря в дизайн-тайме что-то указывал?

Вот пусть мой оппонент мне внятно объяснит этот момент.

А не придирается все время к тому, что я весь текст приевл или не весь текст привел. А потом сам же, как только я указываю весь текст, выделяет в этом тексте одну строку (о которой можно и словми сказать) и говорит, что весь текст нафиг никому не нужен.

Мне надоел этот стиль беседы.

У меня много работы и нет желания здесь опять с кем-то собачиться только потому что у того с культурой проблемы.
За обвинения во вранье человек так и не извинился. Ну и я извиняться не собираюсь за свои обвинения в том, что он дурно воспитан.

MsGuns ©   (09.09.08 15:15) [58]
>kaif ©   (09.09.08 14:31) [44]
И еще, чисто из собственного опыта - старт транзакции и ее завершение на клиенте не рекомендуется вкладывать в текст запроса - лучше это делать, используя TADOConnection.BeginTrans/CommitTrans|RollbackTrans - во-первых "прозрачнее" с т.з. кода, во-вторых в МсСкл нет понятия "транзакция" как самостоятельная величина (как в ИБ) и все они интерпретируются сервером применительно к соединению в целом - поэтому чтобы не запутаться в "ручных" транзакциях (в смысле где внешняя, а где внутренняя), лучше разруливать их в контексте не запроса, а всего соединения в целом.


За эту рекомендацию я очень тебе благодарен. Всегда хорошо услышать что-то дельное. Особенно человеку без опыта.


 
Ega23 ©   (2008-09-09 15:32) [67]

2 kaif:

Ашот, я тебе порекомендую не писать клиента с подключенным в дизайн-тайм коннекшеном. Многое тогда станет понятным.


 
kaif ©   (2008-09-09 15:34) [68]

sniknik ©   (09.09.08 15:20) [60]
> без того чтобы об этом было предупреждение в документации у меня нет.
вот именно поэтому я думал, что ты не читал документации, раз не знаеш об этом "предупреждении".


Приведи текст из Help по ADO Delphi, где об этом сказано. Если ты не врун, конечно.


 
app ©   (2008-09-09 15:40) [69]

Будете переругиваться - закрою тему.


 
kaif ©   (2008-09-09 15:40) [70]

sniknik ©   (09.09.08 15:25) [63]
> Хотя ты сейчас опять скажешь, что я вру.
а то. в чем то обязательно, вот например сейчас когда ты "все" знаеш объясни причем тут транзакция которая якобы помогла тебе вернуть параметр в [12].


Не якобы, а помогла.
Почему - не знаю.
И хочу как раз это обсудить.
Со вчерашнего дня, между прочим. Вместо этого вынужден доказывать тебе, что я не лжец. Надоело.

Ega23 ©   (09.09.08 15:32) [67]
2 kaif:

Ашот, я тебе порекомендую не писать клиента с подключенным в дизайн-тайм коннекшеном. Многое тогда станет понятным.


А я так и не делаю.

Я вообще не понимаю, о чем здесь спор идет.


 
MsGuns ©   (2008-09-09 15:47) [71]

[67]

+100
Я просто забыл отметить эту весьма существенную деталь

И еще вдовесок:
а) Тексты запросов лучше располагать в тексте константами. Если проект является очередным в серии приложений с одной и той же БД, стОит задуматься об унификации кода, вынеся все запросы в отдельный библиотечный модуль.
б) не следует "класть" много компонент - на форме (ДМ) должны быть только те, которые используется при дизайне решеток и не меняются в ран-тайме. Все "одноразовые" запросы на выборки-вставки-изменения-удаления строятся на динамически создаваемых и затем прибиваемых объектах
в) старайся максимально использовать возможности ADO, предоставляемые на клиенте (TCustomADODataSet) - это может существенно упростить логику и разгрузить сервер при поисках, сортировках, фильтрациях и т.д.
г) в особо критичных ситуациях "гридного" редактирования не ленись использовать TClientDataSet со всеми его вкусностями (в т.ч. "тонкой" технологией управления кэшированием-отсылкой изменений) - ADO в сеточной режиме ведет себя иногда весьма капризно (особенно в конкурентных соединениях)


 
sniknik ©   (2008-09-09 15:49) [72]

> говоря, что я зря в дизайн-тайме что-то указывал?
было бы не зря, если бы ты там указывал все начиная с запроса. а раз уж ты переприсваиваеш запрос (переинициализируеш) то ... и не говори только, что в других компонентах это не так, в BDE например (не знаю BDE. ... ну почти.)

> Не якобы, а помогла.
> Почему - не знаю.
а ведь я объяснял... но видимо у тебя на меня игнор.


 
Ega23 ©   (2008-09-09 15:49) [73]


> ADO в сеточной режиме ведет себя иногда весьма капризно
> (особенно в конкурентных соединениях)


Нормально оно себя ведёт, LockType надо правильно выставлять...


 
MsGuns ©   (2008-09-09 15:49) [74]

По поводу кода в [66]
Ты внимательно почитал разницу между @@identity vs Scope_identity ?


 
MsGuns ©   (2008-09-09 15:52) [75]

>Нормально оно себя ведёт, LockType надо правильно выставлять...

Причем тут тип блокировки - речь идет о невозможности явного управления порциями изменений (репликами) - когда надо писать не по одной записи, а несколькими логически связанными.


 
sniknik ©   (2008-09-09 15:52) [76]

> Вот пусть мой оппонент мне внятно объяснит этот момент.
обьяснить как подозреваю ничего, никому нельзя... только если сам поймет.

для проверки, приведи запрос с транзакцией к виду "для тупых", в изначальном виде (без задания типа после), и проверь.


 
kaif ©   (2008-09-09 15:54) [77]

Вместо таких фраз:

sniknik ©   (08.09.08 23:42) [13]
> Однако все равно не работает.
в коде нет указания типа параметра, а говоришь что он pdOutput.
как знал, что врешь.


нужно было сказать так:

Ашот, учти, что после рантайм присвоения свойству CommandText нового значения, несмотря на свойство ParamCheck=True, ADO (в случае с MSSQL как минимум) теряет Direction параметров (присвоенные до того) и их следует после такого присвоения еще раз устанавливать ручками принудительно. Это баг ADO. Тебе не повезло, что ты сразу на него наткнулся, пытаясь сделать первое в своей жизни редактирование справочника сервера MSSQL при помощи компонентов ADO.

Это был бы правильный ответ. И я никто бы не мучился и не обижался.

Кстати, я тебе признателен за идею использовать TADOCommand.


 
sniknik ©   (2008-09-09 15:54) [78]

> Причем тут тип блокировки - речь идет о невозможности явного управления порциями изменений (репликами) -
> когда надо писать не по одной записи, а несколькими логически связанными.
ltBatchOptimistic?


 
sniknik ©   (2008-09-09 15:58) [79]

> Это баг ADO.
это НЕ баг ADO, это стандартное поведение, имхо, для многих компонент (ParamCheck в BDE по крайней мере видел, чего зря оно там чтоли? зачем переключатель если нечего переключать?)


 
Ega23 ©   (2008-09-09 16:00) [80]


> Причем тут тип блокировки - речь идет о невозможности явного
> управления порциями изменений (репликами) - когда надо писать
> не по одной записи, а несколькими логически связанными.


Locktype:=ltBatchOptimistic, вроде так пишется.



Страницы: 1 2 3 вся ветка

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

Наверх




Память: 0.67 MB
Время: 0.009 c
2-1238593247
mnj
2009-04-01 17:40
2009.05.17
рисование компонент


2-1238854644
denissoft
2009-04-04 18:17
2009.05.17
Драйвера формата sys


15-1236846757
Select
2009-03-12 11:32
2009.05.17
UML-диаграммы


3-1220614740
KirillRepin
2008-09-05 15:39
2009.05.17
Картинка в MSSQL


2-1238655986
bobwild
2009-04-02 11:06
2009.05.17
Импорт записей в главную и подчиненную таблицы из файла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский