使用Borland Delphi远程SQL查询到SQL Server 2005

Question

使用Borland Delphi远程执行SQL查询到SQL Server 2005的最简单方法是什么？

在这种情况下，我使用的是Borland Delphi 7。

最简单的方法是，如果我必须使用第三方组件，它应该集成在应用程序中（而不是单独/复杂的安装）。

问题是，我希望能够检查远程SQL服务器是否还活着。

我知道，我们可以使用网络“ping”，但这并不意味着SQL服务器完全可访问且功能正常。

提前感谢任何提示：）

Answer 1

最简单

1. 在表单上删除TADOQuery组件。
2. 填写connectionstring属性（或使用...构建按钮）。
3. 将您的SQL语句放入SQL属性。
4. 将您的组件Active属性设置为True。

更好

1. 使用TDatamodule。
2. 使用TADOConnection组件。
3. 将您的TADOQuery组件与TADOConnection组件相关联。
4. 在Designtime中需要时在运行时激活您的查询。在运行应用程序时，Designtime中的活动连接或查询通常最终会浪费CPU周期。

控制台应用程序

program SimpleSQL;

{$APPTYPE CONSOLE}

uses
  ADODB,
  SysUtils;

var
  qry: TADOQuery;
begin
  qry := TADOQuery.Create(nil);
  try
    qry.ConnectionString := 'AConnectionString';

    // Update
    qry.SQL.Text := 'UPDATE YourTable SET FieldX = FieldY';
    qry.ExecSQL;

    // Select
    qry.SQL.Text := 'SELECT FieldX FROM dbo.YourTable';
    qry.Open;
    qry.First;
    while not qry.Eof do
    begin
      Output(qry.Fields[0].AsString);
      qry.Next;
    end;
    qry.Close;    

  finally
    qry.Free;
  end;
end.