扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
作者:洪万福 来源:微软社区 2007年11月9日
关键字:
Dim newDS As New System.Data.DataSet() Dim nsStr()As string newDS.InferXmlSchema("dataOnly.xml",nsStr)) Me.daCategories.Fill(newDS.Tables("Categories")) Me.daProducts.Fill(newDS.Tables(Products")) newDS.Relations.Add("CategoriesProducts", _ newDS.Tables("Categories").Columns("CategoryID"), _ newDS.Tables("Products").Columns("CategoryID")) |
Me.dsMaster1.WriteXmlSchema("testSchema.xsd") Messagebox.Show("Finished","WriteXmlSchema") |
Me.daCategories.Fill(Me.dsMaster1.Categories) Me.daProducts.Fill(Me.dsMaster1.Products) Me.dsMaster1.WriteXml("newData.xml", XmlWriteMode.IgnoreSchema) MessageBox.Show("Finished", “WriteXml") |
Me.daCategories.Fill(Me.dsMaster1.Categories) Me.daProducts.Fill(Me.dsMaster1.Products) Me.dsMaster1.Relations("CategoriesProducts").Nested = True Me.dsMaster1.WriteXml("nestedData.xml",XmlWriteMode.IgnoreSchema) MessageBox.Show("Finished","WriteXml Nested") |
Me.daCategories.Fill(Me.dsMaster1.Categories) with Me.dsMaster1.Categories .Columns("CategoryID").ColumnMapping = MappingType.Attribute .Columns("CategoryName").ColumnMapping = MappingType.Attribute .Columns("dESCRIPTION").ColumnMapping = MappingType.Attribute End with Me.dsMaster1.WriteXml("attributes.xml", XmlWriteMode.IgnoreSchme) MessageBox.Show("Finished", "Write Attributes") |
myXDD = New XmlDataDocument(myDS) |
myXdd = New XmlDataDocument() myDS = myXDD.DataSet |
Dim mySDD As System.Xml.XmlDataDocument myXDD = New System.Xml.XmlDataDocument(Me.dsMaster1) myXDD.Load ("dataOnly.xml") SetBindings(Me.dsMaster1) |
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者