![]() |
Re: LuckiePing
Ja den Effekt hatte ich zu Hause auch manchmal. Hier an der Arbeit ist mir das noch nicht passiert. :gruebel:
|
Re: LuckiePing
Hallo,
wäre schön, wenn du das Programm auch unter Windows 2000 lauffähig machen würdest. Ich habe das gleiche Problem wie die Herren weiter oben. Mit freundlichen Grüßen, Ben |
Re: LuckiePing
Wenn ich wüßte wie, dann gerne. ;)
|
Re: LuckiePing
soll ich mal bei mir kompilieren und genauer debuggen?
|
Re: LuckiePing
Ja das wäre nett. Ich habe nämlich kein Windows 2000 mehr.
|
Re: LuckiePing
Abend Luckie,
vorab: Das Tool ist wiklich nützlich und hat sich richtig entwickelt :thumb: Zwei Vorschläge hätte ich aber noch:
gruss |
Re: LuckiePing
Also, wenn man das ganze unter Windows 2000 mit Delphi 2005 kompiliert, passiert zunächst einmal der selbe fehler...
Was genau passiert: Nach den beiden "Main-Befehlen" (InitCommonControls und DialogBox) wird noch exakt 3mal dlgfunc aufgerufen... Parameter: 1: uMsg:48 wParam:(verschieden) lParam:0 2: uMsg:2 wParam:0 lParam:0 3: uMsg:130 wParam:0 lParam:0 dann ist ende... |
Re: LuckiePing
Hm. Besten Dank auch wenn mir das jetzt nicht unbedingt weiterhilft. :gruebel:
|
Re: LuckiePing
Zitat:
Gibt es irgendwas anderes wonach man gucken könnte/sollte? |
Re: LuckiePing
Zitat:
|
Re: LuckiePing
So nun habe ich das Programm mal im Firmennetz getestet. Auf Windows XP-Pro startet das Programm problemlos. Bei Windows 2000 und NT4 Sp6 sieht das anders aus [bekannt].
Die Scannzeit für den Adressraum von 192.168.0.1 bis 192.168.0.255 betrug ca. 135 Sekunden. Alle IP-Adressen, sowie die Mac-Adressen wurden gefunden. Betriebssystem und Servertyp allerdings nur teilweise, obwohl gleiche Rechner vorhanden sind. Irgendwo in diesem Thread hast Du nach dem Nutzen gefragt. Nun, ich finde es nützlich; auch wenn ich es gern unter Windows 2000 und Co benutzen würde. Solange dies nicht möglich ist, wäre es schön, wenn das Programm eine Meldung ausgibt das es nicht so richtig mag... Grüße von engine |
Re: LuckiePing
Wenn nicht zu allen Rechner alle Informationen angezeigt werden, dann liegt das wohl teilweise an deaktivierten Diensten oder an Firewalls.
|
Re: LuckiePing
Zitat:
Auf den 2000er und NT4 läuft zumindest keine Firewall. Obwohl sie gleich konfiguriert sein sollten, bekomme ich von einigen keine Infos |
Re: LuckiePing
Nein, leider nicht. Ich wüßte es aber auch gerne. Aber auf eine der vorherigen Seiten wurde auf ein Tool verlinkt um Deaktivieren bestimmter Dienste. Guck doch mal da, eventuell findest du da ja was.
|
Re: LuckiePing
Bei uns im Schul netz läuft das auch nicht.
Allerdings hab ich da keine Administrator rechte (sehr eingeschränkte rechte :D) ebenfalls Windows 2000 |
Re: LuckiePing
Es sind keine Administratorenrechte nötig damit es funktioniert. Es wird wohl eher an dem Windows 2000 liegen.
|
Re: LuckiePing
Das seltsame ist, daß das Programm ja sehr wohl unter W2K startet, sich aber dann sofort selbst wieder beendet da die Messages die beim Start in der Messageloop ankommen nicht verarbeitet werden.
Meiner Meinung nach kann das auch nichts mit einer eventuell anderen WinSock-Version zu tun haben, da es ja garnicht dazu kommt Netzwerkfunktionen auszuführen. |
Re: LuckiePing
Probiert mal die aktuelle Version aus im ersten Thread.
|
Re: LuckiePing
Morgen...
die Version läuft auch nicht unter Windows 2000. engine |
Re: LuckiePing
Mist. Dieser Effekt tritt normalerweise auf, wenn man CommonControls benutzt, aber nicht vorher InitCommonControls aufruft. Ich habe das jetzt mal geändert und rufe InitCommonControlsEx auf. Aber ich habe festgestellt, es startet auch, wenn ich keins von beiden aufrufe. Irgendwo muss eine Unit also InitCommonControls von sich automatisch aufrufen und XP kommt damit klar, Windows 2000 aber nicht. :wall:
|
Re: LuckiePing
Liste der Anhänge anzeigen (Anzahl: 1)
Die Versionsnummer stimmt irgendwie nicht. Ich wollte gerade noch mal überprüfen, ob ich auch wirklich die neuste Version hatte.
Getestet habe ich mit 1.0.6.322. In der Versionsinfo von Windows stehen jedoch zwei verschiedene Versionsnummern. Siehe Anhang... |
Re: LuckiePing
Zitat:
Delphi-Quellcode:
Hintergrund: InitCommonControlsEx wird dynamisch geladen. Allerdings fängt der Wrapper von Borland nicht den Fall ab, dass die DLL nicht geladen sein könnte (ist in 99% der Fälle kein Problem, da die VCL Funktionen aus selbiger DLL verwendet und sie dadurch impliziet lädt).
InitCommonControls();
InitCommonControlsEx(...); |
Re: LuckiePing
@engine: Ups, da hat der ResourcenEditor wohl ein Problem. Werde ich mir mal angucken.
@NicoDE: Die VCL wird nicht benutzt. |
Re: LuckiePing
Aktuelle Binary und Sourcen im ersten Beitrag. Ich habe mal den Vorschlag von nico umgesetzt. Bei mir startet es unter XP auch im Windows 2000 Kompatibilitäötsmodus. Leider habe ich das erst nachher ausprobiert, kann also nicht sagen, ob es daran gelegen hat.
|
Re: LuckiePing
Zitat:
|
Re: LuckiePing
Zitat:
|
Re: LuckiePing
Echt?! Geil. Gut dann wäre das Problem wohl gelöst. :P
|
Re: LuckiePing
Noch eine Frage: wäre es möglich anzuzeigen welche Ports bei einer IP-Adresse offen sind? Man könnte diese Funktion ja erstmal auf einige Standard-Ports (HTTP, FTP...) beschränken sonst wird aus dem LuckiePing noch ein LuckiePortScanner :)
|
Re: LuckiePing
Puh, ja könnte man machen. Mal sehen, wie ich Zeit dazu finde. Erstmal stehen noch andere Features auf meiner Todo Liste, die mir erstmal wichtiger sind.
|
Re: LuckiePing
Also erstmal:
es läuft jetzt auch unter Windows 2000 :thumb: aber was mir nicht gefällt: Ich kann meinen Server so einstellen das er nicht antwortet. Dann wird er nicht erkannt. Ich habe letztens erst von einem Verfahren gelesen (und weiss nicht mehr wo :wall:) welches man nicht blocken kann. Irgendwie wurde versucht eine verbindung aufzubauen wie für jede andere verbindung auch, und das dann ausgewertet. (wenn das geblockt wäre könnte man auch direkt die netzwerkkarte ausbauen...) vielleicht wäre das mal ne überlegung wert^^ Edit: Und BTW hast du sehr kurze sekunden :gruebel: |
Re: LuckiePing
@glkgereon: Sowas nennt man einen Portscan.
Natürlich kann man den auch blocken, und zwar indem man eine Software- oder Hardware-Firewall benutzt, die keine Verbindungen durchlässt. |
Re: LuckiePing
Zitat:
ich könnt mich in den hintern beissen das ich mir nirgendwo den link aufgeschrieben hab :$ ich such nochmal und meld mich falls ich was finde^^ Edit: Haha :) das ganze nannte sich "arp"... oder hab ich das was falsch verstanden? |
Re: LuckiePing
Zitat:
Dabei schickt der Rechner eine Nachricht vom Typ "Wer hat die IP xx", und der entsprechende Rechner antwortet ihm dann. Du hast Recht - wenn man ARP deaktivieren würde, könnte keiner mehr diesen Rechner erreichen. Es sei denn, er hat einen statischen ARP-Eintrag mit der entsprechenden MAC-Adresse. Für mich sieht das so aus, als könnte man das tatsächlich zum Pingen verwenden. Ist mir zuerst gar nicht eingefallen! @Luckie: Dein Tool funktioniert bei mir überhaupt nicht. Weder mein LAN, noch einen Adressbereich im Internet konnte ich auflisten. Vielleicht liegt es an der verbuggten Windows Firewall liegt. Die habe ich soeben deaktiviert. Dagegen spricht aber, dass mein Switch beim Pingen blinkt - dein Programm darf also durchaus von meinem Rechner aus hinaussenden. Ich starte später den Rechner neu und probier es nochmal. Vielleicht wars wirklich die Firewall. |
Re: LuckiePing
Zitat:
kann man das mit Delphi irgendwie nutzen? |
Re: LuckiePing
Arp ist ein Broadcast und ich glaub windows hat probleme damit
|
Re: LuckiePing
Zitat:
Durch Eingabe von arp -a in der Konsole kann selbst ein unprivilegierter Nutzer alle ARP-Einträge abfragen. Man könnte also einfach den Rechner, der eine Firewall hat, anpingen. Er antwortet zwar nicht, aber bevor das Ping versendet wird benutzt Windows ARP, um die MAC-Adresse des Rechners zu finden. Dann liest man entweder den ARP-Cache mit entsprechenden API-Funktionen aus, oder - wenn das nicht geht - führt man arp -a aus und schaut nach, ob die gesuchte IP in der AUsgabe vorhanden ist. Das wäre zwar eine unsaubere Lösung, würde aber funktionieren. Zitat:
|
Re: LuckiePing
stimmt auch wieder... hmm k hab scheisse gelabert sry
|
Re: LuckiePing
Zitat:
// edit: Kein roter kasten :/ |
Re: LuckiePing
Sieht gut aus.. Und ist ehh.. bissschen besser als mein Ping-Ding :mrgreen: :thumb:
|
Re: LuckiePing
Liste der Anhänge anzeigen (Anzahl: 1)
Sicher wirst Du jetzt denken, nicht der schon wieder mit seinem 120dpi Font, aber so sieht für mich die Welt aus (siehe Anhang). Mir ist auch klar das ich damit einer Minderheit angehöre. Ist es unter der nonVCL Programmierung schwieriger die Fontgröße zu berücksichtigen als mit VCL?
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:56 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz