请问能用delphi实现自动生成access数据库的功能吗??

Question

做一个监控的软件把每天生成的数据自动生成数据库可是很多书都是讲的怎么维护已经建好的数据库可以编程使每天的数据自动生成access数据库吗？？？谢谢指点

Answer 1

以下代码生成access数据库
  //首先应该在user部分引入ComObj 单元，才能调用CreateOleObject函数
var
  createAccess:OleVariant; 
  filename:string;
begin
  filename:='c:\data\'+datetostr(now);   //得到当天日期生成文件名
  CreateAccess:=CreateOleObject('ADOX.Catalog');
  CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+filename);
end;