如何将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 在查询分析器里面 执行很正常
是 ......
我的数据库是简体sqlserver2000 ,我想在繁体access下连接,通过odbc是可以了,但在access下出现打开的表全中"#已删除"
不知道要怎么操作才可以用ACCESS繁体连接简体sqlserver2000.谢谢!!!
大家都 ......
表结构：
ProductSeriesID 自动编号
ProductSeriesName 文本
ProductSeriesRemark 备注
执行前
ProductSeriesID ProductSeriesName ProductSeriesRemark
2 LV铣刀系列 LV铣刀系列
3 钨钢舍 ......
数据库连接提示如下报错，看的出来是页面与数据库连接的问题，现在我的是相对连接。
要怎么将其该成绝对连接呢？我的数据库文件路径在：
D:\web\db
还是要先谢谢大人们帮助小白菜我
Microsoft O ......
在MSSQL中，我们可以一次查询多个数据表并加入到数据集中，中间只需用分号隔开．如：
＂select * from A;select * from B;select * from C＂,填充数据集后在DS中就有了三张表．
但在用同样的语句访问ACCESS数� ......
