请教高手怎么连接Access数据库？高分回报！在线等待！

Question

请问如何将Excel表格转入到Access数据库中？
如何连接到我指定的Access数据库文件？
谢谢！

Answer 1

用adoconnection连接.
adocnn1.connectionstring := 'Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;' + 'Data Source=' + access文件的路径 + '\' + access文件名;

Answer 2

先用ADOConnection连接Excel文件，然后用ADOQuery打开要导入的表。假设你已经用ADO连接好了Sybase。用什么Insert好呢？一种是用Command,一种是用query或者Table。如果用前者的话就是
while not ADOQuery.eof do
Command.text:='Insert xxxx into 表
Command.execute。如果是用query的话，那就是
query.insert;
while not ADOQuery.eof do
query.Fileds[1]:=ADOQuery.Fields[1];
query.Fields[n]:=ADOQuery.Fields[n];上面只是一个思路，并不意味着语法正确，仅供参考。

Answer 3

Xls->Access:
SELECT * 
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="*.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...表名

Answer 4

ado->excel
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1""" 
"HDR=Yes;" indicates that the first row contains columnnames, not data
"IMEX=1;" tells the driver to always read "intermixed" data columns as text
TIP! SQL syntax: "SELECT * FROM [sheet1$]" - i.e. worksheet name followed by a "$" and wrapped in "[" "]" brackets.ado->access
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;Jet OLEDB:Database Password=MyDbPassword;" 

Answer 5

Excel表格转入到Access数据库的方法：
1.先用ADOConnection连上access数据库
2.
  //opendialog1.InitialDir:=ExtractFileDir(paramstr(0));//execl文件的存放初始路径
  //opendialog1.Execute;
  //FName:=OpenDialog1.FileName;
  ADOConnection1.Connected:=True;               //着几句代码不一定需要
  ADOConnection1.Execute('select * into <表名> from [excel 8.0;database=<execl所在的路径表刮execl表名>].[sheet1$]');//注意：中括号,&都是需要的，还有就是<表名>注意在access数据库中不能已经存在

Answer 6

错了，应该这样：Excel表格转入到Access数据库的方法：
1.先用ADOConnection连上access数据库
2.
  //opendialog1.InitialDir:=ExtractFileDir(paramstr(0));//execl文件的存放初始路径
  //opendialog1.Execute;
  //FName:=OpenDialog1.FileName;            //着几句代码不一定需要
  ADOConnection1.Connected:=True;               
  ADOConnection1.Execute('select * into <表名> from [excel 8.0;database=<execl所在的路径表刮execl表名>].[sheet1$]');//注意：中括号,&都是需要的，还有就是<表名>注意在access数据库中不能已经存在

Answer 7

连接到access数据库：ADO,BDE均可ADOConnection的方法：只要双击ADOConnection控件，然后选者access所在的路径，然后自己44吧