AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte FritzBox - Telefoniegeräte - bitte testen.
Thema durchsuchen
Ansicht
Themen-Optionen

FritzBox - Telefoniegeräte - bitte testen.

Ein Thema von Garfield · begonnen am 23. Jun 2012 · letzter Beitrag vom 8. Mär 2014
Antwort Antwort
Benutzerbild von MacGuyver
MacGuyver

Registriert seit: 9. Sep 2003
Ort: Wildeshausen
293 Beiträge
 
Turbo Delphi für Win32
 
#1

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 23. Jun 2012, 18:45
Moin auch!

BoxInfo

Name FRITZ!Box Fon WLAN 7270 v3
HW 145
Version 74.04.89
Revision 19590
Serial ....
OEM avm
Lang de
Annex B
Lab
Country 049
Flag nomini

Bei Wählhilfe ist der Kasten leer.
Bei Test wiederholt er nur die Anfrage.
Ich habe die Tapi-Unterstützung installiert.
Mein Anschluss ist 2 x ISDN mit 4 MSN und DSL.
Win7 64Bit.

Ich hoffe, du kannst mit den Daten etwas anfangen.
Englisch eine Weltsprache? Zu kompliziert und der nahe Osten würde Englisch als Pflichtweltsprache nicht akzeptieren.
IDO wäre genau das Richtige: http://forum.idolinguo.de/index.php oder www.idolinguo.de
  Mit Zitat antworten Zitat
Benutzerbild von Garfield
Garfield

Registriert seit: 9. Jul 2004
Ort: Aken (Anhalt-Bitterfeld)
1.334 Beiträge
 
Delphi XE5 Professional
 
#2

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 23. Jun 2012, 19:10
Danke für die Tests. Ich habe leider vergessen zu schreiben, dass das Script Query.LUA verwendet wird, welches es in der Firmwareversion 74.04.89 noch nicht gibt. Ich musste bei meiner 7320 auch erst ein Update von 74.04.89 auf 74.05.22 vornehmen.
Gruss Garfield
Ubuntu 22.04: Laz2.2.2/FPC3.2.2 - VirtBox6.1+W10: D7PE, DXE5Prof
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#3

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 23. Jun 2012, 23:21
Ist das eigentlich gewollt, dass die Instanz von THttpRequest niemals freigegeben wird?
Wäre da nicht ein try finally angebracht?
Delphi-Quellcode:
function TFritzbox.GetLogOut: Boolean;
{*******************************************************************************
*  -8- Aus der Fritzbox ausloggen.
}

var
  HTTPReq : THTTPRequest;
begin
  {
  *  Wenn noch nicht eingeloggt ...
  }

  if GetIsLoggedIn then
  begin
    {
    *  Abfrage mit Senden des Passwortes.
    }

    HTTPReq := THTTPRequest.Create;
    try
      HTTPReq.Method := 'POST';
      HTTPReq.Accept := 'text/html';
      HTTPReq.ContentType := 'application/x-www-form-urlencoded';
      HTTPReq.URL := FRITZBOXurl(FRITZBOX_PATH_WEBCM);
      HTTPReq.SendStream := Format(FRITZBOX_MENU_LOGOUT, [FSession.SID]);
      {
      *  Ausführen.
      }

      HTTPReq.Execute;
      {
      *  Eine Überprüfung der Antwort ist nicht notwendig, da keine neue SessionID
      *  übernommen werden muss. Siehe nächsten Kommentar.
      }

    finally
      HTTPReq.Free;
    end;
  end;
  {
  *  Es wird geprüft, ob die SessionID noch gültig und der Zugriff auf die
  *  Fritzbox möglich ist.
  }

  Result := GetIsLoggedIn;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von MacGuyver
MacGuyver

Registriert seit: 9. Sep 2003
Ort: Wildeshausen
293 Beiträge
 
Turbo Delphi für Win32
 
#4

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 24. Jun 2012, 00:16
So, nun habe ich die 74.05.22 drauf. Es hat sich nichts geändert. Was muss ich den bei Test reinschreiben?
Englisch eine Weltsprache? Zu kompliziert und der nahe Osten würde Englisch als Pflichtweltsprache nicht akzeptieren.
IDO wäre genau das Richtige: http://forum.idolinguo.de/index.php oder www.idolinguo.de
  Mit Zitat antworten Zitat
Benutzerbild von Garfield
Garfield

Registriert seit: 9. Jul 2004
Ort: Aken (Anhalt-Bitterfeld)
1.334 Beiträge
 
Delphi XE5 Professional
 
#5

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 24. Jun 2012, 01:32
Ist das eigentlich gewollt, dass die Instanz von THttpRequest niemals freigegeben wird?
Wäre da nicht ein try finally angebracht?
Gewollt ist so etwas sicher nicht. Muss ich nachher zu Hause mal nachsehen.

So, nun habe ich die 74.05.22 drauf. Es hat sich nichts geändert. Was muss ich den bei Test reinschreiben?
Das ist schlecht. Ich habe eigentlich nur den Port für den Callmonitor freigegeben und es funktioniert. Weiß jetzt gar nicht ob für Telnet noch ein Port geöffnet werden muss.
Mir kommt es im Moment nur darauf an, ob in der Wählhilfe Telefoniegeräte angezeigt werden. Unter Test sehe ich mir an, was die Settings bewirken. Im Moment müsste da die Liste der Telefonate angezeigt werden.
Gruss Garfield
Ubuntu 22.04: Laz2.2.2/FPC3.2.2 - VirtBox6.1+W10: D7PE, DXE5Prof
  Mit Zitat antworten Zitat
Benutzerbild von Garfield
Garfield

Registriert seit: 9. Jul 2004
Ort: Aken (Anhalt-Bitterfeld)
1.334 Beiträge
 
Delphi XE5 Professional
 
#6

AW: FritzBox - Telefoniegeräte - bitte testen.

  Alt 24. Jun 2012, 05:58
@ Sir Rufo: Vielen Dank für Deinen Hinweis. Das hatte ich übersehen.

@ MacGuyver: Es scheint ein Problem mit der Anmeldung unter Win7 64bit zu geben. Die Antwort ist nicht vollständig und es wird keine SessionID gelesen.
Gruss Garfield
Ubuntu 22.04: Laz2.2.2/FPC3.2.2 - VirtBox6.1+W10: D7PE, DXE5Prof

Geändert von Garfield (24. Jun 2012 um 06:24 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:43 Uhr.
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