运用excel 导入导出access数据库

合集下载

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

excel 导入导出access数据库(winform)
//从excel导入到数据库。

OleDbConnection conExcel = new OleDbConnection();
try
{
OpenFileDialog openFile = new OpenFileDialog();//打开文件对话框。

openFile.Filter = ("Excel 文件(*.xls)|*.xls");//后缀名。

if (openFile.ShowDialog() == DialogResult.OK)
{
string filename = openFile.FileName;
int index = stIndexOf("\\");//截取文件的名字
filename = filename.Substring(index + 1);
conExcel.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" + Application.StartupPath + "\\Appdata.mdb";
//将excel导入access
//distinct :删除excel重复的行.
//[excel名].[sheet名] 已有的excel的表要加$
//where not in : 插入不重复的记录。

string sql = "insert into 用户表select distinct * from [Excel 8.0;database=" + filename + "].[用户表$] where 记录编号not IN (select 记录编号from 用户表)";
OleDbCommand com = new OleDbCommand(sql, conExcel);
conExcel.Open();
com.ExecuteNonQuery();
MessageBox.Show("导入数据成功","导入数据", MessageBoxButtons.OK, rmation );
}
}
catch (Exception ex)
{
MessageBox.Show(ex.ToString());
}
finally
{
conExcel.Close();
}
//导出到excel操作。

OleDbConnection conExcel = new OleDbConnection();
try
{
SaveFileDialog saveFile = new SaveFileDialog();
saveFile.Filter = ("Excel 文件(*.xls)|*.xls");//指定文件后缀名为Excel 文件。

if (saveFile.ShowDialog() == DialogResult.OK)
{
string filename = saveFile.FileName;
if (System.IO.File.Exists(filename))
{
System.IO.File.Delete(filename);//如果文件存在删除文件。

}
int index = stIndexOf("\\");//获取最后一个\的索引
filename = filename.Substring(index + 1);//获取excel名称(新建表的路径相对于SaveFileDialog的路径)
//select * into 建立新的表。

//[[Excel 8.0;database= excel名].[sheet名] 如果是新建sheet表不能加$,如果向sheet里插入数据要加$.
//sheet最多存储65535条数据。

string sql = "select top 65535 * into [Excel 8.0;database=" + filename + "].[用户表] from 用户表";
conExcel.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" + Application.StartupPath + "\\Appdata.mdb";//将数据库放到debug目录下。

OleDbCommand com = new OleDbCommand(sql, conExcel);
conExcel.Open();
com.ExecuteNonQuery();
MessageBox.Show("导出数据成功","导出数据", MessageBoxButtons.OK, rmation );
}
}
catch (Exception ex)
{
MessageBox.Show(ex.ToString());
}
finally
{
conExcel.Close();
}
使用Transact-SQL进行数据导入导出方法详解[转载]
本文讨论了如何通过Transact-SQL以及系统函数OPENDATASOURCE和OPENROWSET在同构和异构数据库之间进行数据的导入导出，并给出了详细的例子以供参考。

1. 在SQL Server数据库之间进行数据导入导出
(1).使用SELECT INTO导出数据
在SQL Server中使用最广泛的就是通过SELECT INTO语句导出数据，SELECT INTO语句同时具备
两个功能：
根据SELECT后跟的字段以及INTO后面跟的表名建立空表（如果SELECT后是*, 空表的结构和FROM所指的表的结构相同）；
将SELECT查出的数据插入到这个空表中。

在使用SELECT INTO语句时，INTO后跟的表必须在数据库不存在，否则出错，下面是一个使用SELECT INTO的例子。

假设有一个表table1，字段为f1(int)、f2(varchar(50))。

SELECT * INTO table2 FROM table1 这条SQL语的在建立table2表后，将table1的数据全部插入到table1中的，还可以将*改为f1或f2以便向适当的字段中插入数据。

SELECT INTO不仅可以在同一个数据中建立表，也可以在不同的SQL Server数据库中建立表。

USE db1 SELECT * INTO db2.dbo.table2 FROM table1
以上语句在数据库db2中建立了一个所有者是dbo的表table2，在向db2建表时当前登录的用户必须有在db2建表的权限才能建立table2。

使用SELECT INTO要注意的一点是SELECT INTO不可以和COMPUTE一起使用，因为COMPUTE返回的是一组记录集，这将会引起二意性（即不知道根据哪个表建立空表）。

(2).使用INSERT INTO 和UPDA TE插入和更新数据SELECT INTO只能将数据复制到一个空表中，而INSERT INTO可以将一个表或视图中的数据插入到另外一个表中。

INSERT INTO table1 SELECT * FROM table2 或INSERT INTO db2.dbo.table1 SELECT * FROM table2
但以上的INSERT INTO语句可能会产生一个主键冲突错误（如果table1中的某个字段是主键，恰巧table2中的这个字段有的值和table1的这个字段的值相同）。

因此，上面的语句可以修改为INSERT INTO table1 -- 假设字段f1为主键SELECT * FROM table2 WHERE NOT EXISTS(SELECT table1.f1 FROM table1 WHERE table1.f1=table2.f1 ) 以上语句的功能是将table2中f1在table1中不存在的记录插入到table1中。

要想更新table1可以使用UPDA TE语句UPDATE table1 SET table1.f1=table2.f1, table1.f2=table2.f2 FROM table2 WHERE table1.f1=table2.f1 将以上两条INSERT INTO和UPDATE语句组合起来在一起运行，就可以实现记录在table1中不存在时插入，存在时更新的功能，但要注意要将UPDATE 放在INSERT INTO前面，否则UPDATE更新的记录数将是table1和table2记录数的总和。

2. 使用OPENDATASOURCE和OPENROWSET在不同类型的数据库之间导入导出数据
在异构的数据库之间进行数据传输，可以使用SQL Server提供的两个系统函数OPENDATASOURCE 和OPENROWSET。

OPENDATASOURCE可以打开任何支持OLE DB的数据库，并且可以将OPENDATASOURCE做为SELECT、UPDATE、INSERT和DELETE后所跟的表名。

如
SELECT * FROM OPENDATASOURCE('SQLOLEDB', 'Data Source=192.168.18.252;User ID=sa;Password=test').pubs.dbo.authors
这条语句的功能是查询192.168.18.252这台机器中SQL Server数据库pubs中的authors表。

从这条语句可以看出，OPENDATASOURCE有两个参数，第一个参数是provider_name，表示用于访问数据源的OLE DB 提供程序的PROGID 的名称。

provider_name 的数据类型为char，没有默
认值。

第二个参数是连接字符串，根据OLE DB Provider不同而不同（如果不清楚自己所使用的OLE DB Provider的连接字符串，可以使用delphi、visual studio等开发工具中的ADO控件自动生成相应的连接字符串）。

OPENROWSET函数和OPENDATASOURCE函数类似，只是它可以在打开数据库的同时对数据库中的表进行查询，如以下语句
OPENROWSET('MSDASQL.1', 'Driver=Microsoft Visual FoxPro Driver; SourceDB=c:\db; SourceType=DBF', 'SELECT * FROM [b.dbf]')最后一个参数查询foxpro表b.dbf，读者可以通过where 条件对b.dbf进行过滤。

如果将INSERT INTO、SELECT INTO和OPENDA TASOURCE或OPENROWSET一起使用，就可以使SQL Server数据库和其它类型的数据库之间进行数据导入导出。

下面介绍如何使用这两个函数在SQL Server数据库和其它类型的数据库之间进行数据导入导出。

(1).SQL Server数据库和SQL Server数据库之间的数据导入导出。

导入数据
SELECT * INTO authors1 FROM OPENDA TASOURCE( 'SQLOLEDB', 'Data Source=192.168.18.252;User ID=sa;Password=abc' ).pubs.dbo.authors
导出数据
INSERT INTO OPENDA TASOURCE( 'SQLOLEDB', 'Data Source=192.168.18.252;User ID=sa;Password=abc' ).test.dbo.authors select * from pubs.dbo.authors
在这条语句中OPENDATASOURCE(...)可以理解为SQL Server的一个服务，.pubs.dbo.authors是这个服务管理的一个数据库的一个表authors。

使用INSERT INTO时OPENDATASOURCE(...)后跟的表必须存在。

也可以将以上的OPENDATASOURCE换成
OPENROWSET INSERT INTO OPENROWSET('SQLOLEDB','192.168.18.252';'sa';'abc', 'select * from test.dbo.kk') SELECT * FROM pubs.dbo.authors使用OPENROWSET要注意一点，'192.168.18.252';'sa';'abc'中间是";"，而不是","。

OPENDA TASOURCE和OPENROWSET都不接受参数变量。

(2). SQL Server数据库和Access数据库之间的数据导入导出。

导入数据
SELECT * INTO access FROM OPENDATASOURCE( 'Microsoft.Jet.OLEDB.4.0', 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\data.mdb;Persist Security Info=False')table1或者使用
OPENROWSET SELECT * FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0', 'c:\data.mdb';'admin';'','SELECT * FROM table1')
导出数据
INSERT INTO OPENDATASOURCE( 'Microsoft.Jet.OLEDB.4.0', 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\data.mdb;Persist Security Info=False')table1 SELECT * FROM access
打开access数据库的OLE DB Provider叫Microsoft.Jet.OLEDB.4.0，需要注意的是操作非SQL
Server数据库在OPENDATASOURCE(...)后面引用数据库中的表时使用"...”，而不是“.”。

(3). SQL Server数据库和文本文件之间的数据导入导出。

导入数据
SELECT * INTO text1 FROM OPENDATASOURCE('MICROSOFT.JET.OLEDB.4.0','Text;DATABASE=c:\')[data#txt] 导出数据INSERT INTO OPENDA TASOURCE('MICROSOFT.JET.OLEDB.4.0','Text;DATABASE=c:\')[data#txt] SELECT * FROM text1
或者使用
OPENROWSET INSERT INTO OPENROWSET('MICROSOFT.JET.OLEDB.4.0','Text;DATABASE=c:\', [data#txt]) SELECT * FROM text1
如果要插入部分字段，可使用
INSERT INTO OPENROWSET('MICROSOFT.JET.OLEDB.4.0','Text;DATABASE=c:\', 'SELECT aa FROM [data#txt]') SELECT aa FROM text1 这条SQL语句的功能是将c盘根目录的data.txt文件导入到text1表中，在这里文件名中的“.”要使用“#”代替。

在向文本导出时，不仅文本文件要存在，而且第一行必须和要导出表的字段一至。

(4). SQL Server数据库和dbase数据库之间的数据导入导出。

导入数据
SELECT * INTO dbase FROM OPENROWSET('MICROSOFT.JET.OLEDB.4.0' , 'dBase III;HDR=NO;IMEX=2;DATABASE=C:\','SELECT * FROM [b.dbf]')
导出数据
INSERT INTO OPENROWSET('MICROSOFT.JET.OLEDB.4.0' , 'dBase III;HDR=NO;IMEX=2;DATABASE=C:\','SELECT * FROM [b.dbf]') SELECT * FROM dbase OPENROWSET(...)中的b.dbf使用[...]括起来，是为了当dbf文件名有空格等字符时不会出错，如果没有这些特殊字符，可以将[...]去掉
(5). SQL Server数据库和foxpro数据库之间的数据导入导出。

导入数据
SELECT * INTO foxpro FROM OPENROWSET('MSDASQL.1', 'Driver=Microsoft Visual FoxPro Driver; SourceDB=c:\; SourceType=DBF', 'SELECT * FROM [a.dbf]') 导出数据
INSERT INTO OPENROWSET('MSDASQL.1' , 'Driver=Microsoft Visual FoxPro Driver; SourceDB=c:\db; SourceType=DBF','SELECT * FROM a.dbf') SELECT * FROM foxpro
在此处a.dbf不能使用[...]括起来，否则出错（这是由driver决定的）。

(6). SQL Server数据库和excel文件之间的数据导入导出
导入数据
SELECT * INTO excel FROM OPENDATASOURCE('MICROSOFT.JET.OLEDB.4.0', 'Excel 5.0;DATABASE=c:\book1.xls' )[Sheet1$]导出数据
INSERT INTO OPENDA TASOURCE('MICROSOFT.JET.OLEDB.4.0', 'Excel 5.0;DATABASE=c:\book1.xls' )[Sheet1$] SELECT * FROM excel
在book1.xls的Sheet1中必须有和excel表相对应的字段，否则会出错。

以上讨论了几种常用的数据库和SQL Server数据库之间如何使用Transact-SQL进行数据导入导出。

在SQL Server中还提供了将其它类型的数据库注册到SQL Server中的功能，这样就可以和使用SQL Server数据库表一样使用这些被注册数据库中的表了。

EXEC sp_addlinkedserver 'access', 'OLE DB Provider for Jet', 'Microsoft.Jet.OLEDB.4.0', 'c:\data.mdb'
以上SQL使用存储过程sp_addlinkedserver注册了一个access数据库，我们可以在SQL Server中使用如下语句查询在data.mdb中的table1。

SELECT * FROM access...table1
这样就可很方便地查询access数据库中的表了，如果要导入table1，可以使用
SELECT * INTO table2 FROM access...table1。

如果想删除注册的数据库连接，使用如下语句。

EXEC sp_dropserver 'access'
使用Transact-SQL不仅可以向SQL Server数据库导入导出数据，而且还可以使任意两种类型数据库之间互相导入导出数据。

以access和excel为例进行说明。

INSERT INTO OPENDA TASOURCE('MICROSOFT.JET.OLEDB.4.0', 'Excel 5.0;DATABASE=c:\book1.xls' )[Sheet1$] SELECT * FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0', 'c:\data.mdb';'admin';'','SELECT * FROM table1')
以上SQL语句将access数据库的table1表的数据插入到excel文件book1.xls中的Sheet1表单中。

使用Transact-SQL进行数据的导入导出，可以很方便地将这些Transact-SQL语句放到客户端程序中（如delphi、c#等），从而可以很容易地编写自已的数据库导入导出工具。

在实际的开发应用中，数据库导入导出是经常遇到的问题，尤其是数据库与Excel文件之间的导入导出，还存在数据类型不一致的问题。

例如：数据库的数字超长时会在Excel里格式化成科学计数法的格式，或者记录内容是数字和字符的混合内容会丢失内容等等。

将Access数据库的内容直接导入到Excel则可以避免这些问题。

下面例子就是实现这个功能，例子中的数据库使用《 2.0应用开发技术》一书中自带的数据库为例子。

另外，需要注意：Excel文件有诸多限制，在如果数据库记录内容很多，还要计算每次导出的数量和Sheet数目，另外，对Sheet名字相同的监测也省略了，需要的读者请根据情况自行添加上去。

结合存储过程的分页功能实现起来比较好。

C#
<%@ Page Language="C#" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
protected void Button1_Click(object sender, EventArgs e)
{
string sql;
string connstr = @"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|ASPNET20Book.mdb;Persist Security Info=True";
System.Data.OleDb.OleDbConnection cn = new System.Data.OleDb.OleDbConnection(connstr);
System.Data.OleDb.OleDbCommand cmd;
cn.Open();
//先得到记录数目：
sql = "select Count(*) From Paging";
cmd = new System.Data.OleDb.OleDbCommand(sql, cn);
int RecordCount = (int)cmd.ExecuteScalar();
// TODO：计算Sheet数目，进行记录分段，将不同的数据段导入到不同的Sheet（Sheet数目不知道有没有限制：（）
// TODO：文件名，Sheet名字的存在检测略
//每个Sheet只能最多保存65536条记录。

例如：数据库的数字超长时会在Excel里格式化成科学计数法的格式，或者记录内容是数字和字符的混合内容会丢失内容等等。

将Access数据库的内容直接导入到Excel则可以避免这些问题。

下面例子就是实现这个功能，例子中的数据库使用《 2.0应用开发技术》一书中自带的数据库为例子。

结合存储过程的分页功能实现起来比较好。

sql = @"select top 65535 * into [Excel 8.0;database=" + Server.MapPath(".") + @"ASPNET20Book.xls].[Sheet1] from Paging";
cmd = new System.Data.OleDb.OleDbCommand(sql, cn);
cmd.ExecuteNonQuery();
cn.Close();
cn.Dispose();
cn = null;
}
</script>
<html xmlns="/1999/xhtml">
<head runat="server">
<title>直接将Access数据库导入到Excel文件</title>
</head>
<body>
<form id="form1" runat="server">
<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="到处数据" />
</form>
</body>
</html>
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim sql As String
Dim connstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|ASPNET20Book.mdb;Persist Security Info=True"
Dim cn As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection(connstr)
Dim cmd As System.Data.OleDb.OleDbCommand
cn.Open
sql = "select Count(*) From Paging"
cmd = New System.Data.OleDb.OleDbCommand(sql, cn)
Dim RecordCount As Integer = CType(cmd.ExecuteScalar, Integer)
sql = "select top 65535 * into [Excel 8.0;database=" + Server.MapPath(".") + "ASPNET20Book.xls].[Sheet1] from Paging"
cmd = New System.Data.OleDb.OleDbCommand(sql, cn)
cmd.ExecuteNonQuery
cn.Close
cn.Dispose
cn = Nothing
End Sub
用sql导入和导出
/*************导出到Access********************/
insert into openrowset('Microsoft.Jet.OLEDB.4.0',
'x:\A.mdb';'admin';'',A表) select * from 数据库名..B表
/*************导入Access********************/
insert into B表selet * from openrowset('Microsoft.Jet.OLEDB.4.0',
'x:\A.mdb';'admin';'',A表)
/******* 导出到excel
EXEC master..xp_cmdshell 'bcp SettleDB.dbo.shanghu out c:\temp1.xls -c -q -S"GNETDA TA/GNETDATA" -U"sa" -P""'
/*********** 导入Excel
SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
SELECT cast(cast(科目编号as numeric(10,2)) as nvarchar(255))+'' 转换后的别名FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
/** 导入文本文件
EXEC master..xp_cmdshell 'bcp "dbname..tablename" in c:\DT.txt -c -Sservername -Usa -Ppassword'
/** 导出文本文件
EXEC master..xp_cmdshell 'bcp "dbname..tablename" out c:\DT.txt -c -Sservername -Usa -Ppassword'
或
EXEC master..xp_cmdshell 'bcp "Select * from dbname..tablename" queryout c:\DT.txt -c -Sservername -Usa -Ppassword'
导出到TXT文本，用逗号分开
exec master..xp_cmdshell 'bcp "库名..表名" out "d:\tt.txt" -c -t ,-U sa -P password'
BULK INSERT 库名..表名
FROM 'c:\test.txt'
WITH (
FIELDTERMINATOR = ';',
ROWTERMINATOR = '\n'
)
--/* dBase IV文件
select * from
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'dBase IV;HDR=NO;IMEX=2;DA TABASE=C:\','select * from [客户资料4.dbf]')
--*/
--/* dBase III文件
select * from
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'dBase III;HDR=NO;IMEX=2;DA TABASE=C:\','select * from [客户资料3.dbf]')
--*/
--/* FoxPro 数据库
select * from openrowset('MSDASQL',
'Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\',
'select * from [aa.DBF]')
--*/
/**************导入DBF文件****************/
select * from openrowset('MSDASQL',
'Driver=Microsoft Visual FoxPro Driver;
SourceDB=e:\VFP98\data;
SourceType=DBF',
'select * from customer where country != "USA" order by country')
go
/***************** 导出到DBF ***************/
如果要导出数据到已经生成结构(即现存的)FOXPRO表中,可以直接用下面的SQL语句
insert into openrowset('MSDASQL',
'Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\',
'select * from [aa.DBF]')
select * from 表
说明:
SourceDB=c:\ 指定foxpro表所在的文件夹
aa.DBF 指定foxpro表的文件名.
网络大本营
/******* 导出到excel
EXEC master..xp_cmdshell ’bcp SettleDB.dbo.shanghu out c:\temp1.xls -c -q -S"GNETDA TA/GNETDATA" -U"sa" -P""’
/*********** 导入Excel
SELECT *
FROM OpenDataSource( ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’)...xactions
SELECT cast(cast(科目编号as numeric(10,2)) as nvarchar(255))+’’转换后的别名
FROM OpenData Source( ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’)...xactions
/** 导入文本文件
EXEC master..xp_cmdshell ’bcp "dbname..tablename" in c:\DT.txt -c -Sservername -Usa -Ppassword’
/** 导出文本文件
E XEC master..xp_cmdshell ’bcp "dbname..tablename" out c:\DT.txt -c -Sservername -Usa -Ppassword’
或
EXEC master..xp_cmdshell ’bcp "Select * from dbname..tablename" queryout c:\DT.txt -c -Sservername -Usa -Ppassword’
导出到TXT文本，用逗号分开
exec master..xp_cmdshell ’bcp "库名..表名" out "d:\tt.txt" -c -t ,-U sa -P password’
BULK INSERT 库名..表名
FROM ’c:\test.txt’
WITH (
FIELDTERMINATOR = ’;’,
ROWTERMINATOR = ’\n’
)
--/* dBase IV文件
select * from
OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’
,’dBase IV;HDR=NO;IMEX=2;DATABASE=C:\’,’select * from [客户资料4.dbf]’)
--*/
--/* dBase III文件
select * from
OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’
,’dBase III;HDR=NO;IMEX=2;DATABASE=C:\’,’select * from [客户资料3.dbf]’)
--*/
--/* FoxPro 数据库
select * from openrowset(’MSDASQL’,
’Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\’,
’select * from [aa.DBF]’)
--*/
/**************导入DBF文件****************/
select * from openrowset(’MSDASQL’,
’Driver=Microsoft Visual FoxPro Driver;
SourceDB=e:\VFP98\data;
Source Type=DBF’,
’select * from customer where country != "USA" order by country’)
go
/***************** 导出到DBF ***************/
如果要导出数据到已经生成结构(即现存的)FOXPRO表中,可以直接用下面的SQL语句
insert into openrowset(’MSDASQL’,
’Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:\’,
’select * from [aa.DBF]’)
select * from 表
说明:
SourceDB=c:\ 指定foxpro表所在的文件夹
aa.DBF 指定foxpro表的文件名.
/*************导出到Access********************/
insert into openrowset(’Microsoft.Jet.OLEDB.4.0’,
’x:\A.mdb’;’admin’;’’,A表) select * from 数据库名..B表
/*************导入Access********************/
insert into B表selet * from openrowset(’Microsoft.Jet.OLEDB.4.0’, ’x:\A.mdb’;’admin’;’’,A表)
********************* 导入xml文件
DECLARE @idoc int
DECLARE @doc varchar(1000)
--sample XML document
SET @doc =’
<root>
<Customer cid= "C1" name="Janine" city="Issaquah">
<Order oid="O1" date="1/20/1996" amount="3.5" />
<Order oid="O2" date="4/30/1997" amount="13.4">Customer was very satisfied </Order>
</Customer>
<Customer cid="C2" name="Ursula" city="Oelde" >
<Order oid="O3" date="7/14/1999" amount="100" note="Wrap it blue
white red">
<Urgency>Important</Urgency>
Happy Customer.
</Order>
<Order oid="O4" date="1/20/1996" amount="10000"/>
</Customer>
</root>
’
-- Create an internal representation of the XML document.
EXEC sp_xml_preparedocument @idoc OUTPUT, @doc
-- Execute a SELECT statement using OPENXML rowset provider.
SELECT *
F ROM OPENXML (@idoc, ’/root/Customer/Order’, 1)
WITH (oid char(5),
amount float,
comment ntext ’text()’)
EXEC sp_xml_removedocument @idoc
/********************导整个数据库*********************************************/
用bcp实现的存储过程
/*
实现数据导入/导出的存储过程
根据不同的参数,可以实现导入/导出整个数据库/单个表
调用示例:
--导出调用示例
----导出单个表
exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:\zj.txt’,1
----导出整个数据库
exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:\docman’,1
--导入调用示例
----导入单个表
exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:\zj.txt’,0
----导入整个数据库
exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:\docman’,0
*/
if exists(select 1 from sysobjects where name=’File2Table’ and objectproperty(id,’IsProcedure’)=1)
drop procedure File2Table
go
create procedure File2Table
@servername varchar(200) --服务器名
,@username varchar(200) --用户名,如果用NT验证方式,则为空’’
,@password varchar(200) --密码
,@tbname varchar(500) --数据库.dbo.表名,如果不指定:.dbo.表名,则导出数据库的所有用户表
,@filename varchar(1000) --导入/导出路径/文件名,如果@tbname参数指明是导出整个数据库,则这个参数是文件存放路径,文件名自动用表名.txt
,@isout bit --1为导出,0为导入
as
declare @sql varchar(8000)
if @tbname like ’%.%.%’--如果指定了表名,则直接导出单个表
begin
set @sql=’bcp ’+@tbname
+case when @isout=1 then ’ out ’ else ’ in ’ end
+’ "’+@filename+’" /w’
+’ /S ’+@servername
+case when isnull(@username,’’)=’’ then ’’ else ’ /U ’+@username end
+’ /P ’+isnull(@password,’’)
exec master..xp_cmdshell @sql
end
else
begin --导出整个数据库,定义游标,取出所有的用户表
declare @m_tbname varchar(250)
if right(@filename,1)<>’\’set @filename=@filename+’\’
set @m_tbname=’declare #tb cursor for select name from ’+@tbname+’..sysobjects where xtype=’’U’’’ exec(@m_tbname)
open #tb
fetch next from #tb into @m_tbname
while @@fetch_status=0
begin
set @sql=’bcp ’+@tbname+’..’+@m_tbname
+case when @isout=1 then ’ out ’ else ’ in ’ end
+’ "’+@filename+@m_tbname+’.txt " /w’
+’ /S ’+@servername
+case when isnull(@username,’’)=’’ then ’’ else ’ /U ’+@username end
+’ /P ’+isnull(@password,’’)
exec master..xp_cmdshell @sql
fetch next from #tb into @m_tbname
end
close #tb
deallocate #tb
end
go
/**********************Excel导到Txt****************************************/
想用
select * into opendatasource(...) from opendatasource(...)
实现将一个Excel文件内容导入到一个文本文件
假设Excel中有两列，第一列为姓名，第二列为很行帐号(16位)
且银行帐号导出到文本文件后分两部分，前8位和后8位分开。

如果要用你上面的语句插入的话,文本文件必须存在,而且有一行:姓名,银行账号1,银行账号2
然后就可以用下面的语句进行插入
注意文件名和目录根据你的实际情况进行修改.
insert into
opendatasource(’MICROSOFT.JET.OLEDB.4.0’
,’Text;HDR=Yes;DATABASE=C:\’
)...[aa#txt]
--,aa#txt)
--*/
select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8)
from
opendatasource(’MICROSOFT.JET.OLEDB.4.0’
,’Excel 5.0;HDR=YES;IMEX=2;DATABASE=c:\a.xls’
--,Sheet1$)
)...[Sheet1$]
如果你想直接插入并生成文本文件,就要用bcp
declare @sql varchar(8000),@tbname varchar(50)
--首先将excel表内容导入到一个全局临时表
select @tbname=’[##temp’+cast(newid() as varchar(40))+’]’
,@sql=’select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8) into ’+@tbname+’ from
opendatasource(’’MICROSOFT.JET.OLEDB.4.0’’
,’’Excel 5.0;HDR=YES;IMEX=2;DA TABASE=c:\a.xls’’
)...[Sheet1$]’
exec(@sql)
--然后用bcp从全局临时表导出到文本文件
set @sql=’bcp "’+@tbname+’" out "c:\aa.txt" /S"(local)" /P"" /c’
exec master..xp_cmdshell @sql
--删除临时表
exec(’drop table ’+@tbname)
用bcp将文件导入导出到数据库的存储过程:
/*--bcp-二进制文件的导入导出
支持image,text,ntext字段的导入/导出
image适合于二进制文件;text,ntext适合于文本数据文件
注意:导入时,将覆盖满足条件的所有行
导出时,将把所有满足条件的行也出到指定文件中
此存储过程仅用bcp实现
邹建2003.08-----------------*/
/*--调用示例
--数据导出
exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:\zj1.dat’
--数据导出
exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:\zj1.dat’,’’,0
--*/
if exists (select * from dbo.sysobjects where id = object_id(N’[dbo].[p_binaryIO]’) and OBJECTPROPERTY(id, N’IsProcedure’) = 1)
drop procedure [dbo].[p_binaryIO]
GO
Create proc p_binaryIO
@servename varchar (30),--服务器名称
@username varchar (30), --用户名
@password varchar (30), --密码
@tbname varchar (500), --数据库..表名
@fdname varchar (30), --字段名
@fname varchar (1000), --目录+文件名,处理过程中要使用/覆盖:@filename+.bak
@tj varchar (1000)=’’, --处理条件.对于数据导入,如果条件中包含@fdname,请指定表名前缀
@isout bit=1 --1导出((默认),0导入
AS
declare @fname_in varchar(1000) --bcp处理应答文件名
,@fsize varchar(20) --要处理的文件的大小
,@m_tbname varchar(50) --临时表名
,@sql varchar(8000)
--则取得导入文件的大小
if @isout=1
set @fsize=’0’
else
begin
create table #tb(可选名varchar(20),大小int
,创建日期varchar(10),创建时间varchar(20)
,上次写操作日期varchar(10),上次写操作时间varchar(20)
,上次访问日期varchar(10),上次访问时间varchar(20),特性int)
insert into #tb
exec master..xp_getfiledetails @fname
select @fsize=大小from #tb
drop table #tb
if @fsize is null
begin
print ’文件未找到’
return
end
end
--生成数据处理应答文件
set @m_tbname=’[##temp’+cast(newid() as varchar(40))+’]’ set @sql=’select * into ’+@m_tbname+’ from(
select null as 类型
union all select 0 as 前缀
union all select ’+@fsize+’as 长度
union all select null as 结束
union all select null as 格式
) a’
exec(@sql)
select @fname_in=@fname+’_temp’
,@sql=’bcp "’+@m_tbname+’" out "’+@fname_in +’" /S"’+@servename
+case when isnull(@username,’’)=’’ then’’
else ’" /U"’+@username end
+’" /P"’+isnull(@password,’’)+’" /c’
exec master..xp_cmdshell @sql
--删除临时表
set @sql=’drop table ’+@m_tbname
exec(@sql)
if @isout=1
begin
set @sql=’bcp "select top 1 ’+@fdname+’ from ’
+@tbname+case isnull(@tj,’’) when ’’ then ’’
else ’ where ’+@tj end
+’" queryout "’+@fname
+’" /S"’+@servename
+case when isnull(@username,’’)=’’ then ’’
else ’" /U"’+@username end
+’" /P"’+isnull(@password,’’)
+’" /i"’+@fname_in+’"’
exec master..xp_cmdshell @sql
end
else
begin
--为数据导入准备临时表
set @sql=’select top 0 ’+@fdname+’ into ’
+@m_tbname+’ from ’ +@tbname
exec(@sql)
--将数据导入到临时表
set @sql=’bcp "’+@m_tbname+’" in "’+@fname
+’" /S"’+@servename
+case when isnull(@username,’’)=’’ then’’
else ’" /U"’+@username end
+’" /P"’+isnull(@password,’’)
+’" /i"’+@fname_in+’"’
exec master..xp_cmdshell @sql
--将数据导入到正式表中
set @sql=’update ’+@tbname
+’ set ’+@fdname+’=b.’+@fdname
+’ from ’+@tbname+’ a,’
+@m_tbname+’ b’
+case isnull(@tj,’’) when ’’ then ’’
else ’ where ’+@tj end
exec(@sql)
--删除数据处理临时表
set @sql=’drop table ’+@m_tbname
end
--删除数据处理应答文件
set @sql=’del ’+@fname_in
exec master..xp_cmdshell @sql
go
/** 导入文本文件
EXEC master..xp_cmdshell ’bcp "d bname..tablename" in c:\DT.txt -c -Sservername -Usa -Ppassword’
改为如下，不需引号
EXEC master..xp_cmdshell ’bcp dbname..tablename in c:\DT.txt -c -Sservername -Usa -Ppassword’
/** 导出文本文件
EXEC master..xp_cmdshell ’bcp "dbname..tablename" out c:\DT.txt -c -Sservername -Usa -Ppassword’ 此句需加引号。