Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.50/8: Рейтинг темы: голосов - 8, средняя оценка - 4.50
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
MS Access

Дописать если не найдено

25.03.2017, 21:49. Показов 2023. Ответов 28
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Записываю в бд так:

Delphi
1
2
3
4
5
6
ADOQuery1.Insert;
ADOQuery1.FieldByName('ID').AsString := '1547';
ADOQuery1.FieldByName('PLAYER').AsString := 'GAMER';
ADOQuery1.FieldByName('IP').AsString := '255.255.255.255';
ADOQuery1.FieldByName('LASTPLAY').AsString := '08.01.2016 09:15:32';
ADOQuery1.Post;
Нужно что бы, если в строке PLAYER уже записано слово GAMER, то не записывать его, а если нет слова GAMER то дописать его к тому тексту которое уже есть в ячейка PLAYER через запятую.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.03.2017, 21:49
Ответы с готовыми решениями:

Ошибка если ничего не найдено в поиске
В кейсе выполняется поиск, поиск по всем полям в консольной программе учета книг, нужно чтоб если ничего не найдено, пользователь видел...

Выделение строки цветом если найдено значение
Добрый день! Прошу помочь с написанием макроса. Идея макроса следующая: если значение найдено (выделяется соответствующая ячейка) -...

Вывести сообщение, если не найдено ни одного совпадения
#include <iostream> #include <math.h> using namespace std; struct student { char fam; int godr, godp, os, progr,...

28
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
27.03.2017, 14:34  [ТС]
Студворк — интернет-сервис помощи студентам
Delphi
1
2
3
4
5
  Q := TAdoQuery.Create(nil);
Q.Connection := Form2.AdoConnection1;
Q.SQL.Text := 'UPDATE PLAYERS SET PLAYER=PLAYER + '' ,'+NickName+' WHERE PLAYER NOT LIKE ''%'+NickName+'%'' AND steamid=:steamid';
Q.Parameters.ParamByName('STEAMID').Value := STEAMID;
Q.ExecSQL;
Миниатюры
Дописать если не найдено  
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
27.03.2017, 14:38
Цитата Сообщение от Bookkc1 Посмотреть сообщение
Delphi
1
2
3
4
5
6
ADOQuery1.Insert;
ADOQuery1.FieldByName('ID').AsString := '1547';
ADOQuery1.FieldByName('PLAYER').AsString := 'GAMER';
ADOQuery1.FieldByName('IP').AsString := '255.255.255.255';
ADOQuery1.FieldByName('LASTPLAY').AsString := '08.01.2016 09:15:32';
ADOQuery1.Post;
я тоже не вижу здесь STEAMID. Или у вас так много таблиц, что вы уже и не помните где какие поля? А мы они и вовсе не знаем.
0
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
27.03.2017, 15:14  [ТС]
Поменялись, в место ID стала STEAMID
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
27.03.2017, 15:24
попробуй перед присвоением параметру значения выполнить Q.Prepare;

Добавлено через 52 секунды
или параметр по индексу вызвать, он все равно один
0
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
27.03.2017, 15:34  [ТС]
[Error] Unit1.pas(206): Undeclared identifier: 'Prepare'
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
27.03.2017, 15:40
ну чуть иначе Q.Prepared := true;
0
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
27.03.2017, 15:53  [ТС]
Не-а. ошибка та же... STEAMID not found
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
27.03.2017, 16:00
тогда проект в архив, и - сюда. Телепатические возможности сегодня слабы
0
3 / 3 / 0
Регистрация: 01.11.2012
Сообщений: 803
27.03.2017, 19:41  [ТС]
Попробую сделать SQL запрос в одну строку...

Добавлено через 43 минуты
программу скинуть не могу. т.к. нужно писать этот кусок с нуля...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.03.2017, 19:41

Regex - действия программы, если совпадений не найдено
Осуществляю поиск по html коду: string text1 = "Сокращенное наименование:"; var ShortName = str.IndexOf(text1); ...

Поиск и удаление строк если искомое не найдено
Добрый вечер. Требуется помощь специалиста т.к. я сам не способен разобраться с этим в виду малого опыта. Проблема в следующем, есть...

Остановка работы макроса, если не найдено значение
Здравствуйте все! Вот такой есть вопрос: есть макрос, находящий определенное значение (в данном случае "closed") и удаляющий...

Удалить всю строку, если в ней найдено определенное слово
Добрый день! Есть два слова "Microsoft" и "Apple". Есть файл , в котором имеются строки: Средство обновления данных часового...

Как искать слово в TextBox и если оно найдено, то выделять его
Всем привет! Начал программировать на Visual Basic 2010 express и у меня появилось несколько вопросов: Вопрос раз: Как искать слово в...


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

Или воспользуйтесь поиском по форуму:
29
Ответ Создать тему
Новые блоги и статьи
сукцессия 33. открытые вопросы от клауде
anaschu 19.07.2026
"Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .
32 сукцессия
anaschu 19.07.2026
сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .
сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических
anaschu 18.07.2026
Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .
сукцессия 30. Массив проверяющих друг друга моделей
anaschu 18.07.2026
Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .
Грибы - это женщины, деревья - это мужчины. Анти инь янь для союза мужчины и женщины.
anaschu 18.07.2026
ГЛАВНЫЙ НАУЧНО-ФИЛОСОФСКИЙ ВЫВОД: Сексуально-Репродуктивный Капитализм против Государства Моногамии Коллеги, мы вышли на финишную прямую 20-мерного ОДУ-моделирования вековой сукцессии (ветка. . .
Текстовый слайдер с нумерацией страниц и кроссбраузерность.
russiannick 18.07.2026
Один мой друг написал текстовый слайдер с нумерацией страниц. Сегодня я расскажу как он умудрился подружить его с кроссбраузерностью. Очевидно сложно угодить с шириной каждому браузеру. Один крадет. . .
Грибы - это мемы, дерево - это человек. Применение микоризной модели к теории меметики Докинза.
anaschu 18.07.2026
Меметический изоморфизм теории «всего»: Грибная сукцессия как модель эволюции идей Докинза Базовый код системы ОДУ микоризной сукцессии описывает не просто биологию, а универсальную. . .
Грибы - это корпорации, деревья - это государства. Механизм массонского захвата власти
anaschu 18.07.2026
Макроэкономический изоморфизм теории «всего»: Грибная сукцессия как модель транснационального капитализма Базовый код системы ОДУ микоризной сукцессии описывает не просто биологию, а. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru