求一个把Access数据转换XML格式的程序，急啊

帮帮忙啊好用的400分都给你用MicrosoftVisualStudio2005就行，最好把代码给我... 帮帮忙啊好用的400分都给你
用 Microsoft Visual Studio 2005 就行，最好把代码给我展开

 我来答

2个回答

#热议# 在购买新能源车时，要注意哪些？

互联网体验师
2009-07-29 · 超过25用户采纳过TA的回答

知道答主

回答量：102

采纳率：0%

帮助的人：74.2万

我也去答题访问个人页

关注

展开全部

楼主也不多说一点信息，你到底是要一个软件呢还是要一段代码哦？你在VS下又是哪方面的哦，C#还是VB还是别的？

先给你说一些吧。

第一：SQLXML。
快速描述
SQLXML 将为 SQL Server 数据库提供 XML 支持。这样，开发人员就可以将 XML 与关宏乱系数据联系起来。您可以创建现有关系数据的 XML 视图，并可以像使用 XML 文件那样使用它。
概述
SQLXML 将为 SQL Server 数据库提供 XML 支持。这样，开发人员就可以将 XML 与关系数据联系起来。您可以创建现有关系数据的 XML 视图，并可以像使用 XML 文件那样使用它。SQLXML 使您可以：

使用 SQL Server 2000 构建 Web Services
构建网站以发布来自 SQL Server 的数据
使用 Xpath 查询关系数据库
像在 XML 文件中那样更新 XML 关系数李并据
将 XML 加载到 SQL Server
通过 URL、OLEDB/ADO 或 .NET 托管类查询 SQL Server

SP3 在 SP2 版本的基础上进行了一定的修改，包括：
删除了对 SOAP Toolkit 2.0 SP2 的依存关系

第二：C#代码。
这里用OleDB连接哈,写的是ASP.net的代码。
<%@ Page Language="C#" %>
<%@ import Namespace="System" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">
void Page_Load(object sender, EventArgs e) {
if (!IsPostBack) {
TextBox1.Text = "PROVIDER=SQLOLEDB; Data Source=.; Initial Catalog=pubs;User ID=sa;Password=;";
Label1.Text = "哪绝迹";
}
}
void CreateXml(object sender, EventArgs e) {
OleDbConnection dataConn = new OleDbConnection(TextBox1.Text);
Uri Path = Request.Url;
String ServerUrl = Path.ToString();
ServerUrl = ServerUrl.Substring(0,ServerUrl.LastIndexOf("/") +1 );
try {
Literal1.Text = "已经在你的相同目录下创建了一下文件：<br/>" ;
dataConn.Open();
DataTable schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,new object[] {null, null, null, "TABLE"});
for(int I = 0; I < schemaTable.Rows.Count; I++){
OleDbDataAdapter dbAdapter= new OleDbDataAdapter("select * from [" + schemaTable.Rows[I].ItemArray[2].ToString() + "]",dataConn);
DataSet tableData = new DataSet();
dbAdapter.Fill(tableData,schemaTable.Rows[I].ItemArray[2].ToString());
tableData.WriteXml(HttpContext.Current.Server.MapPath(schemaTable.Rows[I].ItemArray[2].ToString() + ".xml"));
Literal1.Text = Literal1.Text + "<a href='" + ServerUrl + schemaTable.Rows[I].ItemArray[2].ToString() + ".xml'>" + schemaTable.Rows[I].ItemArray[2].ToString() + ".xml</a><br/>";
}
}
catch(Exception ex) {
Label1.Text = ex.Message.ToString();
}
finally {
dataConn.Close();
}
}
</script>
<html>
<head>
<title>leDb2XML：数据库转换成XML文件例子</title>
</head>
<body bgcolor="#FFFFFF">
<center>
<h2><font face="宋体">OleDb2XML：数据库转换成XML文件例子</font>
</h2>
</center>
<form runat="server">
<font face="宋体">
<p align="center">请输入OleDb连接字符串，然后点“生成XML文件”按钮。</p>
<p align="center">
<asp:TextBox id="TextBox1" runat="server" Width="600"></asp:TextBox>
</p>
<p align="center">
<asp:Button id="Button1" onclick="CreateXml" runat="server" Text="生成XML文件"></asp:Button>
</p>
<p align="center">
<asp:Label id="Label1" runat="server" Font-Bold="True" ForeColor="Red"></asp:Label>
</p>
<p align="center">
<asp:Literal id="Literal1" runat="server"></asp:Literal>
</p>
</font>
</form>
</body>
</html>
第三：VB.net代码。
<%@ Page Language="VB" %>
<%@ import Namespace="System" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">

Sub Page_Load(sender As Object, e As EventArgs)
If Not IsPostBack Then
TextBox1.Text = "Provider=SqlOLEDB; Data Source=.; Initial Catalog=pubs;User ID=sa;Password=;"
Label1.Text = ""
End If
End Sub

Sub CreateXml(sender As Object, e As EventArgs)
Dim dataConn As New OleDbConnection(TextBox1.Text)
Dim Path As Uri = Request.Url
Dim ServerUrl As String = Path.ToString()
ServerUrl = ServerUrl.Substring(0,ServerUrl.LastIndexOf("/") + 1 )
Try
Literal1.Text = "已经在你的相同目录下创建了一下文件：<br/>"
dataConn.Open()
Dim schemaTable As DataTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, "TABLE"})
Dim I As Integer
For I = 0 To schemaTable.Rows.Count - 1
Dim dbAdapter As New OleDbDataAdapter("select * from [" + schemaTable.Rows(I).ItemArray(2).ToString() + "]", dataConn)
Dim tableData As New DataSet()
dbAdapter.Fill(tableData, schemaTable.Rows(I).ItemArray(2).ToString())
tableData.WriteXml(HttpContext.Current.Server.MapPath((schemaTable.Rows(I).ItemArray(2).ToString() + ".xml")))
Literal1.Text = Literal1.Text + "<a href='" + ServerUrl + schemaTable.Rows(I).ItemArray(2).ToString() + ".xml'>" + schemaTable.Rows(I).ItemArray(2).ToString() + ".xml</a><br/>"
Next I
Catch ex As Exception
Label1.Text = ex.Message.ToString()
Finally
dataConn.Close()
End Try
End Sub

</script>

<html>
<head>
<title>leDb2XML：数据库转换成XML文件例子</title>
</head>
<body bgcolor="#FFFFFF">
<center>
<h2><font face="宋体">OleDb2XML：数据库转换成XML文件例子</font>
</h2>
</center>
<form runat="server">
<font face="宋体">
<p align="center">请输入OleDb连接字符串，然后点“生成XML文件”按钮。</p>
<p align="center">
<asp:TextBox id="TextBox1" runat="server" Width="600"></asp:TextBox>
</p>
<p align="center">
<asp:Button id="Button1" onclick="CreateXml" runat="server" Text="生成XML文件"></asp:Button>
</p>
<p align="center">
<asp:Label id="Label1" runat="server" Font-Bold="True" ForeColor="Red"></asp:Label>
</p>
<p align="center">
<asp:Literal id="Literal1" runat="server"></asp:Literal>
</p>
</font>
</form>
</body>
</html>

第四：pS.
对于数据量大的数据库，处理可能会需要更多的时间，因此有可能需要更改machine.config文件中processModel的responseDeadlockInterval 属性，比如为5分钟，默认为3分钟。

<processModel
enable="true"
timeout="Infinite"
idleTimeout="Infinite"
shutdownTimeout="0:00:05"
requestLimit="Infinite"
requestQueueLimit="5000"
restartQueueLimit="10"
memoryLimit="60"
webGarden="false"
cpuMask="0xffffffff"
userName="machine"
password="AutoGenerate"
logLevel="Errors"
clientConnectedCheck="0:00:05"
comAuthenticationLevel="Connect"
comImpersonationLevel="Impersonate"
responseRestartDeadlockInterval="00:09:00"
responseDeadlockInterval="00:05:00" default is 00:03:00
maxWorkerThreads="25"
maxIoThreads="25" />

已赞过 已踩过<

评论收起

北京月之暗面科技有限公司

广告2024-12-01

Kimi 智能生成文档，让数学练习题创作更简单!

kimi.moonshot.cn

18356771
2009-07-30 · TA获得超过585个赞

知道小有建树答主

回答量：576

采纳率：100%

帮助的人：419万

我也去答题访问个人页

关注

展开全部

DataTable dt = new DataTable();
            using (OleDbConnection conn = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=cost.mdb;))
            {
                try
                {
                    OleDbCommand cmd = new OleDbCommand("select * from tableA", conn);
                    OleDbDataAdapter oda = new OleDbDataAdapter(cmd);
                    oda.Fill(dt);
                    cmd.Dispose();
                }
                catch (Exception e)
                {
                    conn.Close();
                    throw new Exception(e.Message);
                }
            }
            dt.WriteXml(@"C:\123.xml"); 
绝对正确   要给400分哦,要不然烂jj!


本回答被提问者采纳






已赞过已踩过<

你对这个回答的评价是？
评论收起

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

您可能关注的内容

超越access，网页数据库，网页excel

魔方网表，让文科妹子也能碾压程序员灵活实现复杂的企业应用，可随着业务快速灵活调整

www.mf999.com广告

高效完成教育资源，Kimi帮你

Kimi 智能生成文档，让教育资源创作更简单!

kimi.moonshot.cn广告

课程资源创作更轻松，用Kimi

Kimi 提供多场景支持，助力课程资源完成!

kimi.moonshot.cn广告

求一个把Access数据转换XML格式的程序，急啊

您可能关注的内容

其他类似问题

为你推荐：