Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Datenbank GDB prüfen ob vorhanden (https://www.delphipraxis.net/201569-datenbank-gdb-pruefen-ob-vorhanden.html)

Trafel21 2. Aug 2019 09:51

Datenbank: firebird • Version: 2.5 • Zugriff über: Delphi XE

Datenbank GDB prüfen ob vorhanden
 
Hallo zusammen,

ich hab eine DB.GDB in meinem C Ordner.

Ich möchte eigentlich nur prüfen (ohne Dataset) ob ich auf die Datenbank zugreifen kann.

sowas wie checkconnection('127.0.0.0:C:\IB\BTC.GDB') was ein boolean zurückgibt. Ist sowas möglich?

Neumann 2. Aug 2019 09:59

AW: Datenbank GDB prüfen ob vorhanden
 
Flamerobin
IBExpert
DBeaver

mit den Programmen kann man auf Firebird Datenbanken zugreifen. Firbird selber muss natürlich in der passenden Version laufen.

Ansonsten selber ein kleines Programm schreiben

Trafel21 2. Aug 2019 10:00

AW: Datenbank GDB prüfen ob vorhanden
 
Zitat:

Zitat von Neumann (Beitrag 1438958)
Flamerobin
IBExpert
DBeaver

mit den Programmen kann man auf Firebird Datenbanken zugreifen. Firbird selber muss natürlich in der passenden Version laufen.

Ansonsten selber ein kleines Programm schreiben

IBExpert. Ich wollte es im Delphi testen. Ich möchte ja nur überprüfen ob an der Stelle die GDB ist, brauch man dafür ein seperates Programm?

Klaus01 2. Aug 2019 10:04

AW: Datenbank GDB prüfen ob vorhanden
 
.. wenn Du nur auf Vorhandensein der Datei prüfen willst, das kanst Du mit Delphi Boardmitteln erschlagen.
-> system.sysutils.fileexists

Grüße
Klaus

haentschman 2. Aug 2019 10:04

AW: Datenbank GDB prüfen ob vorhanden
 
Delphi-Quellcode:
TFile.Exists
...so verstehe ich das. :gruebel:

Delphi.Narium 2. Aug 2019 10:05

AW: Datenbank GDB prüfen ob vorhanden
 
Für den Zugriff auf FireBird nutzte ich die Zeos-Komponenten.
Da gibt es u. a. die Komponenten TZConnection. Die bekommt die Angaben zur Datenbankdatei und mit Connected := True wird eine Datenbankverbindung hergestellt. Wenn das scheitert, ist keine Verbindung möglich. Man braucht also kein DataSet für irgendeine Abfrage.

Das kapselt man sich in 'ner Funktion, die als Rückgabewert den Wert der Eigenschaft Connected hat und schon ist die entsprechende Prüfroutine checkconnection erstellt.

Bei anderen Kompontensammlungen gibt es bestimmt entsprechende Alternativen.

Wenn es darum geht, dass eine Datei an einer bestimmte Stelle liegen soll, wenn es nur um die pure Existenzprüfung auf das Vorhandensein der Datenbankdatei geht: FileExists('C:\IB\BTC.GDB')?

Frickler 5. Aug 2019 09:40

AW: Datenbank GDB prüfen ob vorhanden
 
Zitat:

Zitat von haentschman (Beitrag 1438961)
Delphi-Quellcode:
TFile.Exists
...so verstehe ich das. :gruebel:

Wobei dann TFile.Exists() auch nur aus dem Aufruf von System.SysUtils.FileExists() besteht.... dafür ziehe mich mir aber ne Bibliothek mit in die Units, die mein Programm weiter aufbläht.

hoika 5. Aug 2019 14:35

AW: Datenbank GDB prüfen ob vorhanden
 
Hallo,
bei TZConnection muss man nur aufpassen,
das auf dem Server (und ja, wir reden hier nicht mehr von lokaler DB) und dem jeweiligen Client-Rechner
der Port 3050 geöffnet ist.

Sonst schlägt das Connect fehl, obwohl die DB eventuell doch vorhanden ist.


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:50 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz