怎样连接远程数据库?

Question

你是拨号还是通过internet上去啊？

Answer 1

  if rdbDatabase^.Connected then
    rdbDatabase^.Close;  if (gstDatabaseName = '')
    or (gstServerName = '')
    or (gstLogName = '') then
    begin
      fdbConnect := FALSE;
      Exit;
    end;  rdbDatabase^.KeepConnection := TRUE;
  rdbDatabase^.LoginPrompt := FALSE;
  rdbDatabase^.AliasName := '';
  rdbDatabase^.DriverName := 'MSSQL';
  rdbDatabase^.Params.Clear;
  rdbDatabase^.Params.Add ('DATABASE NAME=' + gstDatabaseName);
  rdbDatabase^.Params.Add ('SERVER NAME=' + gstServerName);
  rdbDatabase^.Params.Add ('USER NAME=' + gstLogName);
  rdbDatabase^.Params.Add ('APPLICATION NAME=' + strAppName);
  rdbDatabase^.Params.Add ('PASSWORD=' + gstLogPass);