return xml

[Poppy]

The following function is used in my webservice which
returns a dataset.
I now need to return the dataset as xml and have no idea
how to do it.
Can anyone help ?
Thanks in Advance

Private Function GetDataSetXML(ByVal strSQL As String) As
dataset
'1. Create a connection
Dim connString As String
connString
= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
& "C:\blobdata\data.mdb" & ";"
Dim myConnection As New OleDbConnection(connString)
'2. Create the command object, passing in the SQL
string
Dim myCommand As New OleDbCommand(strSQL,
myConnection)
myConnection.Open()
'3. Create the DataAdapter
Dim myDataAdapter As New OleDbDataAdapter()
myDataAdapter.SelectCommand = myCommand
'4. Populate the DataSet and close the connection
Dim myDataSet As New DataSet()
myDataAdapter.Fill(myDataSet)
myConnection.Close()
'Return the DataSet
Return myDataset
End Function

[Jan Tielens]

Every response of a webservice is in XML...

Can you be a little more specific what your requirements for that xml are?

--
Greetz,
Jan
________________________
Read my weblog: [url]http://weblogs.asp.net/jan[/url]

"Poppy" <paul.diamond@NOSPAMthemedialounge.com> schreef in bericht
news:uBYht9RKEHA.1340@TK2MSFTNGP12.phx.gbl...

> The following function is used in my webservice which
> returns a dataset.
> I now need to return the dataset as xml and have no idea
> how to do it.
> Can anyone help ?
> Thanks in Advance
>
>

>  Private Function GetDataSetXML(ByVal strSQL As String) As
> dataset
>         '1. Create a connection
>         Dim connString As String
>         connString
> = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> & "C:\blobdata\data.mdb" & ";"
>         Dim myConnection As New OleDbConnection(connString)
>         '2. Create the command object, passing in the SQL
> string
>         Dim myCommand As New OleDbCommand(strSQL,
> myConnection)
>         myConnection.Open()
>         '3. Create the DataAdapter
>         Dim myDataAdapter As New OleDbDataAdapter()
>         myDataAdapter.SelectCommand = myCommand
>         '4. Populate the DataSet and close the connection
>         Dim myDataSet As New DataSet()
>         myDataAdapter.Fill(myDataSet)
>         myConnection.Close()
>         'Return the DataSet
>         Return myDataset
>     End Function
>

>
>

[Scott M.]

Have you looked at the various methods of a DataSet that express its
contents as XML (writeXML, getXML)?


"Poppy" <paul.diamond@NOSPAMthemedialounge.com> wrote in message
news:uBYht9RKEHA.1340@TK2MSFTNGP12.phx.gbl...

> The following function is used in my webservice which
> returns a dataset.
> I now need to return the dataset as xml and have no idea
> how to do it.
> Can anyone help ?
> Thanks in Advance
>
>

>  Private Function GetDataSetXML(ByVal strSQL As String) As
> dataset
>         '1. Create a connection
>         Dim connString As String
>         connString
> = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> & "C:\blobdata\data.mdb" & ";"
>         Dim myConnection As New OleDbConnection(connString)
>         '2. Create the command object, passing in the SQL
> string
>         Dim myCommand As New OleDbCommand(strSQL,
> myConnection)
>         myConnection.Open()
>         '3. Create the DataAdapter
>         Dim myDataAdapter As New OleDbDataAdapter()
>         myDataAdapter.SelectCommand = myCommand
>         '4. Populate the DataSet and close the connection
>         Dim myDataSet As New DataSet()
>         myDataAdapter.Fill(myDataSet)
>         myConnection.Close()
>         'Return the DataSet
>         Return myDataset
>     End Function
>

>
>

[Dino Chiesa [Microsoft]]

maybe you mean an untyped XML string?

Private Function GetDatasetAsXmlString(...) as String
return myDataSet.getXML()
End Function

"Scott M." <s-mar@BADSPAMsnet.net> wrote in message
news:eRGJaZVKEHA.2776@TK2MSFTNGP12.phx.gbl...

> Have you looked at the various methods of a DataSet that express its
> contents as XML (writeXML, getXML)?
>
>
> "Poppy" <paul.diamond@NOSPAMthemedialounge.com> wrote in message
> news:uBYht9RKEHA.1340@TK2MSFTNGP12.phx.gbl...

> > The following function is used in my webservice which
> > returns a dataset.
> > I now need to return the dataset as xml and have no idea
> > how to do it.
> > Can anyone help ?
> > Thanks in Advance
> >
> >

> >  Private Function GetDataSetXML(ByVal strSQL As String) As
> > dataset
> >         '1. Create a connection
> >         Dim connString As String
> >         connString
> > = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> > & "C:\blobdata\data.mdb" & ";"
> >         Dim myConnection As New OleDbConnection(connString)
> >         '2. Create the command object, passing in the SQL
> > string
> >         Dim myCommand As New OleDbCommand(strSQL,
> > myConnection)
> >         myConnection.Open()
> >         '3. Create the DataAdapter
> >         Dim myDataAdapter As New OleDbDataAdapter()
> >         myDataAdapter.SelectCommand = myCommand
> >         '4. Populate the DataSet and close the connection
> >         Dim myDataSet As New DataSet()
> >         myDataAdapter.Fill(myDataSet)
> >         myConnection.Close()
> >         'Return the DataSet
> >         Return myDataset
> >     End Function
> >

> >
> >

>
>