Speedport IP dynamisch ändern.

[EWeiss]

Wie könnte ich das am dümmsten anstellen die IP am Speedport dynamisch zu ändern?

Ich hab es mal mit Curl versucht indem ich einfach
mit ner Batch Datei den Router neu starte.

Zitat:

@echo off
curl.exe -k https://speedport.ip/cgi-bin/disconnect.exe
curl.exe -k https://speedport.ip/cgi-bin/connect.exe

Das Problem dabei ist nur das ich in dem fall fremde Dateien verwenden muss.

Alternativ habe ich noch ein Skript für JDownloader 2 auch mit diesen könnte ich den Router neustarten.
Aber auch wieder ein fremdes Programm. (Was Installiert werden muss)
Mir fehlt jetzt die Anbindung wie ich das Skript parsen müsste um zum Erfolg zu kommen.

Code:

[[[HSRC]]]
[[[STEP]]]
[[[REQUEST https="true"]]]
POST /cgi-bin/login.cgi HTTP/1.1
Host: speedport.ip
Referer: https://speedport.ip/
Content-Type: application/x-www-form-urlencoded
login_pwd=1&pws=%%%pass%%%
[[[/REQUEST]]]
[[[/STEP]]]
[[[STEP]]]
[[[REQUEST https="true"]]]
GET /cgi-bin/disconnect.exe HTTP/1.1
Host: %%%routerip%%%
[[[/REQUEST]]]
[[[/STEP]]]
[[[STEP]]]
[[[REQUEST https="true"]]]
GET /cgi-bin/connect.exe HTTP/1.1
Host: %%%routerip%%%
[[[/REQUEST]]]
[[[/STEP]]]
[[[/HSRC]]]

Wie könnte ich das mit eigener Anwendung realisieren
bei der ich 2 Dinge übergeben müsste das Passwort für den Router und den Link zum Neustart des Routers.
Mit Winsock oder Webbrowser in Delphi bin ich nicht so bewandert.

gruss

[Sir Rufo]

Würde ich mit den Indys TIdHttp versuchen (auch wenn du am liebsten NonVCL schreibst )
Alternativ gäbe es noch http://synapse.ararat.cz/doku.php/

Das Skript von JDownloader beinhaltet ja schon alle Aufrufe, die müsstest du fast 1:1 so verwenden können

Für beide benötigst du in jedem Fall (da https) die OpenSSL dlls (also eigentlich auch was externes)

[EWeiss]

Danke für die Infos.
Da ich mich in VB was Controls angeht etwas besser auskenne hab ich einen kleinen Test gemacht.

Code:

    Dim URL As String
    URL = "http://" & Text1.Text & "/cgi-bin/disconnect.exe"
    WebBrowser1.Navigate2 URL

Damit lade ich zumindest schon mal die Konfigurationsseite des Speedport in den versteckten Browser.
Das Problem ist nur das er mir einen Fehler meldet da das interne Skript das Passwort erwartet
bevor ich den Router neustarten kann.

Starte ich die Konfiguration von Hand gebe das Passwort ein
dann läuft alles also der Router startet dann neu mit meinem Test Projekt.

Gibt es einen weg das Passwort vorher zu übergeben?
Bevor ich disconnect.exe aufrufe?

Mist Router mit FritzBox ist das kein Problem.

Zitat:

Für beide benötigst du in jedem Fall (da https) die OpenSSL dlls

Jup auch für Curl
Das Problem dabei jeder macht sein eigenes Ding mit den Libs.

gruss

[Sir Rufo]

Du musst zunächst per POST das Kennwort senden (so wie im JDownloader-Skript)

Hmmm, wenn du ein Browserfenster verwendest, dann müsstest du die Login-Seite aufrufen, das Kennwort in das Feld eintragen und das Formular abschicken.

[EWeiss]

Zitat von Sir Rufo:

Du musst zunächst per POST das Kennwort senden (so wie im JDownloader-Skript)

Hmmm, wenn du ein Browserfenster verwendest, dann müsstest du die Login-Seite aufrufen, das Kennwort in das Feld eintragen und das Formular abschicken.

Du musst zunächst per POST opss.. zu wenig Erfahrung

Ja wenn ich das so mache geht es auch also Manuell im IE
Aus dem Programm wo ich auch einen Browser verwende nicht da kommt der User nicht dran
da dieses Fenster versteckt ist.
Das Login-Fenster ist ja
http://speedport.ip

Es soll ja auch alles mit einem klick auf einen Button erledigt sein.

Muss mich dann wohl oder übel doch mal schlau machen wie ich das unter Delphi
bewerkstelligt bekomme. Paar Tipps hab ich ja schon

gruss

[Sir Rufo]

Das mit dem Eintragen von Daten in ein Webformular und abschicken geht auch per Code und somit auch mit verstecktem Fenster.

http://www.delphipraxis.net/171367-t...usfuellen.html