Question

怎样将excel 的数据导入sql server中

Answer 1

一、企业管理器方式：
sql server 2000的企业管理器中有个"数据转换服务",右键它，所有任务->导入数据，再点下一步进入选择数据源界面，数据源选择“Microsoft Excel 97-2000”，然后下面会出现选择文件的选项，选择你要导入的Excel文件（*.xls），点下一步进入选择将数据导入到哪？即目的地，你这是要导入sql server 2000，所以目的那里不动，选择服务器，如果是数据库在本机可不用选择，验证方式选择跟你安装数据库时一致即可，一般是“使用SQL Server 身份验证”，用户名为sa ，无密码,数据库那里选择你要导入的目的数据库。然后点下一步，下一步，下一步，。。。完成即可。当然点下一步，下一步，下一步，。。。这中间有些选项可以调整的，你自己去研究了。
二、SQL语句方式：
SELECT * INTO tb123 FROM OPENROWSET('MICROSOFT.JET.OLEDB.4.0','Excel 5.0;HDR=YES;DATABASE=d:\采集器档案.xls',采集器导入$)
其中 tb123 为导入数据库后的表名，d:\采集器档案.xls 为excel文件所在位置及文件名。

Answer 2

打开资源管理器--选择数据库--导入数据--数据源现在microsoft Execl 2000,在文件表填写你的路径--。。。。。。按提示操作

Answer 3

SQL里面有自带导入数据向导，根据向导自己一步步设置就可以了。

VB的方法
Dim cn As ADODB.Connection
Dim strSQL As String
Dim lngRecsAff As Long
Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB;Data Source=<server>;" & _
"Initial Catalog=<database>;User ID=<user>;Password=<password>"

'Import by using OPENDATASOURCE.
strSQL = "SELECT * INTO XLImport6 FROM " & _
"OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0', " & _
"'Data Source=C:\test\xltest.xls;" & _
"Extended Properties=Excel 8.0')...[Customers$]"
Debug.Print strSQL
cn.Execute strSQL, lngRecsAff, adExecuteNoRecords
Debug.Print "Records affected: " & lngRecsAff

'Import by using OPENROWSET and object name.
strSQL = "SELECT * INTO XLImport7 FROM " & _
"OPENROWSET('Microsoft.Jet.OLEDB.4.0', " & _
"'Excel 8.0;Database=C:\test\xltest.xls', " & _
"[Customers$])"
Debug.Print strSQL
cn.Execute strSQL, lngRecsAff, adExecuteNoRecords
Debug.Print "Records affected: " & lngRecsAff

'Import by using OPENROWSET and SELECT query.
strSQL = "SELECT * INTO XLImport8 FROM " & _
"OPENROWSET('Microsoft.Jet.OLEDB.4.0', " & _
"'Excel 8.0;Database=C:\test\xltest.xls', " & _
"'SELECT * FROM [Customers$]')"
Debug.Print strSQL
cn.Execute strSQL, lngRecsAff, adExecuteNoRecords
Debug.Print "Records affected: " & lngRecsAff

cn.Close
Set cn = Nothing