AS
колстек? вот ещё матюк неизвестный
И этот человек жалуется на программистов без отладчика...
Size: a a a
2020 March 04
AS
Андрей Подопригора
Я немного пропустил и может не понимаю суть. Но для вставки строки в базу есть команда Insert. Если надо помочь - пишите.
👌😄
АП
quUpdate.SQL.Clear;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
АП
Пусть горят в аду программисты которые апдейтят через RequestLife или CachedUpdares основные таблицы.
Дt
Андрей Подопригора
quUpdate.SQL.Clear;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
контрол+шифт+мGB
Кто бы говорил! 😁
я к тому, что ты цитируешь Боба Мартина ;)
KB
И этот человек жалуется на программистов без отладчика...
сарказм жеж :)
N
Андрей Подопригора
quUpdate.SQL.Clear;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
quUpdate.SQL.Add('insert into USERDATES (ID, DATEDOC) values (:P_ID, :P_DATEDOC)');
quUpdate.ParamByName('P_ID').AsInteger := Users.UserID;
quUpdate.ParamByName('P_DATEDOC').AsDateTime := dServer;
quUpdate.ExecSQL;
Не смущает тот момент, что отвечаешь на решённый вопрос? 😉
АП
Не смущает тот момент, что отвечаешь на решённый вопрос? 😉
Нет, не смущает. Смущает плодить бесполезные сообщения. ;)
AS
Андрей Подопригора
Нет, не смущает. Смущает плодить бесполезные сообщения. ;)
Думаешь, твоё было полезным после трёх таких же до него и решения проблемы?
AZ
Не смущает тот момент, что отвечаешь на решённый вопрос? 😉
никогда не мог понять зачем сначала делают clear а потом add, чем просто SQL.text не устраивает
АП
Думаешь, твоё было полезным после трёх таких же до него и решения проблемы?
Да. Ко мне в личку обратился человек после моего поста и я ему помог. Нужны пруфы?
АП
никогда не мог понять зачем сначала делают clear а потом add, чем просто SQL.text не устраивает
Потому что иногда sql.text выглядит как 10 строчек. И связывать это ' + ' выглядит так себе. Плюс можно пропустить пробелы и каждый др***чит как хочет. Такой ответ пойдёт?
I
а можно просто вписать текст запроса в свойство компонента
один компонент — один запрос
один компонент — один запрос
АП
У меня такое ощущение, что тут не помогают, а пытаются докопаться и высказать своё "фи"
АП
А ещё лучше реализовать все на сервере, а не на клиенте..
АП
Есть множество способов как выполнить ту или иную задачу. Я предложил свой способ. Не подходит, ну и ладно. Пусть автор проблемы на это ответит..
AZ
не всякий сервер это позволяет
N
Андрей Подопригора
У меня такое ощущение, что тут не помогают, а пытаются докопаться и высказать своё "фи"
А у меня впечатления, что ты любишь заходить на форумы и отвечать на вопросы из 2002 года 😉
АП
А у меня впечатления, что ты любишь заходить на форумы и отвечать на вопросы из 2002 года 😉
Ошибочное впечатление. ;)