delphi如何连接access库????
解决方案 »
- delphi7中string的长度不够怎么办?
- RMReport打印统计问题
- 关于dbgrid 的书签
- Word中合并单元格后单元格访问的问题
- 请问。NET2003 装第一张出现文件读不出怎么办?
- 如何将一个字符转换成integer型?
- 根据数据库表生成form
- 救命啊,我在改了数据库的表结构后,就打不开程序的数据模块了??解决了马上给分
- 我在建立一個項目組,並且保存為Projectgroup1後,在打開為什麼會變化呢?
- 各位大虾,救命啊!我在配置bde的时候发现不知道用户名和密码,Access2000的有人知道吗?
- table中,怎么才能在表的最前面添加数据?非要用算法来实现吗?由现成的函数吗?
- ,,,,,,,,,哪有delphi8下载?,,,,,,,,,,,,,
1。双击,根据向导选择 驱动环境-〉选择数据库
2。Code:ADO连接有密码的Access数据库:
ADOConn.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(Application.ExeName)+'Data\data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=12345';
下一步选数据库,然后测试,成功后,就OK了
//* 连接数据库
//* INI参数变量说明
//* mcb_addr :服务器地址
//* mcb_user :数据库用户名;
//* mcb_pwd :密码;
//* mcb_DBName:数据库名;Function ConnectDB:boolean;
var
f:Tinifile;//INI文件
iSection:string;
DBPath:string;
begin
//初始化数据库连接--ACCESS版本
DBPath:=EXTRACTFILEPATH(PARAMSTR(0));
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";';
ADOConnection1.ConnectionString:=ADOConnection1.ConnectionString+'Data Source='+DBPath+'\yourDB.mdb;';
ADOConnection1.ConnectionString:=ADOConnection1.ConnectionString+'Persist Security Info=True';
呵呵,OK?
ADOConn.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(Application.ExeName)+'Data\data.mdb;Persist Security Info=False;';