用ADO比较简单。在一个程序种用一个ADOConnection控件,此控件用来连接到SQL SERVER的数据库上;然后用ADODATASET或ADOQUERY等控件和直接相连,最后连接DBGRID就可以了。

解决方案 »

  1.   

    安装sqlserver客户端再在控制面板的bde Administrator内新建一个别名,类型mssql
    database name为数据库名,server name为服务器名,
    ok
      

  2.   

    先在ODBC设一别名,配置好与SQLSERVER2000的连接(如果不通把协议改为TCPIP),测试成功后在DELPHI里使用该别名连接(要用到BDE),DELPHI5用ADO的话听说要装个ADO补丁。
      

  3.   

    belllab(bell),怕是不行吧?因为sql7.0不行呀
      

  4.   

      asl := Tstringlist.Create ;
      asl.Clear ;
      asl.Add ('Driver Name= MSSQL');
      asl.Add ('Server Name= ' + servername);
      asl.Add ('Database Name= ' + Databasename);
      asl.Add ('User Name= ' + Username);
      asl.Add ('sqlqrymode=local');  if not Session.IsAlias ('STJ') then
      begin
      try
        Session.AddAlias ('STJ','MSSQL',ASL);
      finally
       asl.Free ;
     end;
    end else if Session.IsAlias ('STJ') then
    begin
      try
        Session.ModifyAlias ('STJ',ASL);
      finally
        asl.Free ;
      end;
    end;with Datamodule.dataBase1 do
    begin
      iF Connected = true then
        Connected := false;
        aliasname := 'STJ';
        params.Clear ;
        params.Add ('server name=' + servername);
        params.Add ('database name=' + Databasename);
        params.Add ('user name=' + loginname);
        params.Add ('password=' + loginword);
        loginprompt := false;
        keepconnection := true;    try
          Connected := true;
        except
          application.MessageBox (pchar('无法启动数据库,请检查数据服务器是否已经启动!'),Pchar('错误'),mb_ok);
          application.Terminate ;
          exit;
        end;
    end;动态设置sql数据库别名、和连接数据库的例子