проблема с запросом ADOQuery

[Stilet]

Ни как не хочет работать нормально база,

Криворуких программистов компоненты не спасут.
"Никак не хочет" это значит ты что-то не так написал или спроектировал.
Для работы с акцессом компонент ADOQuery самое оно, а если у тебя что-то не работает выкладывай ошибки.

[Kolya29]

Сообщение от Stilet

Криворуких программистов компоненты не спасут.
"Никак не хочет" это значит ты что-то не так написал или спроектировал.
Для работы с акцессом компонент ADOQuery самое оно, а если у тебя что-то не работает выкладывай ошибки.

я пока только учусь так что извиняюсь если что не так

Сейчас немного разобрался как сделать чтобы корректно выводились данные, но для этого для каждой таблицы в делфи надо добавлять ADOQuery и DataSource. Так и надо делать?

[Stilet]

ну вообще-то не обязательно.
для каждого "набора" данных да. Но не для каждой таблицы.
Обычно хватает одного-двух ADOQuery на все про все...
Ты для начала просто с одним поработай.
Потом научись запросы на SQL писать, и думаю тогда тебе хватит одного такого компонента на форме

P.S. я лично одним обхожусь...

[vovk]

Сейчас немного разобрался как сделать чтобы корректно выводились данные, но для этого для каждой таблицы в делфи надо добавлять ADOQuery и DataSource. Так и надо делать?

Если за раз нужно отображать только 1 набор данных, то хватит
1 ADOQuery и 1 DataSource и всё. С помощью запросов можно и отображаь данные из разных таблиц, и менять/добавлять данные в любой таблице, и создавать новые таблициы, и менять состав полей таблиц, итд итп


//опоздал уже всё

[Kolya29]

Задача у меня такая, на форме есть штук 15 DBLookupComboBox и в каждом надо отобразить список значений из таблиц справочников. И с одним ADOQuery и DataSource у меня не получалось. Т.к временем очень ограничен буду делать кучу ADOQuery и DataSource.

[Kolya29]

Практически со всеми функциями разобрался, скоро на чистовую буду делать. Кому интересно можете посмотреть что получается и можно ли было в данном случае обойтись одним ADOQuery и DataSource?

[Nurlan77]

Доброго времени суток!
У меня аналогичный вопрос...на счет кавычек

база - ms access

запрос:
Q := 'UPDATE [SIMS] SET ' +
'[SIMS].[DOG]="' + Edit1.Text + '", ' +
'WHERE [SIMS].[SIM]="' + ComboBox6.Text + '"';

Как вы заметили данные ставлю из Edit1. Если в Edit1 вписать типа:
- произвольный "текст с кавычками" (в этом случае не даже не добавляет "Insert")
- произвольный 'текст с апострофами' (добавит, но уже не удалит "DELETE" и не изменит "UPDATE")
- произвольный ''текст с парными апострофами''(добавит, но уже не удалит "DELETE" и не изменит "UPDATE")
- произвольный ""текст с парными кавычками""(добавит, но уже не удалит "DELETE" и не изменит "UPDATE")

не сработает - это естественно, в связи с кавычками в самом запросе

в мускуле это решалось так \" или так \'
долго искал, но решения в ms access не нашел...
пришлось временно запретить ввод кавычки и апострофа

как быть?

p.s. Кстати ошибка при любом запросе не только UPDATE

[vovk]

Если написать

'[SIMS].[DOG]= ' + QuotedStr(Edit1.Text) +

то у меня нормально проходят любые данные,
а лучше просто использовать параметпы

'[SIMS].[DOG]= :dog_'
......
......
 ADOQuery1.Parameters.ParamByName('dds').Value:= Edit1.Text;

значение только желательно преобразовать к нужному виду, к примеру если поле DOG Integer, то

ADOQuery1.Parameters.ParamByName('dds').Value:= Strtoint(Edit1.Text);

[Nurlan77]

to vovk

Увы QuotedStr не добавит такую запись [sdfksfksdj"kjkjsdf'ds] а такую запись qqq он запишет как 'qqq' - что тоже не есть хорошо, при чем потом ее не удалить и не изменить...

'[SIMS].[DOG]= :dog_' - поясните пожалуйста это

......
......
 ADOQuery1.Parameters.ParamByName('dds').Value:= Edit1.Text; - и 'dds' тоже ?

+ еще вопрос...а как быть при необходимости заменить значение в большом количестве записей?

[vovk]

прекрастно добавляютмся любые записи, QuotedStr только ставит апострафы и всё.

'[SIMS].[ DOG]= : dog_' - поясните пожалуйста это

......
......
ADOQuery1.Parameters.ParamByName('d ds').Value:= Edit1.Text; - и 'dds' тоже ?

тут неправильно, поторопился...

'[SIMS].[DOG]= :dog_' просто параметр в тексте запроса.
.....
 ADOQuery1.Parameters.ParamByName('dog_').Value:= Edit1.Text; просто ошибка тут тоже должно быть dog_

Скажите какие компоненты используете для доступа к базе.
И желательно покажите кусок кода в котором чтото не получается

+ еще вопрос...а как быть при необходимости заменить значение в большом количестве записей?

в Where указывайте условие под которое подходять эти записи