Registriert seit: 8. Jun 2002
Ort: Herne
575 Beiträge
Delphi 3 Professional
|
18. Feb 2003, 22:15
Hallo JanJan,
ich habe eine Lösung für dein Problem. Du musst einen Clientsocket benutzen. Diesen auf die Addresse 192.168.0.1 konfigurieren. Beim starten des Programms muss dieser aktiviert werden. Nach dem er verbunden ist kannst du Befehle an den Router senden. Clientsocket1.Socket.SendText();
Das alleine genügt noch nicht. An diesen Befehl muss noch ein "Enter" angehängt werden. Dieses besteht aus CHR(13)+CHR(10). Also muss die Zeile lauten:
clientsocket1.Socket.SendText(edit1.text+chr(13)+chr(10));
Ich hab mal ein kleines Demo-Prog angehägt. Da kannst du dir noch mal das Verfahren zu Gemüte führen.
Sport ist mord...
|