如何将Excel数据导入Access数据库? 给一段代码
如何将Excel数据导入Access数据库?,
表名:crk
不顶不行
excel可以直接作为数据库操作
使用ADO然后搞进去
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)]);
ADOConn.Connected := True;
except
Application.MessageBox('数据库连接出错！ ', '提示信息', MB_OK or MB_ICONERROR);
Abort;
end;
OpenDialog1.DefaultExt := 'xls';
OpenDialog1.Filter := 'Excel File|*.xls';
OpenDialog1.InitialDir := ExtractFilePath(Application.ExeName);
if OpenDialog1.Execute then
begin
ADOCommand1.ConnectionString := Format(SExcelText, [
相关问答：
access 中执行sql update语句时有时候成功有时候不成功，但是access中不出错误信息，不知道是什么原因，有哪位大侠知道，请帮忙啊
贴SQL语句，检查表、字段的有效性设置
sql 在查询分析器里面 执行很正常
是 ......
access数据库，直接使用 select 字段 from 表 读取数据
然后在页面中使用Repeater来显示
这张表有2000条数据，所以页面打开的很慢
请教各位朋友，有没有办法解决，提高点速度！
一次全部读完 ......
这两天学习《Delphi技术方案宝典》一书中第三章关于用户登录方案的例子，利用的是SQl Server数据库实现用户登录，编译运行都没问题，该实现的功能也都实现的很好，但是奇怪的是，反复运行一段时间后，有时在关闭整个 ......
它的定义是这样的
_CRTIMP __checkReturn int __cdecl _access(__in_z const char * _Filename, __in int _AccessMode);
大哥，看个函数声明就能看出他干啥的？
从命名来看应该是判� ......
