动态的连接到数据库的方法
2008-05-01 02:48
357 查看
动态的连接到数据库的方法:
这里我们创建一个后缀为Ini的文件system.ini,在system.Ini文件中写入如下代码:
[DBMS_PROFILES]
CURRENT=ODBC
PROFILES=
[Profile ]
DBMS=
Database=
UserId=
DatabasePassword=
LogPassword=
ServerName=
LogId=
Lock=
DbParm=ConnectString='DSN=ora8;UID=;PWD=' //ora8指数据库服务器名
Prompt=0
AutoCommit=0
这样在应用程序的open事件中写入下代码:
string ls_inifile
ls_inifile = "system.ini"
// Profile system
SQLCA.DBMS =ProfileString(ls_inifile,"Database", "DBMS", "")
SQLCA.database =ProfileString(ls_inifile,"Database", "database", "")
SQLCA.userid =ProfileString(ls_inifile,"Database", "userid", "")
SQLCA.dbpass =ProfileString(ls_inifile,"Database", "dbpass", "")
SQLCA.LogId =ProfileString(ls_inifile,"Database", "LogId", "")
SQLCA.LogPass =ProfileString(ls_inifile,"Database", "LogPassWord","")
SQLCA.ServerName =ProfileString(ls_inifile,"Database", "ServerName" ,"")
SQLCA.DBParm =ProfileString(ls_inifile,"Database", "DBParm", "")
Connect using sqlca;
open(w_frame)
If sqlca.sqlcode<>0 then
Messagebox("不能连接到数据库",Sqlca.sqlerrtext)
return
end if
这里我们创建一个后缀为Ini的文件system.ini,在system.Ini文件中写入如下代码:
[DBMS_PROFILES]
CURRENT=ODBC
PROFILES=
[Profile ]
DBMS=
Database=
UserId=
DatabasePassword=
LogPassword=
ServerName=
LogId=
Lock=
DbParm=ConnectString='DSN=ora8;UID=;PWD=' //ora8指数据库服务器名
Prompt=0
AutoCommit=0
这样在应用程序的open事件中写入下代码:
string ls_inifile
ls_inifile = "system.ini"
// Profile system
SQLCA.DBMS =ProfileString(ls_inifile,"Database", "DBMS", "")
SQLCA.database =ProfileString(ls_inifile,"Database", "database", "")
SQLCA.userid =ProfileString(ls_inifile,"Database", "userid", "")
SQLCA.dbpass =ProfileString(ls_inifile,"Database", "dbpass", "")
SQLCA.LogId =ProfileString(ls_inifile,"Database", "LogId", "")
SQLCA.LogPass =ProfileString(ls_inifile,"Database", "LogPassWord","")
SQLCA.ServerName =ProfileString(ls_inifile,"Database", "ServerName" ,"")
SQLCA.DBParm =ProfileString(ls_inifile,"Database", "DBParm", "")
Connect using sqlca;
open(w_frame)
If sqlca.sqlcode<>0 then
Messagebox("不能连接到数据库",Sqlca.sqlerrtext)
return
end if
*****代码测试通过Pb8.0
相关文章推荐
- 动态的连接到数据库的方法
- 利用SQLConnection动态连接数据库的方法
- 动态修改Web.config中数据库连接字符串的方法
- 一种利用ajax js与php实现数据库动态查询的方法
- 相关的连接与操纵数据库的编程方法之ADO连接access数据库
- solr搜索引擎框架搭建,建立多核(多core),与数据库连接,案例分析及动态配置数据库
- 无法连接到 SQL Server 数据库 的解决方法
- QTP连接数据库解决方法
- JDBC 连接各种数据库方法
- mysql 远程连接数据库的二种方法
- c#连接各种数据库的方法
- JDBC连接各种数据库方法
- ArcSDE数据库连接方法
- PHP5中使用PDO连接数据库的方法
- ASP常用数据库连接及操作的方法和技巧
- PHP连接数据库代码方法
- VC中连接mdb数据库及其数据读取方法
- php连接数据库读取数据并输入到页面中的3种方法。
- ORA-00257归档日志写满的解决方法 背景: 在前一篇博客中我们提到了如何启动或关闭oracle的归档(ARCHIVELOG)模式,在我成功设定数据库为归档模式以后, 第二天再次尝试连接数据库,
- Castle ActiveRecord 使用动态填写参数方式配置数据库连接