Datei prüfen auf einen Ubuntu Server prüfen

[Chemiker]

Hallo zusammen,

um festzustellen, ob eine Datei schon vorhanden ist, kann man das mit FileExists überprüfen.

Delphi-Quellcode:

if not FileExists (Path+Dateiname) then
   {lege die Datei an...

Gibt es die Möglichkeit von Delphi aus, eine Datei auf einen Ubuntu - Server zu überprüfen wenn diese schon vorhanden ist.
Es geht darum, auf einen Ubuntu - Server eine Firebird Datenbank anzulegen, wenn diese noch nicht vorhanden ist.

Bis bald Chemiker

[Maliko]

Liegt das Delphi-Programm auf dem Ubuntu-Server oder soll da via Remote geprüft werden?

[Chemiker]

Nein, ich lege mit einem Delphi - Programm eine neue DB auf einen Firebird - Server an, wenn diese noch nicht vorhanden ist.

Delphi-Quellcode:

begin
  if not FileExists(aServerName+':'+aDatenBankOrdner+aDatenbankName) then
  begin
    DB:= TIBCConnection.Create(NIL);
    try
      try
       DB.database := aDatenbankOrdner + aDatenbankName;
       DB.Server := aServerName;

Wenn die DB allerdings schon vorhanden ist würde ich das gerne vorher abfangen.

Bis bald Chemiker

[DeddyH]

Sofern der Firebird-Server auf dem Ubuntu-Server läuft, wäre es da nicht eleganter, dessen Metadaten abzufragen anstatt im Dateisystem zu suchen?

[Frickler]

Zitat von DeddyH:

Sofern der Firebird-Server auf dem Ubuntu-Server läuft, wäre es da nicht eleganter, dessen Metadaten abzufragen anstatt im Dateisystem zu suchen?

Das dürfte bei Firebird nicht gehen. Die Metadaten sind dort nur pro Datenbank abrufbar, nicht pro Server. Die einzigen datenbankunabhängigen Daten sind die User, und das auch nur bis Firebird 2.5. Ab 3.0 kann es mehrere Userdatenbanken geben. Man kann nur versuchen, die Datenbank zu öffnen. Schlägt das fehl, gibts die nicht.

[Klaus01]

.. wenn die db nicht in einem shared Verzeichnis liegt, dürft es schwierig sein dies von einem Windows_Rechner( Dein Programm) auf einem Ubuntu-Rechner (firebird) abzufragen.
Alternativ ginge noch die per ssh auf den Ubuntu-Rechner zu verbinden und dann über diese shell schauen ob die Datenbank auf dem Server schon vorhanden ist.

Grüße
Klaus

[peterbelow]

Zitat von Chemiker:

Hallo zusammen,

um festzustellen, ob eine Datei schon vorhanden ist, kann man das mit FileExists überprüfen.

Delphi-Quellcode:

if not FileExists (Path+Dateiname) then
   {lege die Datei an...

Gibt es die Möglichkeit von Delphi aus, eine Datei auf einen Ubuntu - Server zu überprüfen wenn diese schon vorhanden ist.
Es geht darum, auf einen Ubuntu - Server eine Firebird Datenbank anzulegen, wenn diese noch nicht vorhanden ist.

Bis bald Chemiker

Ist das Filesystem des Servers über das Netz von dem Rechner aus, auf dem das Delphi-Programm läuft, sichtbar, z. B. im Windows Explorer? Wenn nicht, kannst Du dich per WNetAddConnection2 an dem Server anmelden, um Zugriff auf das Dateisystem zu bekommen? Dazu muss der Server natürlich eine entsprechende Freigabe erteilt haben.

[jfheins]

Zitat von Chemiker:

Wenn die DB allerdings schon vorhanden ist würde ich das gerne vorher abfangen.

Bis bald Chemiker

Das macht ehrlicherweise wenig Sinn. Weil das Ergebnis (DB nicht vorhanden) könnte im nächsten Moment ja schon wieder obsolet sein. (Stell dir vor, jemand startet 2 Instanzen von einem Programm simultan indem er doppelt Enter drückt...)

Kannst du nicht einfach die DB anlegen und die Exception abfangen, falls die Datei schon existiert?