把数据库连接做成DLL,如何实现(50分)

A

anchony

Unregistered / Unconfirmed
GUEST, unregistred user!
adoconn.ConnectionString:='Provider=SQLOLEDB.1;Password=123456;'+<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'User ID=sa;Initial Catalog=ecp888;Data Source=10.10.1.9';<br>把这个连接做成一个dll文件,然后在项目中调用这个连接打开或处理数据表。
 
在DLL里写一个函数,然后调用DLL里的函数返回你要的值即可。<br>Function GetConnStr: PChar; Stdcall;<br><br>Function GetConnStr: PChar;<br>Begin<br>&nbsp; result := PChar(''Provider=SQLOLEDB.1;Password=123456;'User ID=sa;Initial Catalog=ecp888;Data Source=10.10.1.9');<br>End;
 
人要的是返回连接,又不是字符,可以是可以的,返回对象吧,但是不是标准类型,别的语言里面无法call
 
根据adoconn对象属性,返回一系列数组也行。<br>如果返回对象,在其它的语言调用时可能不识别adoconn对象。如果只用DELPHI调用应该没有问题。
 
直接用一个udl文件不就可以了,试//
 
用bpl而不是dll
 
直接用一个udl文件不就可以了,这个方法可以使用,我在VC和DELPHI中都使用过,把连接字符串写在txt文件中。然后把文件名称改为自己要求的文件名,扩展名为udl,就可以了
 

Similar threads

顶部