Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.09.25;
Скачать: CL | DM;

Вниз

Access не воспринимает запрос   Найти похожие ветки 

 
Denis ©   (2005-08-10 10:54) [0]

Пытаюсь работать с базой Access 2000 с помощью компонентов ADO.
Попытка выполнить простейший запрос на вставку в таблицу из Delphi
вызывает ошибку "Неправильный синтаксис инструкции INSERT INTO",
но этот же запрос, выполненный в Access, нагло и молча добавляет запись в таблицу.
Думал, дело в счетчике, убрал его - та же петрушка.
Подскажите, в чем может быть дело.
Таблица из трех полей - числовое(уже не счетчик) и два текстовых.
Вот как выглядит запрос:
INSERT INTO [USER] (iduser,usname,phone)
values (1,"я","555")

Пытался еще так -
INSERT INTO [USER]
select 1 as iduser,"я" as usname, "555" as phone


 
ANB ©   (2005-08-10 12:14) [1]


> Denis ©   (10.08.05 10:54)
- в 17 строке ошибка.


 
Denis ©   (2005-08-10 12:21) [2]

Я в Memo вывожу текст запроса для проверки, потом копирую его без изменений в Access - и шуршит как миленький.
Ну вот как запрос формируется:
сразу скажу - Edit-ы гарантированно не пустые.

Tb:=TAdoQuery.Create(self);
Tb.Connection:=fmMain.Connection;
Tb.SQL.Add("SELECT USER.* FROM [USER] WHERE (((USER.USNAME)= "+#39+edUser.Text+#39+"))");
Tb.Open;
if not Tb.IsEmpty
then
MessageDlg("Пользователь с таким именем уже зарегестрирован!",mtWarning,[mbOk],0)
else
begin
Tb.Close;
Tb.SQL.Clear;
Tb.SQL.Add("select max(IDUSER) as IDUSER from [USER]");
Tb.Open;
Tb.FieldList.Update;
IDUS:=Tb.Fields[0].AsInteger+1;
Tb.Close;
Tb.SQL.Clear;
Tb.SQL.Add("INSERT INTO [USER] (iduser,usname,phone) ");
Tb.SQL.Add("values ("+IntTOStr(IDUS)+","+ #39+edUser.Text+#39+","+#39+edNew.Text+#39+")");
Memo1.Lines.assign(Tb.SQL);
Tb.ExecSQL;
MessageDlg("Новый пользователь успешно добавлен!",mtWarning,[mbOk],0);
Close;
end;
Tb.Free;


 
ANB ©   (2005-08-10 12:45) [3]

Порекомендовал бы вообще то параметры юзать, вместо строк в кавычках и чисел - констант.

А по сабжу - может провайдер не тот ? Я в них не особо разбираюсь, запости строку коннекта - ща мастера придут, разберут.

Кстати, возможна проблема в кавычках. Замени константы в запросе на параметры и поиграй с квадратными строками.


 
Paul_K ©   (2005-08-10 12:54) [4]

после
Memo1.Lines.assign(Tb.SQL);
напиши
showmessage(Tb.SQL.TEXT)
и посомотри что исполняешь



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

Текущий архив: 2005.09.25;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.039 c
14-1125844158
Saint-Virus
2005-09-04 18:29
2005.09.25
Про спутниковый интернет


1-1125333693
Ivanov
2005-08-29 20:41
2005.09.25
.rar с паролем


6-1117708206
DVYdm
2005-06-02 14:30
2005.09.25
Передача файла на сервер


2-1123677630
DimonNew
2005-08-10 16:40
2005.09.25
подстановочные поля


1-1125639191
bon
2005-09-02 09:33
2005.09.25
Чертёж Autocad на форме





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