易截截图软件、单文件、免安装、纯绿色、仅160KB

菜鸟求助,怎样把excel文件倒入到access数据库去

菜鸟求助,怎样把excel文件倒入到access数据库去,请高手指点阿!!有没有代码阿!!
连接两个数据库,一个select 一个insert
具体代码自己搜索

我也刚在学习,网上找的. 可以参考下。
<%@LANGUAGE="VBscript" CODEPAGE="936"%>
<%'sql 连接驱动
dim conn,connstr,mdb
time1=timer


'Access数据库,连接驱动
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db.mdb")
Set conn = Server.Createobject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If

sub closedb()
conn.close
set conn=nothing
end sub
 

  Dim    StrConnect,cc 
  Dim    objConn 
  Dim    rs 
  Dim    Sql 
  cc=0
  'Excel连接驱动
  set StrConnect=CreateObject("ADODB.Connection")
  strAddr1 = Server.MapPath("srcc.xls")
  '打开excel数据源
  StrConnect.open "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0;Data Source=" & strAddr1
  set objConn=CreateObject("ADODB.Connection")


相关问答:

如何通过ADO使用聚合函数来查询(数据库为ACCESS)

_RecordsetPtr CMyAdo::SelectRecord(string &where, string &tablename,string &field, int way )
{
    int ret = 0;
  _RecordsetPtr pset;
CString  sql;
& ......

使用Repeater读取access表,页面打开非常慢

access数据库,直接使用  select 字段 from 表  读取数据
然后在页面中使用Repeater来显示
这张表有2000条数据,所以页面打开的很慢
请教各位朋友,有没有办法解决,提高点速度!
一次全部读完 ......

高人进 !!access 数据库问题~~

表结构:
ProductSeriesID 自动编号
ProductSeriesName 文本
ProductSeriesRemark 备注

执行前
ProductSeriesID ProductSeriesName ProductSeriesRemark
2 LV铣刀系列 LV铣刀系列
3 钨钢舍 ......

如何将Excel数据导入Access数据库? 给一段代码

如何将Excel数据导入Access数据库?,
表名:crk

不顶不行

excel可以直接作为数据库操作
使用ADO然后搞进去


procedure TExInput.Excel1Click(Sender: TObject); //实现Excel导入SQL
var
& ......

ADOQuery如何将Excel数据导入Access数据库?

如何将Excel数据导入Access数据库?
表名:crk


End_rbody_60447848//-->
该回复于2009-10-19 10:44:48被管理员删除


对我有用[0]
丢个板砖[0]
引用
举报
管理
TOP



......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号