我知道有一个软件可以解开Access的密码,你可以访问这个http://www.lostpassword.com
解决方案 »
- 哪位达人有或哪里能下载到EhLib控件包里带有DBGridEh1.ShowSerialNo属性的控件包啊??
- 请问delphi中如何在一个form里调用另一个form的procedure
- 救命,用TADOQuery在Informix中增加记录时说表名不在数据库中!
- 请问这句话,如何翻译成英文 "为了表示一个字符的原来的意思,这个字符前面必须加上 \ ")
- 一大堆问题留给你,UP,GZ都有分
- 一个小问题,希望大侠们给予帮助!谢谢。一定给分
- 谁能告诉我什么是Indy,与Delphi的关系怎么样?我真的很想知道!!!
- 急求:FindNextPrinterChangeNotification的例子,
- 帮忙看看http://www.yuanzn.com/image/main.jpg上的工具栏用的是什么控件?
- 有关DrawAnimatedRects函数的用途
- 再次提问 请帮帮忙 好吗???
- 怎样使form在打开时才创建,而不是一运行程序就创建?
adoconnection1是Tadoconnection控件
adoconnection1.connectionstring:='Provider=Microsoft.Jet.OLEDB.4.0;Data '
+'Source='+od.filename+';Persist Security Info=false';
adoconnection1.open('','');//连接Access数据库
这里括号中第一个字符串指定用户名,第二个指定密码
Open a TADOConnection to a password protected Access97 file specified by FileName.
You must have the DSN "MS Access 97 Database".
This will be the case if you have Access97 installed, otherwise
you can make it in your ODBC settings. By E.J.Molendijk
}
procedure OpenADOConnection(
var MyCon : TADOConnection
FileName : String;
User,Pass: String ); const
DBConnectPrefix =
'Provider=MSDASQL.1;'+
'Persist Security Info=False;'+
'Connect Timeout=15;'+
'Extended Properties="'+
'DSN=MS Access 97 Database;'+
'DBQ=';
var
DBConnectionSuffix : String;begin
DBConnectionSuffix := ';'+
'DriverId=281;'+
'FIL=MS Access;'+
'MaxBufferSize=2048;'+
'PageTimeout=5;'+
'UID='+User+';'+
'PWD='+Pass+';'+
'";'+
'Locale Identifier=1043'; MyCon.ConnectionString := DBConnectPrefix + Path + DBConnectionSuffix;
MyCon.Open;
end;
不好意思~~不能够用TADOConnectionto:copy_paste(木石三)
只用access97~~
select * into newTable from oldTable
drop table oldTable