[FlyAway]

Столкнулся с такой проблемой , что ADOQuery обязан возвращать какие-либо значения. Можно ли как-то обойтись без этого ?

Код:

DataModule2.qry1.sql.Add (
  'INSERT INTO sotrud ( ФИО, Стаж, Должность, Зарплата ) VALUES ('''+
    Form6.edt1.text+' '+Form6.edt2.text+' '+Form6.edt3.text+     //поле 1
  ''', '+
    Form6.edt4.text+                                   // поле 2
  ', '''+
    Form6.edt5.text+                                  // поле 3
  ''' ,'+
    Form6.edt6.text+                                 // поле 4
  ');');
DataModule2.qry1.Open;

Вылетает ошибка , как на вложенной картинке...

[Assistant]

для запросов вида INSERT, DELETE, UPDATE используйте TADOCommand:

Код:

ADOCommand1.CommandText := 'тут запрос';
ADOCommand1.Execute;

или уж если не хотите использовать TADOCommand, делайте не Open, а ExecSQL в DataModule2.qry1

[stil]

Код:

qry1.ExecSQL;

это если вставка, удаление, обновление.

[FlyAway]

Спасибо , люди добрые )

Ещё столкнулся с такой вот проблемой - добавляет нормально , но не могу сделать refresh.
Вот сам код :

Код:

with DataModule2.qry1
   do
   begin
   Close;
   Parameters.ParamByName('fio').value:=(Form6.edt1.text+' '+Form6.edt2.text+' '+Form6.edt3.text);
   Parameters.ParamByName('staj').value:=StrToInt(Form6.medt1.text);
   Parameters.ParamByName('post').value:=Form6.edt5.text;
   Parameters.ParamByName('zp').value:=StrToInt(Form6.medt2.text);
   SQL.Clear;
   SQL.add ('INSERT INTO sotrud ( ФИО, Стаж, Должность, Зарплата ) VALUES (:fio, :staj, :post, :zp );');
   ExecSQL;
   end;
DataModule2.dbgrd2.refresh; //эта процедура не работает
ShowMessage('Сотрудник добавлен!');
Form6.Close;

Также при первом нажатии кнопки добавить с введёнными мною данными в эдиты всё проходит хорошо , а при повторном в таблицу (.mdb) добавляется строка со счётчиком , но без данных.

[Assistant]

Код:

DataModule2.qry1.Refresh;

перед

Код:

DataModule2.dbgrd2.refresh;

[FlyAway]

А вот так... =\
Добавляет , но как только должен быть рефреш для qry1 - вот что происходит (на картинке..)