AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Rechnernamen im Netzwerk
Thema durchsuchen
Ansicht
Themen-Optionen

Rechnernamen im Netzwerk

Ein Thema von Hansa · begonnen am 30. Jan 2003 · letzter Beitrag vom 31. Jan 2003
Antwort Antwort
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#1

Rechnernamen im Netzwerk

  Alt 30. Jan 2003, 13:15
Hi,

ich habe hier mal einen Rechner als SQL-Server degradiert. Oder ist das eher eine Beförderung ? Jetzt muß ich ja dann bei dem DB-Name den genauen Connection-String angeben. Dazu muß ich ja den Rechnernamen statisch festlegen oder ich muß ihn zur Laufzeit abfragen. Beides gefällt mir nicht richtig. Wird der Rechnername abgefragt, muß man ihn erstens wissen und zweitens richtig eingeben. Was bedeutet, daß das bei 50% der Fälle nicht richtig gemacht wird. Fest einprogrammieren will ich das ganze aber auch nicht, da im Fall der Fälle das Backup auf einen beliebigen anderen Rechner gezogen werden soll. Das mit dem Alias kapiere ich leider nicht richtig, falls da einer drauf hinaus will, bitte erklären.

Und noch was : an dem SQL-Server soll natürlich keiner was dran machen. Sonst geht es wieder los: "Alle Rechner besetzt, ich muß aber einen Brief schreiben, ach egal, ich gehe an den Server". Natürlich wird er dann noch "ordentlich" runtergefahren.

Ah : ich glaub ich muß das hier aufsplitten. Wie sieht es mit der Performance aus ? Was ist zu beachten? Der remote - Zugriff ist schon merklich langsamer.

Gruß
Hansa
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2
  Alt 30. Jan 2003, 13:27
Dieser Code sollte dir alle Rechner im Netzwerk auflisten:
Delphi-Quellcode:
var
  dwResult : DWord;
  hEnum : DWord;
  anrStruct : array [1..512] of NETRESOURCE;
  dwCount : DWord;
  dwBufferSize : DWord;
  lIndex : LongInt;
begin
  try
    FillChar(anrStruct,SizeOf(anrStruct),0);
    anrStruct[1].lpRemoteName := PChar('WORKGROUP');
    dwResult := WNetOpenEnum(RESOURCE_GLOBALNET,RESOURCETYPE_DISK,
      0, @anrStruct[1], hEnum);
    if dwResult = NO_ERROR then
    begin
      Memo1.Lines.Clear;
      dwBufferSize := SizeOf(anrStruct);
      dwCount := DWord(-1);
      dwResult := WNetEnumResource(hEnum, dwCount, @anrStruct[1],
        dwBufferSize);
      for lIndex := 1 to dwCount do
      begin
        Memo1.Lines.Add(anrStruct[lIndex].lpRemoteName);
      end;
    end;
  finally
    WNetCloseEnum(hEnum);
  end;
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Rechnernamen im Netzwerk

  Alt 30. Jan 2003, 13:38
Zitat von Hansa:
... Fest einprogrammieren will ich das ganze aber auch nicht, da im Fall der Fälle das Backup auf einen beliebigen anderen Rechner gezogen werden soll. ....
Schreibe doch einfach den Namen des SQL-Servers in eine INI-Datei.
Dann muss der Anwender nix machen und Du kannst auch schnell auf einen anderen "Server" umschalten.

Was meinst Du mit performance? Was für ein SQL-Server ist es denn?

Für Datenbankserver gilt immer -> Speicher Speicher Speicher
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#4

Re: Rechnernamen im Netzwerk

  Alt 30. Jan 2003, 13:44
Das ist Firebird.

Zitat von Sharky:
Schreibe doch einfach den Namen des SQL-Servers in eine INI-Datei.
Dann muss der Anwender nix machen und Du kannst auch schnell auf einen anderen "Server" umschalten.
Wie meinst Du das? Ich bin im Moment soweit, daß ich sage : "Der Server MUß SQL-SERVER heißen." Es geht mir darum, falls der Server ausgetauscht wird und irgend jemand verpaßt ihm einen falschen Namen, woher soll das Programm denn dann noch wissen, wo die DB liegt? Werde mir das mit dem Alias noch mal ansehen.

@Luckieas da funktioniert jedenfalls.

Gruß
Hansa
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#5
  Alt 30. Jan 2003, 13:47
Mein Code funktioniert? Gut. Ich habe ihn irgendwo ganz unten in meinem Schatzkästchen gefunden.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Rechnernamen im Netzwerk

  Alt 30. Jan 2003, 13:49
Zitat von Hansa:
... Wie meinst Du das? ...
Ich habe bei meiner Warenwirtschaft einfach eine INI-Datei.

Dort steht z.B.:

[SYSTEM]
SQLSERVER = domino
NOTSYSTEM = 0
DATENBANK = auftrag
MAILSERVER = 192.168.1.5
FILESERVER = domino

Jetzt lese ich beim start des Programmes den Namen meines SQL-Servers aus dieser INI aus und verbinde mich mit ihm.

Auf meinem Notsystem gibt es dann auch eine INI. Dort steht dann aber eine anderer Computername beim SQLSERVER.
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#7
  Alt 30. Jan 2003, 14:04
Ja, das da könnte gehen. Wenn ich das noch mit Luckies Bsp. kombiniere, das müßte reichen. Dann käme halt eine Fehlermeldung : "In der XY.INI ist ein SQL-Server eingetragen, der im Netzwerk nicht gefunden wurde, bitte korrigieren". Noch was zu Luckies Bsp.: man muß noch dazu sagen, daß die TCP/IP Rechner aufgelistet werden. Mein Novell File-Server wird nicht aufgelistet (IPX).

Gruß
Hansa

Da ist aber noch ein Haken : Heißt der Server anders, dann müßte ja die INI an jedem Rechner im Netz geändert werden. 8)
  Mit Zitat antworten Zitat
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#8
  Alt 30. Jan 2003, 21:03
Zitat:
Und noch was : an dem SQL-Server soll natürlich keiner was dran machen. Sonst geht es wieder los: "Alle Rechner besetzt, ich muß aber einen Brief schreiben, ach egal, ich gehe an den Server". Natürlich wird er dann noch "ordentlich" runtergefahren.
Habe gerade noch mit jemand gesprochen, der sitzt an einem von 500 Rechnern in einem Netzwerk. Natürlich hat er keine Ahnung gehabt. Man überlege sich einmal, was da los wäre, wenn der Server ausfällt und alle WS umgestellt werden müßten. Das muß viel einfacher gehen. Wahrscheinlich ist der Name starr festgelegt.

Gruß
Hansa
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#9
  Alt 31. Jan 2003, 00:58
Moin Hansa,

man kann so eine Ini auch Zentral auf einem Server ablegen, ggf. auf dem Anmeldeserver.
Sollte der mal ausfallen, so wird er mit Sicherheit auch wieder durch einen ersetzt, der gleich heisst.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#10
  Alt 31. Jan 2003, 08:57
Zitat von Hansa:
... Man überlege sich einmal, was da los wäre, wenn der Server ausfällt und alle WS umgestellt werden müßten. ...
Hai Hansa,

wie Christian schon geschrieben hat kannst Du die Ini natürlich auf einem Server ablegen.

Die Alternative wäre das Du ein kleines Programm auf dem SQL-Server laufen lässt (möglichst als Dienst) das auf IP-Anfragen auf einem bestimmten Port lauscht.

Dein Programm sendet beim Start einfach ein Broadcast an diesen Port und wartet welcher Server sich meldet (So macht das MS z.B. bei der Suche nach den Domaincontrollern).

UPS.... da fällt mir ein: Du hast von einem Novell-Server gesprochen. Auf dem muss natürlich TCP/IP als Netzwerkprotokoll laufen.
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Antwort Antwort


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 14:13 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