Forum: Datenbanken
by Panschi,
28. Sep 2011
jop, so klappt diese Variante dann auch :thumb:
Forum: Datenbanken
by Panschi,
28. Sep 2011
das Orginal is "WS-200-02\SQLEXPRESS"
Bei meiner Methode erscheint:"WS-200-02\SQLEXPRESS"
Bei deiner Methode erscheint:"S-200-02\SQLEXPRESS"
Forum: Datenbanken
by Panschi,
28. Sep 2011
Funktionert soweit einwandfrei, jedoch fängt er ein Zeichen weiter an als er soll!
Forum: Datenbanken
by Panschi,
28. Sep 2011
aber ein string ist doch nullterminiert, von daher wäre das letzte Zeichen eines 10-Zeichen langen strings das Zeichen mit dem Index 9!
Forum: Datenbanken
by Panschi,
28. Sep 2011
Es klappt und es ist mit DeddyHs Idee sogar kürzer und einfacher :-D
Vielen dank :thumb:
Hier mein Quelltext:
procedure TFMain.ServerNamen(const Con: TADOConnection);
var Verbindung: string;
i: Integer;
Forum: Datenbanken
by Panschi,
28. Sep 2011
wenn das so wäre, dann müsste ich tatsächlich nach "Data Source=...;" suchen. Ich greife auf einen Server zu, den ich auf dem gleichen Rechner starte. hmm...
Dann müsste ich ja theoretisch den Connectionsstring in ;...; bröckenchen in ein Array schreiben und dann die ersten 12 Buchstaben mit "Data Source=" vergleichen.
Ich gebe mich mal dran, dann ist man auf jedenfall auf der sicheren Seite
Forum: Datenbanken
by Panschi,
28. Sep 2011
Hab den Fehler gefunden :-D Das Problem war die Copy Funktion. Habe gedacht, dass man den string angibt den anfangspunkt und den endpunkt, aber man muss ja den string, den anfangspunkt und die Länge des stringteiles angeben :oops:
Hier mein verbesserter Code, falls jemand ähnliches irgenwann, irgendwie, irgendwo benötigt:
procedure TFMain.ServerNamen(const Con: TADOConnection);
var...
Forum: Datenbanken
by Panschi,
28. Sep 2011
@DeddyH: das probiere ich ja in etwa. Ich weiß, dass im connectionstring der teil den ich haben will zwischen dem 4. und dem 5. Semikolon steht. Deswegen setze ich den "start" an die Position hinter dem 4. und das "ende" vor das 5.. Dann wird in diesem eingegrenzten Stück nach dem '=' gesucht, denn es steht ja immer Data Source=... und der Start-Wert wird hinter das '=' verschoben... also habe...
Forum: Datenbanken
by Panschi,
28. Sep 2011
habe jetzt eine Prozedur geschrieben, welche den Data Source Teil, welcher sich im Connection string zwischen dem 4. und dem 5. ";" befindet, rauskopiert. Der resultierende String fängt an der richtigen Stelle an, endet aber zu weit hinten :?
Hier mein bisheriger quelltext:
procedure TFMain.ServerNamen(const Con: TADOConnection);
var Verbindung: string;
i, u: Integer;
Start,...
Forum: Datenbanken
by Panschi,
28. Sep 2011
stimmt... dann baue ich jetzt mal ne Funktion um nur den Servernamen rauszufiltern
Forum: Datenbanken
by Panschi,
28. Sep 2011
Wie der Titel schon beschreibt baue ich eine Verbidung mit einem Server auf und wähle eine Datenbank aus, welche dann im späteren Verlauf des Programmes noch bearbeitet wird etc... Jedoch würde ich zur Übersicht gerne einen "Infokasten" einfügen in dem der Servername und die angewählte Datenbank stehen. Wie ich den Namen der Datenbank herausbekomme ist kein Problem,...