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...
Código:
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