AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Zugriff auf ADS Server
Thema durchsuchen
Ansicht
Themen-Optionen

Zugriff auf ADS Server

Ein Thema von haentschman · begonnen am 17. Aug 2023 · letzter Beitrag vom 24. Aug 2023
Antwort Antwort
Seite 2 von 3     12 3      
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
677 Beiträge
 
Delphi 10.3 Rio
 
#11

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 09:53
Dann probier es mal so:
Delphi-Quellcode:
//units:
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error,
  FireDAC.UI.Intf, FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Stan.Pool, FireDAC.Stan.Async, FireDAC.Phys,
  FireDAC.Phys.ADS, FireDAC.Phys.ADSDef, FireDAC.VCLUI.Wait, FireDAC.Stan.Param, FireDAC.DatS, FireDAC.DApt.Intf,
  FireDAC.DApt, FireDAC.Comp.DataSet, FireDAC.Comp.Client,
  FireDAC.Phys.ADSWrapper, FireDAC.Comp.UI

// code:
con1.DriverName := 'ADS';
TFDPhysADSConnectionDefParams(con1.Params).ServerTypes := stRemote;
con1.Params.DataBase := '\\Db2\data\xxx.add';
//con1.Params.DataBase := '\\Db2:6262\data\xxx.add'; <-- alternativ mit port
con1.Params.Username := 'xxx';
con1.Params.Password := 'xxx';

con1.LoginPrompt := false;

con1.Connected := true;
Keine Angaben als Strings, keine weiteren Angaben.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#12

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 11:02
Danke...

...the same. Selbst wenn ich die Database weglasse!


Ich mache jetzt mal einen Supportfall auf.
Miniaturansicht angehängter Grafiken
ads.png  

Geändert von haentschman (18. Aug 2023 um 11:07 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
677 Beiträge
 
Delphi 10.3 Rio
 
#13

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 14:42
Ich erinnere mich das ich Anfangs auch Probleme hatte.
Allerdings finde ich keine Doku dazu, also war es entweder unfug und hatte nichts damit zu tuen oder da fehlt was in der Doku. Ich schau mal nach, kann dir aber nicht sagen wann ich dazu eine Info habe.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
679 Beiträge
 
Delphi 12 Athens
 
#14

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 14:57
Wenn es mit dem ARC auf der Maschine geht:
Suche in der ADS Hilfe nach "ads.ini File Support"
Abschnitt Windows
Zitat:
In order for the ads.ini file to be used, it must be located in the application directory, the Windows directory, the Windows System directory, or the client's search path.

In addition, if an environment variable exists with the name adsini_path, that path will be used to locate the ads.ini file. This can be helpful when you do not want to modify the application’s search path, but still need the ads.ini file to exist in a directory multiple users have rights to (for example on Windows Vista installations). An application can often set the environment variable at run-time before calling any Advantage functions, which avoids the need to set a per-workstation environment variable.
Erstelle diese Umgebungsvariable und lasse sie auf das Verzeichnis des ARC zeigen (da dort ja eine funktionierende asds.ini liegt). Nimm aus Deinen Verbindungsparametern TCPIP raus - default ist UDP/IP.
Amn besten noch folgenden Eintrag in die ads.ini rein:
Zitat:
[SETTINGS]
RETRY_ADS_CONNECTS = 1
Ach so...nimm auch den Port aus dem Connection Path raus. Der ist ja in der ads.ini definiert.
Damit wird der Verbindungsfehler nicht gecached.
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#15

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 15:50
Danke...

Zitat:
"ads.ini File Support"
Muß es eine ini sein? Wollte ich nicht!

Zitat:
Erstelle diese Umgebungsvariable und lasse sie auf das Verzeichnis des ARC zeigen
... bei jeder Installation?

Geändert von haentschman (18. Aug 2023 um 16:13 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
677 Beiträge
 
Delphi 10.3 Rio
 
#16

AW: Zugriff auf ADS Server

  Alt 18. Aug 2023, 15:52
Bei mir ist die verwendete ads.ini ohne Settings Abschnitt und es geht auch. Sowohl mit als auch ohne Port angabe im Connection Pfad.

Im Programm Verzeichnis oder unter : "C:\Users\Public\Documents\Embarcadero\Studio\Fire DAC\" mus noch die "FDDrivers.ini" liegen inhalt :
Zitat:
[FDDrivers.ini]
Encoding=UTF8
Wenn ich mich recht erinnere war die existens der FDDrivers.ini das killerelement.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#17

AW: Zugriff auf ADS Server

  Alt 21. Aug 2023, 07:15
Moin...
Zitat:
Suche in der ADS Hilfe nach "ads.ini File Support"
...ich habe die ini im Windows Pfad + den Pfad in den Umgebungsvariablen...nix

Frage: Ich habe noch keinen ODBC Treiber! Kann das damit zusammenhängen?
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
677 Beiträge
 
Delphi 10.3 Rio
 
#18

AW: Zugriff auf ADS Server

  Alt 21. Aug 2023, 07:58
Du brauchst kein ODCB. Der ist eh grauenhaft bei Zugriff auf ADS.

Hast Du die FDDrivers.ini gefunden? Wenn ich die bei mir unbenenne bekomme ich den gleichen Fehler wie du.

Configuring_Drivers_(FireDAC)
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.

Geändert von Sinspin (21. Aug 2023 um 08:06 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#19

AW: Zugriff auf ADS Server

  Alt 21. Aug 2023, 08:11
Hallöle...
Zitat:
Du brauchst kein ODCB
...nennt sich Verzweiflung.
Zitat:
Hast Du die FDDrivers.ini gefunden?
Ja. Es geht aber auch ohne ini. Mit 3 DLL.
@Sinspin: Dein Code aus #11 hätte eigentlich funktionieren müssen. (kein Server) Verstehe ich nicht...

Ich habs...nach Stunden/Tagen probieren.

Der Connection String oder die Einstellungen in der GUI waren falsch!

Falsch: ConnectionString := 'DriverID=ADS;ServerTypes=Remote;Server= \\db2;Database=\\Db2\data\xxx.add;User_Name=xxx;Password =xxx';
Richtig: ConnectionString := 'DriverID=ADS;ServerTypes=Remote;Database=\\Db2:62 62\data\xxx.add;User_Name=xxx;Password=xxx';

Der Server Eintrag muß raus! Der Port muß in die Database Property.


Danke an alle die mit mir gelitten haben...
Miniaturansicht angehängter Grafiken
ads.png   folder.png  

Geändert von haentschman (21. Aug 2023 um 08:25 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
677 Beiträge
 
Delphi 10.3 Rio
 
#20

AW: Zugriff auf ADS Server

  Alt 21. Aug 2023, 09:28
Laut Hilfe klappt es auch ohne Ini wenn man ein TFDPhysADSDriverLink erzeugt.
Ganz wichtig, bevor man die erste Connection erstellt.
Den DriverLink erzeuge ich, die ini ist bei mir leer, oder besser ohne ADS spezifische Info. Ist lange her dass ich mich mit

Ich erzeuge alles im Quelltext um immer genau zu wissen was in welchen Properties steht, TFDConnection Komponente verwende ich nicht direkt. Ich habe eine eigene die ich für Designzeit arbeiten verwende. Die ist zur Laufzeit tot.
Meine Queries hohlen sich zur Laufzeit beim erzeugen selber ihre Connection.

Hallöle...
Zitat:
Hast Du die FDDrivers.ini gefunden?
Ja. Es geht aber auch ohne ini. Mit 3 DLL.
@Sinspin: Dein Code aus #11 hätte eigentlich funktionieren müssen. (kein Server) Verstehe ich nicht...
Genau. Deswegen im Quelltext erzeugen und Kontrolle behalten was wirklich in der Komponente steht. Nicht dass noch irgendwo was vor letzten Test steckt und einem ein Paar extra Runden beschehrt.
Ich habs...nach Stunden/Tagen probieren.

Der Connection String oder die Einstellungen in der GUI waren falsch!
Der Server Eintrag muß raus! Der Port muß in die Database Property.

Danke an alle die mit mir gelitten haben...
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 3     12 3      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:49 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