Ado操作？

Question

使用RsAdoConn: TADOConnection;
    RsSet: TADODataSet;
    RsCommand: TADOCommand;
如何对SQlServer2000操作？

Answer 1

设置 RsAdoConn 的 ConnectionString
其他组件的Connection指向RsAdoConn即可
然后该干嘛干嘛

Answer 2

加入一条adocoonnect,选择属性connectstring,点击...按钮,自已可以去选择,太简单了

Answer 3

哦，我的问题太大了吧
具体点吧
procedure TForm1.FormCreate(Sender: TObject);
begin
   RsAdoConn.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=true;User ID=sa;Data Source=BITI-JJZHK;Initial Catalog=LiuXia;';
   if RsAdoConn.Connected = False then
      RsAdoconn.Open
   else
      begin
         RsAdoConn.Close;
         RsAdoConn.Open;
      end;
   RsSet.Connection := RsAdoConn;
   RsSet.Active := true;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
   sql : string;
begin
    sql := 'select * from UserLogin';
    RsSet.Recordset := RsAdoConn.Execute(sql);
    RsSet.Recordset.MoveFirst;
    application.MessageBox(PChar(RsSet.Recordset.RecordCount),PChar(Application.Title), MB_ICONINFORMATION);
end;
这段代码由问题吗？
我怎么样可以取出记录集中第一条记录的某个字段的值？

Answer 4

RsAdoConn 的 ConnectionString
然后其他的ado控件的connection 指向RsAdoConn