如何将excel表格的内容导入SQL Server 2008

追问：很感谢哈如何把Excel指定列导入SQL server ？  谢谢啊

答案：哈哈
刚好我也在做这个案例
<%'sql 连接驱动
dim conn,connstr,time1,time2,mdb
time1=timer
  dim aa 
  aa=request.form("EXCEL")  '获取传递过来的值 
  Dim   StrConnect,cc   
  Dim   objConn   
  Dim   rs   
  Dim   Sql   
  cc=0
  'Excel连接驱动
  aaa="provider=Microsoft.Jet.OLEDB.4.0; Data Source="&aa&";Extended Properties=Excel 8.0"
  set StrConnect=CreateObject("ADODB.Connection")
  StrConnect.Open aaa
  Set objConn=CreateObject("ADODB.Connection")
  objConn.Open   StrConnect   
  '注意 表名一定要以下边这种格试"[表名$]"书写   
  Set   rs = Server.CreateObject("ADODB.Recordset")     
  Sql="select * from [sheet1$]"   
  rs.Open   Sql,StrConnect,2,2     
  IF  rs.Eof And Rs.Bof   Then   
  response.Write("<script>alert('没有资料可以导入！');history.go(-1)</script>")   
  else   
  Do While  Not rs.EOF 
  if rs(0)<>""   then   
  '插入SQL2000里   
set rssql=server.CreateObject("adodb.recordset")
rssql.Open "select * from a_sell where PartNo='"&rs(0)&"'",conn,1,3   
if not rssql.recordcount=0 then 
response.write ""
else
  rssql.AddNew   
  rssql(1)=rs(0)   
  rssql(2)=rs(1)   
  rssql(3)=rs(2)   
  rssql(4)=rs(3)   
  rssql(5)=rs(4)   
  rssql(6)=rs(5)   
  rssql(7)=rs(6)   
  rssql(8)=rs(7)   
  rssql.Update   
end if 
  end if   
  Rs.MoveNext   
  Loop   
  end if   
  response.Write"<script language=javascript>alert('资料导入成功！\n重复数据未导入');history.go(-1)</script>" 
  
  %>

其他：将EXCEL数据导入SQL数据库的方法有很多种，目前仅将我知道的整理如下：
1.使用SQL中的OPENROWSET函数
2.使用SQL企业管理器中的数据库的“导入数据”功能
3.如果能力够强自己开发一个程序来做数据的导入导出！ 把接口换换 语句一样

JS10
.COM

里面有个超牛的【单文件】彷discuz论坛

支持4种数据库接口

excel access sql
 dbase 




有啊 但要针对你数据库的表手写代码 select * into 表 from 
OPENROWSE('MICROSOFT.JET.OLEDB.4.0','Excel5.0;HDR=YES;DATABASE=c:\test.xls',sheet1$) 

上一个：MY SQL 中，设置一列的值为另两列值的商，类似excel里的求和函数，在SQL下可以实现吗，如何实现？
下一个：excel应用SQL