Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/sql/74.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Sql 如何在vb.net中从数据库创建XML文件_Sql_Xml_Vb.net - Fatal编程技术网

Sql 如何在vb.net中从数据库创建XML文件

Sql 如何在vb.net中从数据库创建XML文件,sql,xml,vb.net,Sql,Xml,Vb.net,如何使用vb.net从数据库创建XML文件 在我尝试时,我只创建了根元素,没有从数据库中获取任何数据,我的代码是: <% @Import Namespace="System" %> <% @Import Namespace="System.Data" %> <% @Import Namespace="System.xml" %> <% @Import Namespace="System.Data.SqlClient" %> <Script

如何使用vb.net从数据库创建XML文件 在我尝试时,我只创建了根元素,没有从数据库中获取任何数据,我的代码是:

<% @Import Namespace="System" %>
<% @Import Namespace="System.Data" %>
<% @Import Namespace="System.xml" %>
<% @Import Namespace="System.Data.SqlClient" %>

<Script runat="server">
Sub Page_Load

Dim connectionString As String
Dim connection As SqlConnection
Dim adapter As SqlDataAdapter
Dim ds  As New DataSet
Dim sql As String

connectionString =// my connection string///
connection = New SqlConnection(connectionString) 


sql = "select * from jb_jobs where city='Los Angeles' "
connection.Open()
adapter = New SqlDataAdapter(sql, connection)
adapter.Fill(ds)
connection.Close()
If IO.File.Exists("product.xml") = False Then
Dim settings As New XmlWriterSettings()
settings.Indent = True
Dim XmlWrt As XmlWriter = XmlWriter.Create("c:/xmlfiles/product.xml", settings)
XmlWrt.WriteStartDocument()
XmlWrt.WriteComment("XML Database.")
XmlWrt.WriteStartElement("source")
XmlWrt.WriteStartElement("jobs")



XmlWrt.WriteEndElement()
XmlWrt.WriteEndDocument()
XmlWrt.Close()
End If
End Sub
</script>

子页面加载
Dim connectionString作为字符串
Dim连接作为SqlConnection
Dim适配器作为SqlDataAdapter
Dim ds作为新数据集
将sql设置为字符串
connectionString=//我的连接字符串///
连接=新的SqlConnection(connectionString)
sql=“从城市=”洛杉矶“的jb_工作中选择*
connection.Open()
适配器=新的SqlDataAdapter(sql,连接)
适配器填充(ds)
连接。关闭()
如果IO.File.Exists(“product.xml”)=False,则
作为新XmlWriterSettings()的Dim设置
settings.Indent=True
Dim XmlWrt作为XmlWriter=XmlWriter.Create(“c:/xmlfiles/product.xml”,设置)
XmlWrt.WriteStartDocument()
WriteComment(“XML数据库”)
XmlWrt.WriteStarteElement(“源”)
XmlWrt.WriteStarteElement(“作业”)
XmlWrt.WriteEndElement()
XmlWrt.WriteEndDocument()
XmlWrt.Close()
如果结束
端接头
我得到的输出只是一个XML文件,它是用上面描述的根元素创建的,而不是数据库中的数据


如何从数据库中获取数据并形成XML文件?

尝试使用WriteXml方法,如下所示:

Private Sub WriteXmlToFile(thisDataSet As DataSet)
 If thisDataSet Is Nothing Then 
     Return 
 End If  

' Create a file name to write to. 
 Dim filename As String = "XmlDoc.xml" 

 ' Create the FileStream to write with. 
 Dim stream As New System.IO.FileStream _
    (filename, System.IO.FileMode.Create)

 ' Write to the file with the WriteXml method.
 thisDataSet.WriteXml(stream)
End Sub

您可以在MSDN上找到有关和的更多信息。

因此您应该询问“从数据库检索数据”的问题

如何更改SQL语句:

SQL=
select*from jb_jobs where city='Los Angeles'

SQL=
从像“洛杉矶”这样的城市的jb_工作中选择*String
->String


SQL=
select*from jb_jobs where city=CityID
->Integer

我在创建XML文件时没有遇到任何问题,但问题在于从数据库检索值并将其保存到XML文件