Servername gültig?

[bernau]

Ich möchte herausfinden, ob ein Servername vorhanden ist.

Folgendes bringt false

Delphi-Quellcode:

Result := TDirectory.exists('\\servername\'); \\false

Wenn ich aber ein gültiges Verzeichnis auf dem Server abfrage, dann bekomme ich true.

Delphi-Quellcode:

Result := TDirectory.exists('\\servername\einVerzeichnis\'); \\true

Welche Funktion gibt es, um zu sehen, ob es den Server gibt?

[mkinzler]

Man könnte versuchen eine DNS-Auflösung auf den Namen durchzuführen. Dann weiss man zumindest, ob es einen Rechner mit dem Namen gibt.

[haentschman]

Ich schmeiße dann mal einen Ping darauf in den Raum...8-)

[baumina]

hier steht einiges dazu.

[TBx]

Zitat:

Zitat von haentschman (Beitrag 1320992)

Ich schmeiße dann mal einen Ping darauf in den Raum...8-)

Da kann man bei einem erfolgreichen Ping sagen: ok, ist da, wenn der nicht erfolgreich ist, kann der Server aber dennoch existieren, reagiert aber einfach nicht aufs Anpingen ...

[Dalai]

Zitat:

Zitat von haentschman (Beitrag 1320992)

Ich schmeiße dann mal einen Ping darauf in den Raum...8-)

Das sagt leider überhaupt nichts aus, weil MS in seiner unendlichen Weisheit :roll: seit Einführung der Firewall bei XP SP2 die Beantwortung von ICMP Echorequests standardmäßig deaktiviert hat. Will sagen: sofern man nicht explizit die Firewalleinstellungen anpasst, bekommt man auf einen Ping an ein Windows-System keine Antwort.

MfG Dalai

[nahpets]

Eigentlich gibt es doch (fast) überall die Verzeichnisse . und .., kannst Du nicht eines davon, anstelle von einVerzeichnis, nehmen?

Also eher sowas?

Delphi-Quellcode:

Result := TDirectory.exists('\\servername\.\'); \\true

Ist jetzt zugegebenermaßen nur geraten und mangels Netzwerk nicht getestet.

[haentschman]

@Tbx:
Das ist richtig. Da kann man aber schon mal definitiv sagen ob der Server reagiert und man auf die Freigabe (Pfad nicht gültig) prüfen muß. Wenn man nur auf den Pfad prüft kann man rätseln welcher Part fehlgeschlagen ist. :P

Vieleicht sollte mal der TE sagen was warum benötigt wird. 8-)

Zitat:

Will sagen: sofern man nicht explizit die Firewalleinstellungen anpasst, bekommt man auf einen Ping an ein Windows-System keine Antwort.

:gruebel: Wenn ich mein Tablet (W8.1) im hauseigenen Netz anpinge meldet es sich anständig wie es sich gehört.

[bernau]

Zitat:

Zitat von nahpets (Beitrag 1320996)

Eigentlich gibt es doch (fast) überall die Verzeichnisse . und .., kannst Du nicht eines davon, anstelle von einVerzeichnis, nehmen?

Also eher sowas?

Delphi-Quellcode:

Result := TDirectory.exists('\\servername\.\'); \\true

Ist jetzt zugegebenermaßen nur geraten und mangels Netzwerk nicht getestet.

Interessante Idee. Geht aber nicht. Bringt auch ein false :-(

[bernau]

Zitat:

Zitat von baumina (Beitrag 1320993)

hier steht einiges dazu.

JA. Interessant. Danach habe ich eigentlich gesucht. Ich verwende aber wohl immer die falschen Suchbegriffe.

[baumina]

Zitat:

Zitat von bernau (Beitrag 1321006)

Ich verwende aber wohl immer die falschen Suchbegriffe.

War ne einfache :love: Google-Suche :love: mit den Begriffen: delphi servername directoryexists

[zagota]

Schon mal mit GetHostByName('ServerName') aus WinSock.pas versucht?

cu

[nahpets]

Klappt das denn mit der administrativen Freigabe (auf Windows)?

Delphi-Quellcode:

Result := TDirectory.exists('\\servername\C$\');

(Dürfte allerdings Adminrechte benötigen!)

[bernau]

Zitat:

Zitat von baumina (Beitrag 1321009)

Zitat:

Zitat von bernau (Beitrag 1321006)

Ich verwende aber wohl immer die falschen Suchbegriffe.

War ne einfache :love: Google-Suche :love: mit den Begriffen: delphi servername directoryexists

:oops:

Habe anscheinend trotzdem einen blöden Suchbegriff gehabt.

[delnu]

Wie wäre es denn damit, überhaupt die vorhandenen Servernamen auf die hier beschriebene Weise zu ermitteln? :roll: