0 / 0 / 0
Регистрация: 12.02.2018
Сообщений: 56
MySQL

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

19.03.2019, 16:46. Показов 1643. Ответов 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
6851 / 4677 / 1465
Регистрация: 14.04.2014
Сообщений: 20,674
Записей в блоге: 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
6851 / 4677 / 1465
Регистрация: 14.04.2014
Сообщений: 20,674
Записей в блоге: 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
6851 / 4677 / 1465
Регистрация: 14.04.2014
Сообщений: 20,674
Записей в блоге: 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 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru