AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist.

Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist.

Ein Thema von scp · begonnen am 15. Feb 2005 · letzter Beitrag vom 16. Feb 2005
Antwort Antwort
Seite 1 von 2  1 2   
scp

Registriert seit: 31. Okt 2003
1.120 Beiträge
 
Delphi 7 Personal
 
#1

Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist.

  Alt 15. Feb 2005, 21:55
Mit WNetEnumResource kann man ja alle möglichen PCs im Netzwerk ermitteln. Nun haben wir aber ein Netzwerk mit über 200 PCs und das würde wahrscheinlich lange dauern.
Wie kann ich also konkrekt ohne ewige Timeouts abfragen, ob ein bestimmter PC dessen Name bekannt ist im Netzwerk ist oder nicht?
Die meisten Rechner laufen mit 2000/XP (über einen 2000 Server/ISA verbunden), aber ich denke da gibt es eh eine Universallösung.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 22:16
Ping den Rechner doch einfach an.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
scp

Registriert seit: 31. Okt 2003
1.120 Beiträge
 
Delphi 7 Personal
 
#3

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 22:45
Mit ping in der cmd ist klar, aber wie mache ich das in Delphi? Bin in Sachen Netzwerk noch Neuling.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 22:51
Bei Indy hat es eine Ping-Komponente.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
scp

Registriert seit: 31. Okt 2003
1.120 Beiträge
 
Delphi 7 Personal
 
#5

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 23:05
Stimmt, das ist wohl das einfachste. Benutze zwar gerne die Indys, wollte aber in dem Fall darauf verzichten. Aber mal sehen, wie die das realisiert haben.
Danke.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 23:17
Musst mal suchen, es gibt bestimmt Komponenten mit weniger Overhead haben. Oder du machst es selber alles von Hand: http://www.c-worker.ch/ Guck dir die Tutorials mal durch.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
czapie

Registriert seit: 17. Nov 2002
Ort: Berlin
384 Beiträge
 
Delphi 5 Standard
 
#7

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 15. Feb 2005, 23:18
was heißt Computer in diesem Fall?
Computer allgemein, also auch gewöhnliche Dekstop-PCs?

Oder nur spezielle Netzwerkcomputer, also Switchs etc.?
Was man zu verstehen gelernt hat, fürchtet man nicht mehr.
(Marie Curie)
http://www.cafes-in-berlin.com
  Mit Zitat antworten Zitat
Akut-Programming

Registriert seit: 18. Aug 2003
648 Beiträge
 
#8

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 16. Feb 2005, 07:59
Dann will ich auch mal was dazugeben.. hier is mal n Code aus ner Anwendung von mir, in der ich auch pingen wollte.. - Ich verwende die Indy-Kompo "IdIcmpClient"
Delphi-Quellcode:
procedure Tfrm_main.Label7Click(Sender: TObject);
var i: integer;
begin
     if edIpAdr.Text<>''
     then begin
          memLogFile.Lines.Add('Pingstatus ('+DateTimeToStr(Now)+')');
          if edAnzahl1.Text<>''
          then begin
               PageControl1.Enabled:=false;
               for i:=0 to StrToInt(edAnzahl1.Text)
               do begin
                  IdIcmpClient1.Host:=edIpAdr.Text;
                  IdIcmpClient1.Ping();
               end;
               PageControl1.Enabled:=true;
          end
          else if edAnzahl2.Text=''
          then begin
               IdIcmpClient1.Host:=edIpAdr.Text;
               IdIcmpClient1.Ping();
          end;
          memLogFile.Lines.Add('');
          edIpAdr.Clear;
     end else Application.MessageBox('Please insert a IP Adress to ping', 'Failure', MB_OK+MB_ICONSTOP);
end;
Vielleicht kannst du´s ja für deine Bedürfnisse anpassen.

Sascha
Akut-Programming
be cool, be hot ... just be
  Mit Zitat antworten Zitat
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.076 Beiträge
 
Delphi 7 Enterprise
 
#9

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 16. Feb 2005, 08:02
Er wollte doch eigentlich auf die Indys verzichten -g-
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
Akut-Programming

Registriert seit: 18. Aug 2003
648 Beiträge
 
#10

Re: Schnelle Prüfung, ob Computer im Netzwerk erreichbar ist

  Alt 16. Feb 2005, 08:04
Zitat von scp:
Aber mal sehen, wie die das realisiert haben.
Will er sich vielleicht nur den Code der Combo anschauen?! - Da hab ich mich wo etwas vertan.
Akut-Programming
be cool, be hot ... just be
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 12:00 Uhr.
Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2020 by Daniel R. Wolf