Question

Delphi中怎样用ADO链接sqlserver？具体点

Delphi中怎样用ADO链接sqlserver？具体点，易学好用的就好

Answer 1

你首选要在窗体上放置一个 TADOConnection控件，然后设置一下它的连接字符串ConnectionString。
TADOConnection.Close;
With TADOConnection do
ConnectionString:='Provider=SQLOLEDB.1;'
+ 'User ID=Sa;Password=;'
+ 'Integrated Security=SSPI;'
+ 'Persist Security Info=False;'
+ 'Initial Catalog=数据库名称;'
+ 'Data Source=服务器名称';
然后再在窗体上放置ADO控件，并设置它的Connection属性指向 TADOConnection，
这时就可以用ADO通过SQL语句对数据库进行操作了。
例：
TADOQuery.Connection:= TADOConnection;
TADOQuery.Close;
TADOQuery.SQL.Clear;
TADOQuery.SQL.Add('Select * from TempTable');
TADOQuery.Open;

Answer 2

1.添加ADOConnection1，在控件的connectionstring里编辑以下字段：
Provider=SQLOLEDB.1;Password=密码;Persist Security Info=True;User ID=用户名;Initial Catalog=资料库名称;Data Source=服务器IP
2.添加ADOQuery1，在控件connection属性里选择：ADOConnection1
3.往ADOQuery1中写入sql语句即可：
procedure Tform1.butn1Click(Sender: TObject);
var
tempQuery:string;
begin
tempQuery:=' select Price from price where where price>100 ';
with ADOQuery1 do
begin
close;
sql.Clear;
sql.Add(tempQuery);
OPEN;
End;
End;

Answer 3

CString:='Provider=SQLOLEDB.1;Auto Translate=false;Password=123;User ID=user;Initial Catalog=MyDatabaseName;Data Source=MyServerName';
//MS_dmfrm为TADOConnection组件
MS_dmfrm.DataBaseConnection.Connected:=false;
MS_dmfrm.DataBaseConnection.ConnectionString:=CString;
try
MS_dmfrm.DataBaseConnection.Connected:=true;
except
showmessage('与数据库服务器连接未成功，应用程序将自动关闭'+char(13)+'请重新配置!');
end;

Answer 4

AdoConnection, AdoQuery,AdoTable直接连接okay。

Answer 5

加上 ADOquery组件后
设置一下他的connectionstring属性就可以了
或者 把connection属性设置为ADOconnection1
（如果有ADOconnection1组件）