在use单元里手工添加adoconed单元.
定义全局变量
var connectionstring:Tstrings;
在formcreate事件里将它实例化.
connectionstring:Tstrings.create;
在button1的click事件里:
ADOConnection.Close;
ADOConnection.ConnectionString := ConnectionString.Text;
if EditConnectionString(ADOConnection) then
begin
ConnectionString.Text := ADOConnection.ConnectionString;
ConnectionStringClick(Sender);
end;
定义全局变量
var connectionstring:Tstrings;
在formcreate事件里将它实例化.
connectionstring:Tstrings.create;
在button1的click事件里:
ADOConnection.Close;
ADOConnection.ConnectionString := ConnectionString.Text;
if EditConnectionString(ADOConnection) then
begin
ConnectionString.Text := ADOConnection.ConnectionString;
ConnectionStringClick(Sender);
end;
//请问,这句是什么的点击事件。
在formcreate事件里将它实例化.
connectionstring:Tstrings.create;
在button1的click事件里:
ADOConnection.Close;
ADOConnection.ConnectionString := ConnectionString.Text;
if EditConnectionString(ADOConnection) then
begin
ConnectionString.Text := ADOConnection.ConnectionString;
ConnectionStringClick(Sender);
end;//请问这时的EditConnectionString(ADOConnection)是什么,是自己写的方法吗?
//还有ConnectionStringClick(Sender);是谁的事件,ConnectionString只是个TStrings类的实例,并没有事件啊!!!
//我很笨请您明示。。
在程序的user里面加入adodb
=========
对不起,我没说清楚,
使用ado连接,在连接字符串里面就可以看到源数据库的名称.
Provider=SQLOLEDB.1;Password=801006;Persist Security Info=True;User ID=sa;Initial Catalog=pubs;Data Source=211.68.40.95
其中pubs就是我所连接的数据库名称.