Wie wir alle wissen, fügt Microsoft jedem Knoten des vom Datensatz bereitgestellten WebServices ein Schema hinzu, sodass es nicht mit j2ee und Flash kompatibel ist. Daher habe ich eine Möglichkeit gefunden, sie in normales XML zu konvertieren. Der Code lautet wie folgt:
Methode 1:
Öffentliche Klasse DataSetToXML: Erbt System.Web.UI.Page
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Behandelt MyBase.Load
Dimmen Sie objConn als SqlConnection
Dim strSql As String
strSql = „SELECT TOP 10 * FROM Customers“
objConn = New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
Dim sdaCust As New SqlDataAdapter(strSql, objConn)
Dim dstCust As New DataSet()
sdaCust.Fill(dstCust, "Customers")
'Daten in XML-Datei und Schemadatei speichern
dstCust.WriteXML(Server.MapPath("Customers.xml"),XmlWriteMode.IgnoreSchema)
dstCust.WriteXMLSchema(Server.MapPath("Customers.xsd"))
End Sub
Diese Methode dient zum Schreiben einer XML-Datei
Methode zwei:
<WebMethod(Description:="All Classroom List")> _
Öffentliche Funktion ListAllRooms() als XmlDocument.
Versuchen Sie es
m_CpCourseArrange.FillRoomId(m_DsCourseArrange)
'Leser als neuen MemoryStream abdunkeln
Dokument als neues Xml-Dokument dimmen
doc.LoadXml(m_DsCourseArrange.GetXml.ToString)
Geben Sie doc
Catch ex als Protocols.SoapException
zurück
SoapExceptionE.RaiseException auslösen("ListAllRooms", " http://tempuri.org/CourseArrange ", ex.Message, "4000", ex.Source, SoapExceptionE.FaultCode.Server)
Beenden Sie den Versuch
Funktion beenden
GetXML – Gibt die XML-Darstellung der im DataSet (MSDN) gespeicherten Daten zurück.
Private Shared Sub DemonstrateGetXml()
' Erstellen Sie ein DataSet mit einer Tabelle, die zwei Spalten und 10 Zeilen enthält.
Dim ds As DataSet = New DataSet("myDataSet")
Dim t As DataTable = ds.Tables.Add("Items")
t.Columns.Add("id", Type.GetType("System.Int32"))
t.Columns.Add("Item", Type.GetType("System.String"))
' Zehn Zeilen hinzufügen.
Dim r As DataRow
Dim i als Ganzzahl
Für i = 0 bis 9
r = t.NewRow()
r("id") = i
r("Item")= "Item" & i
t.Rows.Add(r)
Weiter
: Den Inhalt des DataSets als XML anzeigen.
Console.WriteLine(ds.GetXml())
Sub beenden
Es scheint, dass Sie sich bei der zukünftigen Übergabe mit einem Datensatz keine Gedanken über die Konvertierung machen müssen.