Estou iniciando desenvolvimento de páginas ASP com DLL's elaboradas em Delphi 5.
Consiguo retornar dados para a pagina com o seguinte código
procedure TMetodos.Consulta(var Tabela, Id, Id_vlr: WideString);
var sSQL :String;
begin
sSQL := 'SELECT * FROM '+Tabela;
if (Id <> '') and (Id_vlr <> '') then
sSQL := sSQL+ ' WHERE '+Id+' = '+Id_vlr;
FDM.qryCuston.Close;
FDM.qryCuston.SQL.Clear;
FDM.qryCuston.SQL.Text := sSQL;
if not FDM.qryCuston.Prepared then
FDM.qryCuston.Prepare;
FDM.qryCuston.Open;
if not FDM.qryCuston.IsEmpty then
Response.Write(FDM.dtsListaSimples.Content);
end;
uso o componente TDataSetTableProcedure, porém isso retorna uma tabela com os dados em html, preciso retornar um "Recordset" para fazer loop com os registros no ASP.
Pergunta
jacsonsoares
Olá Pessoal!
Estou iniciando desenvolvimento de páginas ASP com DLL's elaboradas em Delphi 5.
Consiguo retornar dados para a pagina com o seguinte código
uso o componente TDataSetTableProcedure, porém isso retorna uma tabela com os dados em html, preciso retornar um "Recordset" para fazer loop com os registros no ASP.
Alguém sabe como fazer?
Agradeço desde já a qualquer ajuda.
Att, Jacson Soares.
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados