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