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

Выполнить SQL скрипт

02.02.2012, 16:05. Показов 5021. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Подключаюсь к базе через ADO (LCPI.IBProvider.3), FireBird

Подключаюсь так: Все нормально!
Delphi
1
2
3
4
5
6
Ini := TIniFile.Create(ExtractFilePath(Application.ExeName)+'opt.ini');
  db:=Ini.ReadString('conection','DataBse','');
  pass:=Ini.ReadString('conection','pass','');
  login:=Ini.ReadString('conection','login','');
  ADOConnection1.ConnectionString:='Provider=LCPI.IBProvider.3;Integrated Security=NONE;Password='+pass+';User ID='+login+';nested_trans=true;auto_commit = true;Location='+ExtractFilePath(Application.ExeName)+db;
  ADOConnection1.Connected:=true;
Событием OnClick выполняю это:

Delphi
1
2
3
4
ADOQuery1.close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.add(memo1.Text);
ADOQuery1.ExecSQL;
пытаюсь выполнить это:


SQL
1
2
UPDATE stat_card SET d_stat_card_id=29 WHERE id BETWEEN 164402 AND 164500
UPDATE stat_card_flat  SET period_id=7 WHERE stat_card_id BETWEEN 164402 AND 164500
Выдает Ошибку

Ошибка подготовки SQL Выражения.
Dynamiс SQL Error.
SQL error code = -104
Token unknown - line 2, char 1 update.

что за ошибка и как от нее избавиться!!???
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
02.02.2012, 16:05
Ответы с готовыми решениями:

Выполнить скрипт sql по нажатию кнопки
Здраствуйте. У меня имеется много скриптов sql примерно такого типа . Подскажите как сделать так, чтобы при нажатии кнопки в C# этот скрипт...

Как выполнить скрипт sql на MySQL?
В приложении подключаюсь к MySQL и использую TADOCommand, но вижу, что он может выполнять не более одной sql-инструкции за раз при помощи...

SQL Server 2000 как в файле sql строковую переменную выполнить как инструкцию
Добрый день! Подскажите пожалуйста, как строковую переменную выполнить как инструкцию, например: declare @str varchar(100) declare...

10
4217 / 3059 / 583
Регистрация: 21.01.2011
Сообщений: 13,203
02.02.2012, 16:19
Я не понял, ты пытаешься выполнить 2 SQL-предложения за один вызов? Обычно Query допускает только 1
1
0 / 0 / 0
Регистрация: 28.01.2012
Сообщений: 5
02.02.2012, 16:30  [ТС]
Цитата Сообщение от Grossmeister Посмотреть сообщение
Я не понял, ты пытаешься выполнить 2 SQL-предложения за один вызов? Обычно Query допускает только 1
Вот я тормознул!!
0
1497 / 1238 / 245
Регистрация: 04.04.2011
Сообщений: 4,363
02.02.2012, 17:16
TADOCommand - и хоть целую скл-программу
А про TADOQuery забудьте !
2
0 / 0 / 0
Регистрация: 28.01.2012
Сообщений: 5
02.02.2012, 19:15  [ТС]
Цитата Сообщение от MsGuns Посмотреть сообщение
TADOCommand - и хоть целую скл-программу
А про TADOQuery забудьте !
Спасибо!!
0
16 / 16 / 6
Регистрация: 31.01.2011
Сообщений: 178
01.03.2015, 22:54
а если через TADOQuery? хочу выполнить одну всего лишь строчку. код у меня выглядит так
Delphi
1
2
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE заказчики SET Организация = '+#39+Edit1.text+#39+' WHERE Организация LIKE '+#39+so+#39);
при выполнении выскакивает ошибка

подскажите, пожалуйста, в чём может быть проблема?
0
16 / 16 / 6
Регистрация: 31.01.2011
Сообщений: 178
01.03.2015, 22:58
причем значение меняется на новое
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,609
02.03.2015, 02:51
Цитата Сообщение от Sheeby Посмотреть сообщение
а если через TADOQuery? хочу выполнить одну всего лишь строчку. код у меня выглядит так
Приведи еще одну (или несколько) строчек своего кода, которые идут сразу после данного тобой.
0
16 / 16 / 6
Регистрация: 31.01.2011
Сообщений: 178
02.03.2015, 08:42
Delphi
1
ADOQuery1.Close;
<код выше>
Delphi
1
2
ADOQuery1.Open;
ADOQuery1.Active:=True;
Добавлено через 18 минут
выбивает при открытии или активации Query
0
пофигист широкого профиля
4769 / 3204 / 862
Регистрация: 15.07.2013
Сообщений: 18,609
02.03.2015, 09:35
Цитата Сообщение от Sheeby Посмотреть сообщение
ADOQuery1.Open;
ADOQuery1.Active:=True;
И то и другое нафиг. Для запросов модифицирующих данные в БД нужно вызывать метод ADOQuery1.ExecSQL
1
16 / 16 / 6
Регистрация: 31.01.2011
Сообщений: 178
02.03.2015, 09:43
работает. огромное спасибо!
всё из-за невнимательности. всего-то надо было взглянуть на первый пост
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
02.03.2015, 09:43
Помогаю со студенческими работами здесь

Выполнить скрипт из TextBox
На форме есть textBox и кнопка, можно ли сделать так, чтобы при нажатии кнопки выполнялся код написанный в textBox? Заранее спасибо.

Выполнить PHP скрипт
Здравствуйте! Как выполнить PHP скрипт с помощью C# ? Вот сам скрипт : &lt;?php /* * This script was writed by Setec...

выполнить скрипт .py по расписанию
всем привет на linux совсем недавно есть у меня скрипт питоновский. куда прописать его, чтобы он выполнялся каждый день в час...

Shutdown: Выполнить скрипт
Куда в реестр прописать имя файла скрипта (.bat, .exe, .vbs, .cmd) чтобы он выполнился при shutdown'e системы W2k ? ps: так в свое...

Выполнить скрипт SELECT
Всем привет, помогите выполнить , USE GO SELECT , ,max(if(day=1, text, '')) as day1 ,max(if(day=2, text,...


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

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
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-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru