delphi中ADOQuery连接数据库做登陆界面,帐号密码是怎么设置的?

账号和密码是数据库定义。ADOquery是delphi带的连接数据库的组件。就算你连接access也是一样。密码和账户就在access里面定义。adoquery起一个连接数据库的作用。而验证你的账户和密码就需要在delphi里面写代码了。

Source:='Provider=Microsoft.Jet.OLEDB.4.0Data Source=ku.mdb'User Id=xxxPassWord = 123456 CreateDB:=CreateOleObject('ADOX.Catalog')

若是不行，看看下面：

加了密码的Access数据库连接字符串如何设置？

2007年03月30日 星期五 13:49

Access数据库在一些小的系统程序中经常用到，为了给数据库中的信息增加一些安全性，最简单的方法就是给Access文件加上密码（当然也可以将数据库中的数据进行加密后在存放到文件里来保护数据，只不过这种方法需要在程序中考虑加密和解密的问题），那针对有密码的文件通过数据库连接字符串来进行连接访问呢？下面是我在网络上找到的一些解决方案。收集起来以备后用。

access数据库加密分3种

以下以access xp为例

1、工具 ->安全->加密/解密数据库，打开时无需任何更改

2、工具 ->安全->设置数据库密码，打开密码为 1 打开时需要使用

"Provider=Microsoft.Jet.OLEDB.4.0Data Source=c:\1.mdbUser ID=adminPassword=Jet OLEDB:Database Password=1"

也可以用

"Provider=Microsoft.Jet.OLEDB.4.0Data Source=c:\1.mdbUser ID='admin'Password=Jet OLEDB:Database Password='1'"

3、工具 ->安全->用户组与权限 .... ，用户名为 admin 密码为 rr 用户组文件为 c:\system.mdw，打开时需要使用

"Provider=Microsoft.Jet.OLEDB.4.0Data Source=c:\1.mdbUser ID=adminPassword=rrJet OLEDB:Database Password=1Jet OLEDB:System database=c:\system.mdw"

也可以用

"Provider=Microsoft.Jet.OLEDB.4.0Data Source=c:\1.mdbUser ID='admin'Password='rr'Jet OLEDB:Database Password='1'Jet OLEDB:System database=c:\system.mdw"

如果在局域网上共享访问数据库，只要将绝对路径更改为 "\\计算机名\共享目录名\文件名.MDB" 即可，比如

"Provider=Microsoft.Jet.OLEDB.4.0Data Source=\\access911\floder1\1.mdbUser ID='admin'Password='rr'Jet OLEDB:Database Password='1'Jet OLEDB:System database=\\access911\floder1\system.mdw"

直接在连接字串里面定义 MODE 属性达到独占/公享等目的也是可以的，比如：

JetOLEDB:GlobalPartialBulkOps=2JetOLEDB:RegistryPath=JetOLEDB:DatabaseLockingMode=1JetOLEDB:DatabasePassword=DataSource=D:\db.mdbPassword=JetOLEDB:EngineType=5JetOLEDB:GlobalBulkTransactions=1Provider=Microsoft.Jet.OLEDB.4.0JetOLEDB:Systemdatabase=JetOLEDB:SFP=FalseExtendedProperties=Mode=ShareDenyNoneJetOLEDB:NewDatabasePassword=JetOLEDB:CreateSystemDatabase=FalseJetOLEDB:Don'tCopyLocaleonCompact=FalseJetOLEDB:CompactWithoutReplicaRepair=FalseUserID=AdminJetOLEDB:EncryptDatabase=False

注意：Access 2007 在数据格式上有了很大变化，因此数据提供者已经不是 jet db 4.0 了，Microsoft.ACE.OLEDB.12.0 才是 *.accdb 的数据提供者。

Provider=Microsoft.ACE.OLEDB.12.0User ID=AdminData Source=C:\Documents and Settings\chenge\My Documents\数据库1.accdbMode=Share Deny Read|Share Deny WriteExtended Properties=""Jet OLEDB:System database=C:\Documents and Settings\chenge\Application Data\Microsoft\Access\System.mdwJet OLEDB:Registry Path=Software\Microsoft\Office\12.0\Access\Access Connectivity EngineJet OLEDB:Database Password=""Jet OLEDB:Engine Type=6Jet OLEDB:Database Locking Mode=0Jet OLEDB:Global Partial Bulk Ops=2Jet OLEDB:Global Bulk Transactions=1Jet OLEDB:New Database Password=""Jet OLEDB:Create System Database=FalseJet OLEDB:Encrypt Database=FalseJet OLEDB:Don't Copy Locale on Compact=FalseJet OLEDB:Compact Without Replica Repair=FalseJet OLEDB:SFP=FalseJet OLEDB:Support Complex Data=True

---