用代码连接到SQL数据库

Question

请问怎样用代码连接到SQL数据库上。目前的情况是，如果是在Win2K下，我须先访问一下SQL服务器，数据库连接才能正常使用，如果是在Win98下，我必须用SQL中数据库的用户名进入局域网，我才能正常使用数据库，也就是数据通讯端口不能自动打开。程序中我只是用控件连接数据库的。

Answer 1

连接数据库控件不管是什么方式（ADO,BDE),都有一个ConnectString 和 DataBase 属性，
你把他可以写在.ini 或.txt 文件中，在你的应用程序启动时，读入这两个字符串赋值给控件即可。

Answer 2

var password:string //密码
    servername:string//用户名
procedure TForm1.Button1Click(Sender:TObject);
begin
connected:=false;
connectionstring:='';
connectionstring:=  'Provider=SQLOLEDB.1;Password='+
                             password+';Persist Security Info=False;User ID=sa;'+
                             'Initial Catalog=master;Data Source='+servername;
connected:=true;
end;

Answer 3

我是用ADO连接的，现在的连接的内容都固定在控件内，想要最终解决的是我所描述有内容。

Answer 4

例如：edit1为密码，edit2为用户名 ， edit3为数据库名
connectionstring:=  'Provider=SQLOLEDB.1;Password='+edit1.text           +';Persist Security Info=False;User ID='+edit2.text+
';Initial Catalog=master;Data Source='+edit3.text;ADODatebase.Connectionstring:=connectionstring;try
{
   ADODatebase.open;
}
catch
{
 //can't open();
}