Einzelnen Beitrag anzeigen

bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.138 Beiträge
 
Delphi 11 Alexandria
 
#1

prüfen ob Datenbank vorhanden ist

  Alt 22. Mär 2015, 11:05
Datenbank: MSSQL • Version: 12 • Zugriff über: ADO
ich möchte prüfen ob eine DB auf meinem Server vorhanden ist, nur stimmt mein SQL Statement leider nicht. Wo liegt denn hier der Fehler ???


Delphi-Quellcode:
  try
    aConnection := TADOConnection.Create(nil);
    aConnection.Connected := False;
    aConnection.LoginPrompt := False;
    
    ....
 
    aLocalQuery := TADOQuery.Create(nil);
    aLocalQuery.Connection := aConnection;

    sqlStr := 'select * from master.dbo.sysdatabases where name=' + aDatabaseName ;

    aLocalQuery.sql.add (sqlStr);
    aLocalQuery.Open;

    if aLocalQuery.RecordCount=0 then
            result := false
            else
            result := true;

  finally
    aConnection.Free;
    aLocalQuery.Free;
  end;

Fehlermeldung : Syntaxfehler bei 'aDatabasename'
  Mit Zitat antworten Zitat