数据库：如何知道已经打开的DatabaseName

Fairton 2001-07-19 04:45:06

比如想创建一个Database , 其DatabaseName='db2000'
如何知道应用中是否已经有其他的Database连接其DatabaseName也等于'db2000'呢

请指教急!

{下面的代码是测试一个字符串是否是可用的BDE别名的，不能解决这个问题}
var session1:Tsession;
begin
session1:=Tsession.Create(self);
session1.SessionName:='fang';
if Session1.IsAlias('JF')=false then
//创建别名

...全文

93 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

Fairton 2001-07-20

打赏
举报

回复

TSession.FindDatabase
==>查找Session内部的数据库中有没有同名数据库

Session
==>Delphi给所有的使用Dbtables单元的应用程序使用的缺省TSession

可以解决我的问题了，多谢
<不要用自己创建的TSession包容TDatabase，否则上面的代码就无效果了>

guig 2001-07-19

打赏
举报

回复

用TSession的FindDatabase试试。
下面是个例子
function HasDataBase(const DatabaseName:string):Boolean;
begin
Result := Assigned(Session.FindDatabase(DatabaseName));//Session是DBTables内定义的全局变量
end;

Fairton 2001-07-19

打赏
举报

回复

Ahead

对于初学QT数据库操作的童鞋来说，一定有这么一丢丢的疑问，为何我们从来没有看见QSqlQuery在声明的时候或者实例化的时候与数据库进行关联呢？实际这是QT系统为我们提供的一个便利，如果我们仅仅只有一个连接，那么系统默认将QSqlQuery关联到了默认的唯一的数据库连接上了。也正因如此，我们遇上了QSqlQuery::exec: database not open的问题。也正因如此，我们QT中...

前面，写了一篇关于解决QSqlQuery::exec: database not open的博文，解决的方案是在QSqlQuery初始化的时候为其指定数据库。但我们明明链接好了唯一的数据库，为什么还要在这里为其指定数据库呢？这样太不方便了！这就失去了QSqlQuery的灵活性（相对QSqlQueryModel QSqlTableModel来说QSqlQuery的特点就是灵活）。在测试时发现如果数据库连接成功后，立即声明一个QSqlQuery而不为其指定数据库来初始化是可以正常操作数据库的。测试代码如下：

QSqlQuery::exec: database not open一、问题说明二、解决办法三、出现原因一、问题说明在使用自定义数据连接后，发生了数据库连接成功，但是查询失败 Succeed to connect local database. QSqlQuery::exec: database not open QSqlError("", "Driver not loaded", "Driver not loaded") 如下问题代码 QSqlDatabase::addDatabase("QSQL

今天写qt数据库操作的时候，发现了这个问题，之前是模仿QT官方例子的数据库打开方式，即 [cpp] view plain copy QSqlDatabase qdb; if(QSqlDatabase::contains("TEST")) qdb = QSqlDatabase::database("QSQLITE"); e

编译无问题，在执行时终端出现以下字母 QSqlDatabasePrivate::addDatabase: duplicate connection name 'qt_sql_default_connection', old connection removed. QSqlDatabasePrivate::addDatabase: duplicate connection name 'q

数据库相关

2,497

社区成员

88,445

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章