prüfen ob eine db existiert

[strom]

Hallo,

möchte über die Komponente "myscript" prüfen,
ob eine Database 'hardware' existiert.

wie könnte so ein Beispiel aussehen?

Delphi-Quellcode:

begin
  if  myscript.SQL.Text:= Format ('SELECT Database',['hardware'])???? then  // dies soll nur eine Richtung darstellen 
   begin

   end;
end;

[vagtler]

http://lmgtfy.com/?q=mariadb+check+database+exists

[Aviator]

Wie sieht es hiermit aus? Gefunden nach 30 Sekunden googeln. Solltest du auch mal versuchen. :stupid:

[strom]

hey,

habe auch schon einiges gelesen, aber leider ohne Erfolg.:?

Delphi-Quellcode:

if  myscript.SQL.Text:= Format ('CREATE DATABASE IF NOT EXISTS', ['hardware']) = true then

[vagtler]

Vielleicht solltest Du Dich erst einmal mit den Grundlagen der Programmierung mit Object Pascal beschäftigen?

Der Compiler gibt Dir bei Deinem merkwürdigen Konstrukt übrigens durchaus konstruktive Hinweise.

[Sir Rufo]

Da fehlen Grundlagen und Basics bei dir.

Jeder mit ein wenig Grundlagenkenntnis sieht auf einen Blick, dass dein Code nicht funktionieren kann.

[strom]

das ist Richtig!

leider habe ich nicht soviel Zeit!
wie sieht die Musterlösung aus?

Delphi-Quellcode:

if (myscript.SQL.Text:= SELECT * FROM sys.databases WHERE name = 'test') then

ist das schon besser aus?

[redox]

Zitat:

Zitat von strom (Beitrag 1302797)

das ist Richtig!

leider habe ich nicht soviel Zeit!
wie sieht die Musterlösung aus?

Wie wäre es denn mit PowerPoint statt Delphi?

[Klicken Sie hier, um...]

:thumb:

[Bernhard Geyer]

Zitat:

Zitat von strom (Beitrag 1302797)

leider habe ich nicht soviel Zeit!

Falsche Antwort. Wenn du willst das dir Helfen solltest du dir Zeit nehmen.
Ansonsten: Für ein entsprechenden Stundenlohn nehme ich mir ganz Persönlich Zeit deine Problem zu lösen


Und es gibt keine 100%ig Musterlösung. Solange du keine Rechte auf der Datenbank hast um abzufragen ob es die Datenbank gibt kannst du nicht feststellen ob es die Datenbank gibt.

[strom]

habe es jetzt mit einer Query versucht!

Delphi-Quellcode:

begin
 QueryDB.Sql.Text:='select * from test'; // Tabelle "test" ist nicht vorhanden!
 QueryDB.Open;
if not (QueryDB.Eof) then // was bedeutet Eof ??
 begin
 ShowMessage('Test'); // Wieso wird diese Meldung nicht angezeigt?
 QueryDB.Close;
 end else begin
   ShowMessage('112');
   QueryDB.Close;
end;

Danke für die Hilfe :o