PB12怎样连接加密的SQLLite数据库
已知SQLlite的数据库名为aaa.db,密码为:ccss 请问怎样在PB12连接这个带密码的aaa.db
registryset("HKEY_LOCAL_MACHINE\software\odbc\ODBCINST.INI\SQLite3 ODBC Driver","Driver",regstring!,'c:sqlite3odbc.dll')
registryset("HKEY_LOCAL_MACHINE\software\odbc\ODBCINST.INI\SQLite3 ODBC Driver","Setup",regstring!,'c:sqlite3odbc.dll')
registryset("HKEY_LOCAL_MACHINE\software\odbc\ODBCINST.INI\SQLite3 ODBC Driver","UsageCount",ReguLong! ,1)
registryset("HKEY_LOCAL_MACHINE\software\odbc\ODBCINST.INI\ODBC Drivers","SQLite3 ODBC Driver",regstring!,'Installed')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\ODBC Data Sources","aaa",regstring!,'SQLite3 ODBC Driver')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","Database",regstring!,'c:\aaa.db')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","Description",regstring!,'')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","Driver",regstring!,'c:sqlite3odbc.dll')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","LoadExt",regstring!,'')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","LongNames",regstring!,'0')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","NoCreat",regstring!,'0')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","NoTXN",regstring!,'0')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","NoWCHAR",regstring!,'1')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","ShortNames",regstring!,'0')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","StepAPI",regstring!,'0')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","SyncPragma",regstring!,'NORMAL')
registryset("HKEY_CURRENT_USER\software\odbc\ODBC.INI\sqws","Timeout",regstring!,'100000')
ls_database ='c:\aaa.db'
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = true
SQLCA.DBParm = "ConnectString='DSN=aaa;database="+ls_database+";PWD=ccss'"
以上方法我已经试过,不行。
请高手赐教!