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

Вниз

delphi 10 + ADOQuery.Parameters = параметр не найден   Найти похожие ветки 

 
Vladimir3466   (2010-09-18 01:03) [0]

всем привет
народ подскажите в чом может быть проблема в 9 дельфе
привиденный ниже код работает , а в 10 делфе во время выполнения выдает ошибку : не найден параметр  :a1.
в качестве сервера access

ADOConnection.LoginPrompt := False;
ADOConnection.ConnectionString := connectstr;

try
   ADOQuery.SQL.Clear;
   ADOQuery.Parameters.Clear;
   ADOQuery.Close;

    ADOQuery.SQL.text:="UPDATE [MAIN] SET [PROVERKA]= ""PR"",   [CP]= ""PR"" WHERE [NOMER]= :a1";
      ADOQuery.Parameters.ParseSQL(ADOQuery.SQL.text, true);
     ADOQuery.Parameters.ParamValues["a1"]:=s;  //s: string
    ADOQuery.ExecSQL;

finally
 ADOQuery.Parameters.Clear;
 ADOQuery.SQL.Clear;
 ADOQuery.Close;
 ADOConnection.Close;
end;


 
sniknik ©   (2010-09-18 09:24) [1]

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

убери все лишнее. и используй ParamByName, он привычнее как то.


 
Ega23 ©   (2010-09-18 11:00) [2]


> народ подскажите в чом может быть проблема в 9 дельфе


Проблема в программисте.

with ADOCommand do
begin
 CommandText := "UPDATE [MAIN] SET [PROVERKA]= ""PR"",   [CP]= ""PR"" WHERE [NOMER]= :a1";
 Parameters.ParamByName("a1").AsInteger := 10;
 try
   Execute;
 except on E: Exception do
   begin

   end;
 end;
end;


 
Vladimir3466   (2010-09-18 21:00) [3]

изначально использовалось именно
//   ADOQuery.Parameters.ParamByName("a1").DataType := ftstring;
//  ADOQuery.Parameters.ParamByName("a1").Value:=s;

но ошибка таже не найден параметр a1

щас попробую вариант от ega23



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

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

Наверх




Память: 0.44 MB
Время: 0.065 c
2-1340259923
vasa777
2012-06-21 10:25
2013.03.22
компилятор


15-1346013002
Юрий
2012-08-27 00:30
2013.03.22
С днем рождения ! 27 августа 2012 понедельник


15-1352709195
Аббат Пиккола
2012-11-12 12:33
2013.03.22
За демократию


15-1339078612
Artem
2012-06-07 18:16
2013.03.22
Посоветуйте электронные шахматы...


15-1335609759
Тут иногда бываю
2012-04-28 14:42
2013.03.22
Как точно располагать Gui в редакторе?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский