Como gerar um webservice em delphi que retorne um dataset?

Delphi

28/09/2009

Caros,

Como gerar um webservice em delphi 2009 que retorne um dataset?
E que este Webservice possa ser consumido por uma página escrita em PHP?

Vou explicar o que eu fiz. (que deve estar errado.)

Criei uma nova aplicação: <<File>> <<New>> <<Other>> <<WebService>> <<SOAP Server Application>>

No WebModule minha conexão com o banco utilizando DBX(SQLConnection e SQLDataSet)

E criei o código abaixo.

function TWSCorporativo.CentroCustoB () : TSQLConnection;
begin
  WebModule1.SQLDataSet1.Open;
  Result := WebModule1.SQLConnection1;
  WebModule1.SQLDataSet1.Close;
  WebModule1.SQLConnection1.Connected := False;
end;



Fico no aguardo de um help.
Obrigado.


Emej77

Emej77

Curtidas 0

Respostas

Afarias

Afarias

28/09/2009

diversas formas. 1 delas, retornar um xml


T+


GOSTEI 0
Emej77

Emej77

28/09/2009

Afarias, obrigado por responder.
Uma idéia muito boa, mas como fazer, poderia me dar um exemplo básico?
Obrigado

diversas formas. 1 delas, retornar um xml T+



GOSTEI 0
Afarias

Afarias

28/09/2009

Um exemplo de como exportar um DataSet para XML pode ser visto aqui:

http://www.scalabium.com/faq/dct0079.htm


Vc pode fazer (o XML) mais simples ou mais ´complicado´ dependendo do q deseja (ex: uso de protocolos/formatações padrão como DOM ou SOAP).

Ou ainda optar por fornecer os dados em uma estrutura simples como CSV ou usando uma opção ao XML como JSON


T+


GOSTEI 0
POSTAR