我想做个简单的程序,能在delphi中使用access数据库,但没找到怎用
解决方案 »
- 为什么把SQL SERVER的数据库记录都已经删除了,数据库文件的大小还没有变?
- 鼠标由箭头变成手形,或者变成I形的时候有什么方法可以监测到吗?
- 如何判断Tedit中的内容是否已经全部被选中(全部变蓝色)
- 分组报表统计功能怎样做,我出100分求助,用fastreport和rmreport两种报表都试过了
- 文本平滑滚动问题,巨难,愁死我了!!!Help,please!!!
- 能否在程序运行时,自动在SQL中创建数据库?????哪位有办法实现!!
- 如何用神龙三代的解压卡的音频输出取消原音?
- 考智力:
- 请laofeng(老封)或其他懂这方面的人帮忙(非常感谢)
- 请教teechart控件使用的怪问题
- 请教,怎么把参数传递到 应用服务器,谢谢
- ToolBar做MDI程序的主菜单,如何在子菜单中添加子窗口标题?
在connectstring中用jet4。0驱动连接数据库。
const
connStr ='Provider=%s;Data Provider=%s;Data Source=%s';
var
a,b,c :string;
begin
a :='MSDataShape.1' ;
b :='Microsoft.Jet.OLEDB.4.0' ;
OpenDialog1.Filter :='数据库文件 (*.MDB)|*.Mdb' ;
OpenDialog1.Execute ;
if OpenDialog1.FileName <>'' then
c := OpenDialog1.FileName ;
ADOConnection1.ConnectionString :=Format(Connstr,[a,b,c]);
end;