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

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

19.03.2019, 16:46. Показов 1537. Ответов 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
6847 / 4674 / 1463
Регистрация: 14.04.2014
Сообщений: 20,656
Записей в блоге: 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
6847 / 4674 / 1463
Регистрация: 14.04.2014
Сообщений: 20,656
Записей в блоге: 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
6847 / 4674 / 1463
Регистрация: 14.04.2014
Сообщений: 20,656
Записей в блоге: 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
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru