Netzwerk mit Delphi

[doc]

HI

Ich hab folgendes Problem:
Eine Delphi 5-Anwendung soll ein auf einem anderen PC installiertes Program aufrufen (also auf dem anderen PC starten), auf dass das Programm dann eine bestimmte Meldung zurückgibt, die auch an meinen PC verschickt wird.

Ist des irgendwie möglich? (Eigentlich eine doofe Frage denn bei dem tausenden Trojanern, die es gibt, muss des einfach funzen)

Und wenn JA: wie? ?:


MfG doc

----
PS: Sch**** habs ins falsche Forum gepostet ( ; könnte des ein Mod verschieben, wenns net zu viel ausmacht?)

[edit=FuckRacism]Verschoben in Inet; Hast es ja selber schon bemerkt [/edit]

[RomanK]

Hi
also eine Anwendung auf einem Anderen PC zu starten ist meineswissens nicht möglich ... aber wenn das Program schon installiert ist könntest du doch einfach im Hintergrund auf den Befehl per TCP/IP warten und dann wir das proggy aktiv! Und die Message zurück zu deinem PC kannst du dann ja auch wieder per TCP/IP machen

Falls ich mich irre, von wegen starten auf anderem PC, dann belehrt mich eines besseren!!

[d3g]

Hi doc,

es ist einfach so nicht möglich, dass ein Programm auf einem anderem Rechner zu starten. Das Prinzip eines Trojaners ist, dass er aus zwei Teilen beteht: der Server läuft auf dem Rechner, wo das Programm ausgeführt wird und der Client, der den Befehl zum Ausführen schickt.

Du müsstest also ein zweites Programm schreiben, dass auf dem Zielrechner als Server fungiert. Wenn es z.B. einen String 'exec AnExecutable.exe' zugeschickt bekommt, dann startet es ShellExecute oder CreateProcess oder was auch immer und erhält den Rückgabewert, den du haben willst. Daraufhin sendet der Server wieder an den Client einen String, z.B. 'return exec AnExecutable.exe 1234567890'. Der wertet das dann aus.

MfG,
d3g

[doc]

des triffts ziemlich genau.

ich will zu einem programm des auf dem anderen rechner installiert ist und des aktiv ist, Verbindung aufnehmen, und des irgendein anderes Programm starten lassen,

Die Frage ist: Wie kann ich des Quellcodmäßig machen (des Prinzip hab ich ja)

MfG doc und danke für die schnellen Antwworten

[Thurgen]

hm mit VB habe ich sowas mal mit der winsock komponente gemacht, allerdings konnte ich diese jetzt auf die schnelle unter delphi 5 nicht finden. Mit VB waren das nur wenige zeilen code solange du nur UDP und nicht TCP benutzt. Allerdings ist das nicht ganz ohne was du vorhast. Sowas kann schnell als trojaner enden und fals eine Firewall vorhanden ist wird dein Programm nicht laufen wenn du den Port den du benutzten willst nicht vorher von der Firewall freigeschalted wird

[Thurgen]

glaube mit delphi funktioniert das so

http://www.tipps.delphi-source.de/LA...020914-1.shtml

[Daniel]

Hallo,

das Starten eines Programmes auf einem anderen Rechner demonstriert u.A. eine Anwendung von Sysinternals: psExec.
Der Austausch von Daten wiederum ist eine andere Angelegenheit - dies wird ja zum Beispiel in dem von Thurgen zizierten Link bechrieben.

[doc]

Hi
Ich hab des jetzt mit dem Verbinden übers Netzwerk probiert, aber nach kurzem kommt ne Fehlermeldung (s.h. Bild.) und ich hab keine Ahnung woran des liegen könnte (wahrscheinlich mach ich grad einen typischen Anfängerfehler auf dem Gebiet aber sei´s drum...)

Des mit dem psexec probier ich auch noch, aber erst muss ich mal ne gescheite netzwerkverbindung herstellen...

MfG doc

Ach übrigens: Ich hab noch gar nicht gesagtm, wozu ich des programm verwenden will, wenns fertig ist...
Des soll mal sowas wie ein Netzwerk-Scanner werden, also kein Port-Scanner, sondern ein Programm, das den Scanner auf dem anderen Pc "bedient" und die Bilddateien gleich auf meinen Pc transferiert.

PPS: Ich aberbeite mit Windows ME........

[Christian Seehase]

Moin Doc,

Fehler 11001 besagt:

WSAHOST_NOT_FOUND

Mit anderen Worten:
Der angegebene Host ist unbekannt. (Originalmeldung von Windows (2000))

Wie sprichst Du denn den Rechner an?

[Christian Seehase]

Moin Thurgen,

ich hab' mir mal Dein Tut angesehen:
Es wäre besser das deaktivieren der Sockets jeweils im OnDestroy zu machen, da das OnClose nicht immer aufgerufen wird (z.B. bei Application.Terminate)