problemas para agregar mas de un registro

[gabynuñez]

Hola a todos::

Estoy trabajando con delphi 7, mysql, zeos...

mi duda es la siguiente no puedo ni agregar ni modificar mas de un registro al agregar un registro estoy usando insert y para modificar update..

Osea si ingreso o modifico un registro y deseo ingresar o modificar otro me aparece un error "can not open resulset". tengo que salir de la aplicacion y luego realizar la operacion...

begin
ZQrynvo.sql.clear;
ZQrynvo.Sql.Text := 'INSERT INTO especialidad (cod_especialidad,des_especialidad,nro_orden,nota) VALUES ("'+codigo_esp.Text+'",'+'"'+descripcion_esp.Text+'",'+'"'+orden.Text+'",'+'"'+nota.Text+'")';
ZQrynvo.execsql;

ZQrynvo.sql.clear;
ZQrynvo.Sql.Text := 'INSERT INTO concepto (cod_especialidad,des_concepto,monto,fecha) VALUES ("'+codigo_esp.Text+'",'+'"'+descripcion_con.Text+'",'+'"'+costo.Text+'",:fecha)';
ZQrynvo.ParamByName('fecha').AsDate := StrToDate(FormatDateTime('dd/mm/yyyy',Now));
ZQrynvo.execsql;

ShowMessage('LOS DATOS GRABADOS SATISFACTORIAMENTE!!');
if MessageDlg('AGREGARA OTRO REGISTRO ?????', mtConfirmation, [mbYes, mbNo], 0) = mrYes
then
codigo_esp.Clear;
]

gracias