Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 12.02.2018
Сообщений: 56
MySQL

SQL запрос на добавление записи!

19.03.2019, 16:46. Показов 1621. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте дорогие формучане! Пытаюсь добавить запись в таблицу в БД mysql таким образом:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
procedure TAdminForm.newuserClick(Sender: TObject);
var s:string;
begin
if (status.ItemIndex=-1) or (newuserlogin.Text='') or (newuserpass.Text='') or (newuserbirthsday.Text='') or (newuseremail.Text='') or (newusername.Text='') or (newuserlastname.Text='') then
  MessageBox(Handle, 'Заполните все поля!', 'Ошибка!', MB_OK + MB_ICONERROR)
Else
  Begin
    if status.ItemIndex=0 then
      s:='user';
    if status.ItemIndex=1 then
      s:='teacher';
    if status.ItemIndex=2 then
      s:='admin';
    MainForm.FDQuery.SQL.Text:=
      'INSERT INTO users (login, password ,name, last_name, status, email, birthday)'
      + ' VALUES (' + newuserlogin.Text + ', ' + newuserpass.Text + ', ' + newusername.Text + ', ' + newuserlastname.Text + ', ' + s + ', ' + newuseremail.Text + ', :p)';
      MainForm.FDQuery.Params.ParamByName('p').AsInteger := StrToInt(newusername.Text);
    MainForm.FDQuery.Open();
  End;
end;
Но выдаёт ошибку, скрин прилагается! Прошу помогите!
Миниатюры
SQL запрос на добавление записи!   SQL запрос на добавление записи!  
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.03.2019, 16:46
Ответы с готовыми решениями:

Delphi XE4 SQL запрос. Добавление записи в последнюю позицию DBGrid
Еще раз всем привет! Возникла вот такая загогулина. Есть поле Edit, в котором есть данные. Эти данные надо перенести в таблицу. Но не...

SQL. Добавление в таблицу записи
Подскажите пожалуйста. У меня есть программа что-то типа "интернет магазина" мне нужно при покупки товара что б название и цена товара...

Добавление записи и SQL-запросов
Есть программа(клиент-сервер), а к ней подключена Aсccess база с помощью ClientDataSet, DataSource, SoccetConnection подскожите пожалуйста...

6
 Аватар для krapotkin
6849 / 4676 / 1464
Регистрация: 14.04.2014
Сообщений: 20,672
Записей в блоге: 21
19.03.2019, 17:08
самый простой совет он общий
остановите программу перед выполнением запроса
и посмотрите в отладчике, что содержится в
MainForm.FDQuery.SQL.Text
и сразу будет видно в чем проблема.
строковые значения должны обрамляться апострофами
а вообще мне непонятно, зачем замешивать два подхода
у вас же один параметр, он есть. почему остальные значения не передавать параметрами??
0
0 / 0 / 0
Регистрация: 12.02.2018
Сообщений: 56
19.03.2019, 17:27  [ТС]
Цитата Сообщение от krapotkin Посмотреть сообщение
самый простой совет он общий
остановите программу перед выполнением запроса
и посмотрите в отладчике, что содержится в
MainForm.FDQuery.SQL.Text
и сразу будет видно в чем проблема.
Ошибок там нет.
0
0 / 0 / 0
Регистрация: 12.02.2018
Сообщений: 56
19.03.2019, 17:30  [ТС]
Вот скрин
Миниатюры
SQL запрос на добавление записи!  
0
 Аватар для krapotkin
6849 / 4676 / 1464
Регистрация: 14.04.2014
Сообщений: 20,672
Записей в блоге: 21
19.03.2019, 17:31
Цитата Сообщение от Kirhanter Посмотреть сообщение
Ошибок там нет.
и первый пост тоже не ваш. там написано что ошибки есть
и скрин - подделка...

а остальные строки моего поста вы и вовсе проигнорили...
0
231 / 163 / 54
Регистрация: 26.10.2014
Сообщений: 928
19.03.2019, 18:16
может слово user для mysql является ключевым? для acces точно так и есть, за mysql не замечал такого, но все же попробуйте использовать что нибудь типа usr
0
 Аватар для krapotkin
6849 / 4676 / 1464
Регистрация: 14.04.2014
Сообщений: 20,672
Записей в блоге: 21
19.03.2019, 20:52
дайте я погромче крикну, чувствую, связь не очень

Цитата Сообщение от krapotkin Посмотреть сообщение
строковые значения должны обрамляться апострофами
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.03.2019, 20:52
Помогаю со студенческими работами здесь

Добавление записи в существующий запрос
Есть запрос: SELECT Registr.Zaezd, Registr.Vyezd, Registr.KodRegistr, Sotrudn.Famil, Nomer.KodNomera, BronFam.SpisokFam,...

Добавление записи в таблицу SQL из Delphi
Необходимо добавлять новые данные в таблицу SQL из приложения Delphi. Во всех источниках схема добавления одна и та же. при запуске выдает...

SQL добавление записи из нескольких Edit
Доброго времени суток! Подскажите, пожалуйста, как добавить запись в таблицу с данными из нескольких Edit? Т.е. каждый Edit для своего...

SQL запрос на поиск записи
Всем доброго времени суток. У меня такой вопрос, каким болжен быть запрос чтобы найти запись в БД? без фильтрации... на подобии Locate.

Добавление записи в sql
Вот таким образом я добавляю запись в sql посредством RAD STUDIO СтудентADOQuery1->Active=0; СтудентADOQuery1->SQL->Clear(); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru