Una ejecucion que devuelva múltiples resultados

[ecfisa]

Hola Mario94.

Código PHP:

...
{
  if (! Edit1->Text.IsEmpty()) {
    TADOQuery *q1 = static_cast<TADOQuery*>(ADOQuery1);
    TADOQuery *q2 = static_cast<TADOQuery*>(ADOQuery2);

    q1->Close();
    q1->SQL->Text = "SELECT MAX(IDGRUPOS) + 1 AS MAXIMO FROM GRUPOS";
    q1->Open();
    
    q2->Close();
    q2->SQL->Text = "INSERT INTO GRUPOS (COL_A_INSERTAR_1, COL_A_INSERTAR2) VALUES(:PAR1, :PAR2)"; //(*)
    q2->Parameters->ParamByName("PAR1")->Value = q1->FieldByName("MAXIMO")->Value;
    q2->Parameters->ParamByName("PAR2")->Value = Edit1->Text;
    q2->ExecSQL();

    q1->Close();
    q2->Close();
  }
  ...
} 


(*) COL_A_INSERTAR 1 y 2, son los nombres de columnas (campos) donde vas a insertar los datos.

Saludos