教程中国
PHOTOSHOP CS9.0中文版 MAYA 8.5 FOR WINDOWS Corel Painter v9.0 Flash MX2004 中文版 Illustrator cs2 中文版
VC++6.0含sp6 中英文版 VB6.0 +sp6 简体中文版 Borland Delphi 7汉化版 MSDN for vb6.0中文版 Visual Studio 2005简体
教程中国下属 文件存储共享专家BIBIDU.COM 提供大型软件,教材,源码,电影,音乐,图书等下载 更多精品请点此进入
  您目前所在位置: 教程中国 >> .NET类 >> ASP.NET >> 转换DataSe t到普通xml的新法 RSS订阅
处理 SSI 文件时出错
转换DataSe t到普通xml的新法
处理 SSI 文件时出错
     大家知道,用dataset传递的WebService,微软会在各个节点加上schema,所以无法与j2ee,Flash兼容,所以我找到了一种转换他们变成普通XML的方法。代码如下:
  
  方法一:
  Public Class DataSetToXML : Inherits System.Web.UI.Page
  
   Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   Dim objConn As 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")
   'Save data to XML file and schema file
   dstCust.WriteXML(Server.MapPath("Customers.XML"),XMLWriteMode.IgnoreSchema)
   dstCust.WriteXMLSchema(Server.MapPath("Customers.xsd"))
   End Sub
  
  这种方法是写入一个XML文件
  
  
  方法二:
   <WebMethod(Description:="所有教室列表")> _
   Public Function ListAllRooms() As XMLDocument
  
   Try
   m_CpCourseArrange.FillRoomId(m_DsCourseArrange)
   'Dim reader As New MemoryStream
  
  
   Dim doc As New XMLDocument
   doc.LoadXML(m_DsCourseArrange.GetXML.ToString)
   Return doc
  
   Catch ex As Protocols.SoapException
   Throw SoapExceptionE.RaiseException("ListAllRooms", "http://tempuri.org/CourseArrange", ex.Message, "4000", ex.Source, SoapExceptionE.FaultCode.Server)
   End Try
   End Function
  
  
  GetXML--Returns the XML representation of the data stored in the DataSet. (MSDN)
  
  
  Private Shared Sub DemonstrateGetXML()
   ' Create a DataSet with one table containing two columns and 10 rows.
   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"))
  
   ' Add ten rows.
   Dim r As DataRow
   Dim i As Integer
   For i = 0 To 9
   r = t.NewRow()
   r("id") = i
   r("Item")= "Item" & i
   t.Rows.Add(r)
   Next
  
   ' Display the DataSet contents as XML.
   Console.WriteLine( ds.GetXML() )
  End Sub
  
  
  看来以后用dataset传递的时候也不用为它的转换发愁了。
  
    。



来源:upschool.com.cn
作者:
关键字:转换DataSe,t到普通xml,新法
发表日期:2006-12-20

处理 SSI 文件时出错

上一篇:通过ASP.net 程序创建域帐户故障   下一篇:用C#把文件转换为XML 2


本文的相类似文章
  • 转换DataSe t到普通xml的新法
  • 千万富翁“教子新法”
  • 美批准新法案 但筑“长城”难挡移民潮
  • 上海长征医院用新法再造全耳
  • 我国一些新法律法规开始实施
  • 初高中英语教学衔接新法
  • 中美科学家开发出长碳纳米管束制造新法
  • 最新法律法规与注册会计师有关内容[四]
  • 千万富翁“教子新法”
  • 最新法律法规中与注册会计师有关的内容
  • 网友评论 查看本文全部评论
    笔 名: *
    评 论:
    最多500字。当前字数:0
    联系方式:
    验证码:
    在学习中进步 在进步中成长 教程中国相随您的成长之路
    华腾联合科技股份有限公司版权所有
    广告联系:Rosibo@163.com