sqlServer2000导出数据表到XML
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了sqlServer2000导出数据表到XML相关的知识,希望对你有一定的参考价值。
我在sqlServer2000建立了CivilServants数据库,里面有几张表。
想把其中answer表导出成XML数据库。
或者整个数据库一起导出成XML。
网上说的
EXEC master..xp_cmdshell 'BCP AdventureWorks.sales.answer format nul -f c:answer.fmt -x -c -T'不能用,报BCP:未知选项x
我用的VB.NET开发
Public Function WriteXml()
Dim MyXml As System.Xml.XmlDocument = New System.Xml.XmlDocument
Dim sb As StringBuilder = New StringBuilder()
Dim xn As XmlNode
Dim xn1 As XmlNode
Dim xn2 As XmlNode
Dim xn3 As XmlNode
Dim xn4 As XmlNode
Dim xn5 As XmlNode
Dim xn6 As XmlNode
Dim xn7 As XmlNode
Dim xn8 As XmlNode
Dim xn9 As XmlNode
sb.AppendLine("<?xml version=""1.0"" encoding=""UTF-8"" ?>")
sb.AppendLine("<虚拟订单>")
sb.AppendLine("</虚拟订单>")
MyXml.LoadXml(sb.ToString)
root = MyXml.SelectSingleNode("虚拟订单")
Try
Dim conn As connection = New connection
Dim com As SqlClient.SqlCommand = New SqlClient.SqlCommand("select * from SendData", conn.con)
conn.con.Open()
Dim dr As SqlClient.SqlDataReader = com.ExecuteReader
Dim i As Integer = 1
While dr.Read()
xn = MyXml.CreateElement("订单信息" & i)
xn1 = MyXml.CreateElement("客户编号")
xn1.InnerText = dr.GetString(0).Trim
xn2 = MyXml.CreateElement("公司名称")
xn2.InnerText = dr.GetString(1).Trim
xn3 = MyXml.CreateElement("数量")
xn3.InnerText = dr.GetString(2).Trim
xn4 = MyXml.CreateElement("送货方式")
xn4.InnerText = dr.GetString(3).Trim
xn5 = MyXml.CreateElement("城市")
xn5.InnerText = dr.GetString(4).Trim
xn6 = MyXml.CreateElement("地区")
xn6.InnerText = dr.GetString(5).Trim
xn7 = MyXml.CreateElement("邮政号码")
xn7.InnerText = dr.GetString(6).Trim
xn8 = MyXml.CreateElement("国家")
xn8.InnerText = dr.GetString(7).Trim
xn9 = MyXml.CreateElement("E_mail")
xn9.InnerText = dr.GetString(8).Trim
xn.AppendChild(xn1)
xn.AppendChild(xn2)
xn.AppendChild(xn3)
xn.AppendChild(xn4)
xn.AppendChild(xn5)
xn.AppendChild(xn6)
xn.AppendChild(xn7)
xn.AppendChild(xn8)
xn.AppendChild(xn9)
i = i + 1
root.AppendChild(xn)
End While
MessageBox.Show("发送成功,新数据单(e:\虚拟订单.xml)")
Catch ex As Exception
MessageBox.Show("读取数据错误!")
End Try
MyXml.Save("e:\虚拟订单.xml")
End Function
其中连接数据库我是自己封装的一个类。 参考技术A select * from TableName FOR XML AUTO,ELEMENTS
如何把SQLServer表数据导出CSV文件
参考技术A1、先到界面创建一个.txt文件,再把后缀名改为csv。则变成了一个csv文件。
2、打开SQLServer数据库。鼠标选中要导出数据的数据库,点击右键会弹出一个右键菜单。点击“任务”。
3、再点击“导出数据(x)”。
4、点击了“导出数据(x)”后会弹出一个界面,并填写好信息进行下一步。
5、弹出一个选择目标界面。
6、在目标中选中“平面文件目标”类型点击下一步。
7、在弹出的界面选中第一项。
8、选中要导出的表。
9、点击下一步。
10、等待执行成功。
11、打开csv文件,查看数据。
以上是关于sqlServer2000导出数据表到XML的主要内容,如果未能解决你的问题,请参考以下文章