Mit SQL Server Verbinden

[Daniela.S]

Schönen guten Abend,

vielleicht kann mir jemand helfen. Mein Programm sollte nach Installation mit einem SQL Server verbunden werden und dem User die Möglichkeit geben den Server selbst anzugeben. Jetzt muss ich natürlich alle verfügbaren SQL Server auflisten. Und da scheitert es bereits. Ich möchte gerne die selben Einstellungen gezeiugt bekommen wie beim Anmelden über die Management Konsole.

Ich habe es jetzt schon mit NetServerEnum oder SQLDMO.SQLServer2 versucht. Aus dem Netzwerk wird ja was angezeigt, aber Informationen über den lokalen Server werden nicht angezeigt. Über "Localhost" kann ich mich auch nicht verbinden, das schlägt fehl.

Wenn mir jemand einen Tipp geben könnte, welche Funktion diese Management Konsole aufruft um die verfügbaren Server anzuzeigen, wäre ich echt dankbar.


liebe Grüße,
Daniela

[Alter Mann]

Hallo

Dein Problem ist relativ Einfach zu lösen:

Delphi-Quellcode:

...
implementation

uses
   ... AdoConEd, ...

procedure TForm1.SetDatabaseSource;
begin
  if EditConnectionString(dmADO.ADOC) then dmADO.ADOC.Open;
end;
...

Dabei ist dmADO ein DataModule und ADOC eine ADOConnection.
Alles klar?

Viele Grüße

[Daniela.S]

Danke, das Problem ist nur, wenn nur ein lokaler Server gefunden wird, dann soll sich die Anwendung automatisch verbinden. Wenn nicht, dann nur einen ganz simplen Dialog, indem nur die laufenden SQL Server Lokal und im Netzwerk aufgelistet sind. So wie in der Management Konsole.

Jetzt habe ich es mal so probiert... ich nehme den Computernamen und dazu die Instanz des SQL Servers aus der Registry. Also "Computername\Instanz". Funktioniert zwar, aber ob das so eine schöne Lösung ist

[Alter Mann]

Hallo Daniela S.

Deine Antwort sagt mir das du den Code nicht getestet hast. Warum?
Ansonsten gibt es von Colin Wilson eine paar gute Units, mit dem
du das Netzwerk nach allen SQL-Servern suchen kannst. Von Lukie gibt
so etwas auch, aber da weiß ich nicht genau welche Unit's das sind.

Viele Grüße

[Daniela.S]

Naja ich konnte den Code gar nicht testen, weil Delphi7 die Unit so per default nicht kennt. Der Source ist aber bei den Property Editors vorhanden und verweist auf CLSID_DataLinks, was den Default-Windows Dialog bringt, aber keine Liste, die ich irgendwie in einer ComboBox speichern kann. Das kann ich meinen Endusern nicht antun. Die wissen teilweise nicht was die rechte Maustaste ist.

Das Netzwerk kann ich ja auch durchsuchen, daran scheitert es nicht. Nur von der lokalen Installation gibt mir SQLDMO nichts zurück. Das ist aber genau die, die ich brauche.

Danke für den Link, ich schau mal was Colin Wilson so alles hat...

[Alter Mann]

Hallo Daniela S.

SQLDMO funktioniert nur bei lokal installierten SQL-Servern!

Die Unit AdoConEd ist auch bei Delphi 7 Prof vorhanden, schau mal unter
[b]source\property editors[/b} nach, wenn nicht einfach einbinden und testen.

Viele Grüße

[Daniela.S]

*ggg* dass Männer nie zuhören können

SQLDMO funktioniert vielleicht nur lokal, weil ja auch da installiert, liefert mir aber gerade nicht den Namen der lokalen SQL Server Installation. Wohl aber die, die im Netzwerk vorhanden sind. Warum auch immer der lokale Server nicht in der Liste ist. Über die Angabe von localhost klappt die Verbindung leider nicht.

Die Source von AdoConEd hab ich ja unter den Property Editors gefunden und gesehen dass hier nur ein Windows Dialog aufgerufen wurde. Was aus besagten Gründen nicht wirklich die beste Lösung ist.

Ich glaub ich lass es für heute besser. War ein langer Tag. Funktionieren tut es scheinbar so wie ich er derzeit gelöst habe, aber ob das die richtig schöne Lösung ist muss ich erst auf mehreren Installationen testen.



Trotzdem danke für deine Hilfe


guats Nächtle,
Daniela

[Sir Rufo]

So wie das aussieht, ist bei dem lokalen MS-SQL die TCP/IP-Connection nicht eingeschaltet.

Es sollte da ein kleines Tool bei dem SQL-Server dabei sein, wo die Verbindungswege eingestellt werden können.

Zitat von Daniela.S:

*ggg* dass Männer nie zuhören können

können schon ... aber wollen

[Bernhard Geyer]

Zitat von Alter Mann:

SQLDMO funktioniert nur bei lokal installierten SQL-Servern!

Funktioniert bei Netzwerkservern auch. Die nötigen Ports für das Abfragen sind jedoch oft von Lokalen Firewalls geblockt.

Selbst verwenden wir die ODBC-Funktionen (SQLAllocHandle, SQLBrowseConnect, ...), NetServerEnum und SQLDMO. Damit "erwischen" wir schon die überwiegende Anzahl der Server indem wir die einzelergebnisse zusammenschmeißen und duplikate löschen.

[Daniela.S]

Guten Morgen Bernhard,

ich finde es ja irgendwie lustig, dass man aus verschiedenen Funktionen eine Liste "zusammenstückeln" muss. SQLBrowseConnect klingt auf jeden Fall interessant, das werde ich mir mal näher anschauen...