Спасибо Дмитрий - работает.
Возник похожий вопрос. Как в select прикрутить календарь (дата > чем значение на DateTimePicker4)
Простой пример:
select *
from main
where otvet = (1)
and data > ('+FrmOth.DateTimePicker4.sqlValue+'???)
My Visual Database → Posts by Andrei
Спасибо Дмитрий - работает.
Возник похожий вопрос. Как в select прикрутить календарь (дата > чем значение на DateTimePicker4)
Простой пример:
select *
from main
where otvet = (1)
and data > ('+FrmOth.DateTimePicker4.sqlValue+'???)
Здравтвуйте.
Подскажите, как в столбец "otvet" снять значение CheckBox1 (галка ДА/НЕТ или 1/2)
Скрипт запускается при нажатии CheckBox1
SQLExecute('INSERT INTO main (id_login, id_vopr, data, otvet) VALUES (''' +IntToStr(iduser)+''', ''1'', now(), ''CheckBox1 ??????'')');
Разобрался
SQLExecute ('UPDATE main SET data = date now() WHERE id = 1');
Опять ошибка...
"You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'SQLExecute UPDATE main SET data = date(''NOW'') WHERE id = 1' at line 1 SQL.sql 1"
Ошибся
QLExecute('UPDATE main SET data = date(''now'') WHERE id = 1');
Здравствуйте.
Ошибка "Unknown column 'now' in 'field list'
http://screenshot.ru/upload/image/S1yF
запись текущей даты
SQLExecute('UPDATE main SET data = now WHERE id = 1');
Базу из примеров простых скриптов для новичков. Самое главное в данной базе - комментарии.
Пытаюсь сделать "опросник". На форме календаря нет и не будет. При переходе на другой вопрос (нажатие кнопки) в табличку для ответов необходимо записать ответ и дату ответа. Может быть нужно использовать оператор DateToStr(Now), хз...
Высылаю попытку проекта - опросник.
Здравствуйте.
Нужно нажатием кнопки "сохранить запись" сохранить текущую дату в таблицу.
Пожалуйста подскажите что делаю не так?...
Если есть рабочий скрипт - буду очень благодарен.
procedure Frm_Date_OnShow (Sender: string; Action: string);
var
getTime: string;
mon, day, year: word;
begin
DecodeDate (Date, year, mon, day);
getTime:= IntToStr(day)+'.'+IntToStr(mon)+'.'+IntToStr(year);
SQLExecute('update main set data = (getTime) WHERE id = (1)');
end;
Здравствуйте.
Заранее извиняюсь за возможно глупый вопрос, только недавно приобрел вашу ЧУДО-прогу.
Подскажите пожалуйста возможно ли создать в форме динамические TextBox-ы?
Есть табличка 'vopros' с двумя столбцами 1)'id_Vopr' и 2)'Vopr' (Текстовое поле).
Есть форма 'FrmVopr' в которую надо вывести все вопросы (построчно) из столбца 'Vopr' для последующего ответа ДА/НЕТ и сохранения в другую таблицу 'otv_Vopr'.
Ума хватило только на это (статика)... Это явно не правильно...
procedure FrmVopr_OnClick (Sender: string; Action: string); \\выполнение по кнопке переход к форме
FrmVopr.vopr.Text := SQLExecute ('SELECT vopros FROM vopr where (id = 1)');
end;
procedure FrmVopr1_OnShow (Sender: string; Action: string); \\выполнение по кнопке переход к след. вопросу
FrmVopr.vopr1.Text := SQLExecute ('SELECT vopros FROM vopr where (id = 2)');
end;
My Visual Database → Posts by Andrei
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi