ADOQuery如何将Excel数据导入Access数据库?
如何将Excel数据导入Access数据库?
表名:crk
End_rbody_60447848//-->
该回复于2009-10-19 10:44:48被管理员删除
对我有用[0]
丢个板砖[0]
引用
举报
管理
TOP
zhoutler
(一代程序巨浆--用浆糊粘贴代码)
等 级：
#2楼 得分：0回复于：2009-10-16 22:47:40
方法1：通过三方控件如XLSReadWrite等读Excel的Sheet内容，然后连接到Access数据，写入表。不要说怎么操作Access数据库进行表的Insert都不清楚哈。
方法2：用Jet引擎打开Excel的文件，这样如同操作Access一样，Select出来，然后Insert数据到Access里面去.
方法3：用Com接口读Excel内容，Insert到Access表。
这里还发一个贴啊？
procedure TExInput.Excel1Click(Sender: TObject); //实现Excel导入SQL
var
sTableName, ErrInfo: string;
var
TableName,CBMonth ,sqlStr:String;
begin
TableName :='BCTZ'+ComboBoxYear.Text+ComboBoxMonth.Text;
sqlStr:='create table BCTZ'+ComboBoxYear.Text+ComboBoxMonth.Text+'( BmNo char(20),RsNo char(20),TzRq char(20), BcNo char(20), Name char(20), BmMc char(20))';
ADOQuery1.sql.clear;
ADOQuery1.sql.add(sqlStr);
ADOQuery1.execsql;
try
ADOConn.Connected := False;
ADOConn.ConnectionString := Format(context, [Trim(edtPasswd.Text), Trim(edtUser.Text), Trim(edtServerName.Text), Trim(edtServerIP.Text)]);
&n
相关问答：
IsSqlDataBase = 0 '主数据库类型(1=SQL，0=AC)
'===========================================================================
SqlDatabaseName = "ads365" '主数据库名
S ......
本来我是用ACCESS+VB建立一个软件（局域网），现在由于办公地点有变动，相换成INTERNAT的，有没有办法解决，
象这样的情况，如果是广域网，最好改成：B\S的
如果是局域网的，最好改成：C\S的
http://downlo ......
问题如下：
用查询语句
select * from tab where fil like 'CK090902'能查找出一条记录并显示出来
改为
select * from tab where fil = 'CK090902'
就不能查找到，也显示不出来 ......
哪位大哥有ACCESS数据库 啊？
给小弟一个！
安装OFFICE时选择安装ACCESS
安装OFFICE时选择安装ACCESS
安装办公软件，选择自定义安装，然后选上ACCESS就可以了
office完� ......
我的一个access数据库中的photo字段中的内容是这样的：
|/UpFiles/Picture/admin/200910162300187612.jpg|/UpFiles/Picture/admin/200910162300187612.jpg||||/UpFiles/Picture/admin/200910162300187612.jp ......
