还是ADO连接数据库的问题

Question

ADOConnection1.close;
ADOConnection1.connectionstring:='Provider=SQLOLEDB.1; Password='+''''+trim(edit3.text)+''''+';Persist Security Info=False;User ID='+''''+trim(edit4.text)+''''+';Data Source='+trim(edit1.Text);
ADOConnection1.LoginPrompt:=false;
ADOConnection1.Open;
if ADOConnection1.connected then //判断数据库是否连接上。
begin
adoconnection1.Connected:=true;
application.MessageBox('连接数据库成功!你太牛B了','飞鸽传书!') ;
pagefrm.show;
loginfrm.Hide;
end;
except
application.MessageBox('数据库连接失败,请确认无误后重新尝试!','提示:')
end;
end;这样的方式 我录入相关信息就可以连接了。我想问下为什么'+''''+trim(edit3.text)+''''+' 两边要加'+'符号呢？
还有就是我如果把用户名和密码的edit参数去掉。换成实际的用户名和密码连接又不行了
公司用的是sql 2005.

Answer 1

还有就是我如果把用户名和密码的edit参数去掉。换成实际的用户名和密码连接又不行了
这个参数不能去

Answer 2

'Provider=SQLOLEDB.1; Password='
''''+trim(edit3.text)+''''
';Persist Security Info=False;User ID='
''''+trim(edit4.text)+''''
';Data Source='+trim(edit1.Text);這是把5段字符串用+號連接在一起再賦值給connectionstring
connectionstring結果是沒有引號的，所以可以去掉這些+號，好看些:
ADOConnection1.connectionstring:='Provider=SQLOLEDB.1; Password='+trim(edit3.text)+';Persist Security Info=False;User ID='+trim(edit4.text)+';Data Source='+trim(edit1.Text);
結果就像這樣了：
ADOConnection1.connectionstring:='Provider=SQLOLEDB.1; Password=1234;Persist Security Info=False;User ID=sa;Data Source=192.168.0.1';

Answer 3

+Quotedstr(trim(edit3.text))+这样就可以了，不要搞那么多点，眼睛都看花了

Answer 4

数据库连接字符串中的东西都是不用加引号的，所以也不需要quotedstr

Answer 5

ADOConnection1.close;
ADOConnection1.connectionstring:='Provider=SQLOLEDB.1; Password='+trim(edit3.text)+';Persist Security Info=False;User ID='+trim(edit4.text)+';Data Source='+trim(edit1.Text);''''+';Data Source='+trim(edit1.Text);
ADOConnection1.LoginPrompt:=false;
Try
  ADOConnection1.Open;
  application.MessageBox('连接数据库成功!你太牛B了','飞鸽传书!') ;
  pagefrm.show;
  loginfrm.Hide;
Except
  application.MessageBox('数据库连接失败,请确认无误后重新尝试!','提示:')
end

Answer 6

更正ADOConnection1.connectionstring:='Provider=SQLOLEDB.1; Password='+trim(edit3.text)+';Persist Security Info=False;User ID='+trim(edit4.text)+';Data Source='+trim(edit1.Text);'+';Data Source='+trim(edit1.Text);