一个连接数据库的问题

Question

各位高手请帮忙想一下如何通过一个文本框来输入一个数据库名称，从而使用ADOConnection控件动态的来连接指定的数据库？多多帮忙！谢谢

Answer 1

Connstr:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False';
  AdoConnection1.ConnectionString:=Format(Connstr,[Edit1.Text]));

Answer 2

Connstr:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False';
  AdoConnection1.ConnectionString:=Format(Connstr,[Edit1.Text]));
  AdoConnection1.Open;

Answer 3

S:='Provider=SQLOLEDB.1;Password='+RzEdit3.Text+';Persist Security Info=True;User ID='+RzEdit2.Text+';Initial Catalog=数据库名;Connect Timeout=10;Data Source='+RzEdit1.Text;
   ADOConnection1.Close;
   ADOConnection1.ConnectionString:=S;
   ADOConnection1.Open;

Answer 4

我写了一个程序，通过combobox来选择sql server中的数据库中的所有表名后，让adotable的tablename指向或者让adoquery直接操作combobox中的任何表名；如果这个程序对你有帮助，请联系我
[email protected]

Answer 5

Connstr:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False';
  AdoConnection1.ConnectionString:=Format(Connstr,[Edit1.Text]));
  AdoConnection1.Open;