1、创建mdb数据库：使用易语言创建一个mdb数据库，可以使用ADO或DAO方式连接数据库。
2、创建XML文件：使用易语言创建一个XML文件，可以使用MSXML对象库实现。
3、导入XML数据到mdb数据库：使用易语言通过ADO或DAO方式将XML数据导入到mdb数据库中。
.mdb应该是数据库格式的一种 如果你要是想把excel中转换成.mdb的话你可以建一个Access数据库 然后在里面点右键导入 底下的格式选成excel 选择你的excel文件就行了如果想把mdb的转成.xml
在Access的工具中有一个office连接 选择excel就行了
楼主也不多说一点信息，你到底是要一个软件呢还是要一段代码哦？你在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=SQLOLEDBData Source=.Initial Catalog=pubsUser ID=saPassword="
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 = 0I <schemaTable.Rows.CountI++){
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=SqlOLEDBData Source=.Initial Catalog=pubsUser ID=saPassword="
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" />
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）