"Rouven Hertenstein" wrote:

> Hi,
> the following (simple) vb.net-webservice works inherently very well. But I'm
> in need to get comma delimited xml and I don't know how to modify?!
>
> Could anyone help me, please.
>
> Regards,
> Rouven
>
> <WebMethod()> Public Function GetResultsAsAdoXML() As String
> Dim myAdoRs As ADODB.Recordset
> Dim myAdoConnection As New ADODB.Connection
> Dim mypersiststream As New ADODB.Stream
> Dim myConnectionString As String = "driver={SQL Server};
> Server=sql-server; Database=db; UID=sa; PW=;"
> Dim mySelect As String = "SELECT * from sql-view"
>
> myAdoConnection.ConnectionString = myConnectionString
> myAdoConnection.Open()
> myAdoRs = myAdoConnection.Execute(mySelect)
> myAdoRs.Save(mypersiststream, ADODB.PersistFormatEnum.adPersistXML)
> Return mypersiststream.ReadText
> myAdoConnection.Close()
>