使用 Borland Delphi 远程查询 SQL Server 2005

Question

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

在本例中，我使用的是 Borland Delphi 7。

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

问题是，我希望能够检查远程 SQL 服务器是否处于活动状态。

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

提前感谢任何提示:)

Answer 1

最简单

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

更好

1. 使用TDatamodule。
2. 使用TADOConnection 组件。
3. 将您的TADOQuery 组件链接到TADOConnection 组件。
4. 在设计时需要 io 时在运行时激活您的查询。运行应用程序时，设计时的活动连接或查询通常最终会浪费 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.