Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Ports auflisten und beenden !? (https://www.delphipraxis.net/49459-ports-auflisten-und-beenden.html)

Äfan 11. Jul 2005 19:17


Ports auflisten und beenden !?
 
Hi,

Kann mir jemand sagen, wie ich meine ganzen ports und verbindungen in eine liste einfüge kann ?

Und wie kann ich dann einen Port oder eine verbindung löschen oder hinzufügen ?

mfg

supermuckl 11. Jul 2005 19:29

Re: Ports auflisten und beenden !?
 
komische fragen hast du.. aber ich will sie beantworten

Zitat:

ports und verbindungen in eine liste einfüge kann
via iphlpapi

Zitat:

Port oder eine verbindung löschen
prozess killen

Zitat:

oder hinzufügen ?
Server aufmachen

Äfan 11. Jul 2005 19:39

Re: Ports auflisten und beenden !?
 
Zitat:

Zitat von supermuckl
komische fragen hast du.. aber ich will sie beantworten

Zitat:

ports und verbindungen in eine liste einfüge kann
via iphlpapi

Zitat:

Port oder eine verbindung löschen
prozess killen

Zitat:

oder hinzufügen ?
Server aufmachen

Warum komische frage !? und ich würde sagen eher komische antwort !

Was is iphlpapi ?

Prozess killen *lol* Aber wie ?

Und wie server aufmachen ? wenn ich in meiner router software ports freigeben will, muss ich keinen server aufmachen !

supermuckl 11. Jul 2005 19:43

Re: Ports auflisten und beenden !?
 
was hat das jetzt mit router zu tun? *nixmehrpeil*

meine antworten waren korrekt und direkt ;)

wenn du mal die hilfe bewegen würdest, wüsstest du was ich mit iphlpapi meine

und wenn du deine fragen nicht gut genug spezifizierst, kann es schonmal vorkommen, das ich eben an delphi denke und du eventuell an deine router-portforwarding configuration ?!

Luckie 11. Jul 2005 19:43

Re: Ports auflisten und beenden !?
 
Zitat:

Zitat von Äfan
Warum komische frage !? und ich würde sagen eher komische antwort !

Komisch, weil mehr als unklar gestellt. Ein Programm kann man beenden, aber wie beendet man einen Port? Schließen kann man einen Port für andere Programme in dem man ihn selber belegt. Offene Ports und verbindungen kann man mit Hilfe von API Funktiionen aus der IpHlpAPI.dll auflisten.

Warum komische Antwort? Alles korrekt. Wie wäre es mal mit etwas Eigeninitiative und einer Foren- oder Googlesuche nach den dir genannten Stichworten? Und wenn du das nichts willst, dann such doch mal nach einem opensource PortScanner, aber da bist du bestimmt schon selber draufgekommen.
Wer seine Frage so einfach wie ein rohes Stück Fleisch vor die Löwen hier ins Forum wirft und sich nicht mal eine Minute überlegt, was er überhaupt will und dann mal versucht sein Problem vernünftig zu schildern, der bekommt eben solche Antworten.

supermuckl 11. Jul 2005 19:44

Re: Ports auflisten und beenden !?
 
OT
lol luckie.. selbe gedanken zur selben zeit ;)

Äfan 11. Jul 2005 22:36

Re: Ports auflisten und beenden !?
 
Oh man, das is wieder ein klugscheiß-thread :D ... weiß jemand wo es nen os port scanner gibt ? Habe zwar gesucht, aber es geht nur ein link zu einem simplen programm. etwas mit mehr funktionen wär gut.

thx

Luckie 11. Jul 2005 22:41

Re: Ports auflisten und beenden !?
 
Ist da wirklich nichts dabei? Bei Google suchendelphi portscanner,

Äfan 12. Jul 2005 16:42

Re: Ports auflisten und beenden !?
 
Mhhh ok, hab da aber nicht viel sinnvolles gefunden. Habe es jetzt mit Indys TCP probiert und den code von nem Socket beispiel abgeleitet, funzt aber nicht, da kommt ein socket fehler. Kann sich vllt. jemand den code anschauen und in berichtigen ?

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
  for i := 1 to 9999 do
  begin
  Idtcpclient1.Port := i;
  Idtcpclient1.Connect;
  if Idtcpclient1.Connected = true then
  begin
    Listbox1.Items.Add(inttostr(Idtcpclient1.Port));
  end;
  Idtcpclient1.Disconnect;
  end;
end;
thx

Dani 12. Jul 2005 16:52

Re: Ports auflisten und beenden !?
 
Zum Thema Port "beenden":

Man kann theoretisch eine bestehende TCP Verbindung eines anderen Prozesses beenden (siehe TCPView von Sysinternals), aber wie das geht weiß ich leider auch nicht (der Autor von TCPView wollte mir damals auch nicht weiterhelfen). Möglicherweise geht es mit der Bei Google suchenWinsock SPI.

Gruß,
Dani


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:28 Uhr.
Seite 1 von 2  1 2      

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