如何动态连接不同的数据库(100分)

  • 主题发起人 主题发起人 ZENGWEI_74
  • 开始时间 开始时间
Z

ZENGWEI_74

Unregistered / Unconfirmed
GUEST, unregistred user!
应用服务器采用ADO+DCOM+SQL 2000
客户端要求连接不同的数据库(数据库中的结构相同)
如在不同的客户连接应用服务器变更数据库联接后,应用服务器报错,
如何解决?
 
将不同的udl文件 动态设置给 AdoConnection.connectionString,不就可以嘛。
 
给你写一段吧!
var s: string
.....................
//根据不同的SQLSERVER实例名、数据库名用户名和密码来动态地决定连接字符串
s := 'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=';
s := s + '用户名' + ';pwd=' + '密码' + ';Initial Catalog=';
s := s + '数据库名' + ';Data Source=' + 'SQLSERVER服务器名';


try
adoconnection1.ConnectionString := s;
adoconnection1.Open;
except
showmessage('连接数据库失败!')
end;
 
在C/S可以,三层中应用服务器层不行
 
连接数据库其实也不过是系统安装后第一次使用时的事情,没有特殊原因是不会多做的,还不如设一个INI文件来存连接字符串,另外呢,设一个功能项来调出连接数据库的属性框
设好后将连接字串保存在INI文件中,以后每次运行时读INI文件来进行连接好了,你认为呢?
 
liwens的方法在c/s下可以。app2001的方法可以,不过要加密
 
需要多帐套,所以要设置多个数据库,动态连接,请问如何在应用服务器层设置
 
s := PromptDataSource(self.Handle, '');
 
后退
顶部