Beiträge von emilio20

Hallo

ich habe mir eine IP Sprechanlage mir einem Raspberry pi und Doorpi gebaut. Wenn jemand Klingelt läuten meine Fritz Fon mit dem ich auch mit der Außenstelle sprechen kann.

Da ich einen Windows PC als Haussteuerung permanent laufen habe würde ich gerne über diesen mit der Sprechanlage kommunizieren. Das geht auch schob über MicroSIP.

Ich würde aber gerne mit Autoit ein Programm schreiben womit ich auch das Kamerabild angezeigt bekommen.

Gibt es für Autoit ein SIP Programm wie MicroSIP ?

Hallo
ich habe mich vieleicht falsch ausgedruckt. Die Visualisierungssoftware ist keine AutoIT. Es ist eine anderes Programm.

Mit deinem Script wird ja ein GUI gestartet.

Hallo
ich verwende ein Visualisierungsprogramm das sich immer in den Vordergund legt und meine Win7 Taskleiste in den Huntergund legt.
Gibt es einen Befehl damit die Taskleiste immer im vordergund bleibt ?

Hallo
habe ich gemacht auch der wert 0.

Welcher befehl in WinHttp liest den "http.responseText" rückgabewert aus ?

Kann mir jemand sagen wie ich die antort erhalten kann ?

Hallo
nein eben nicht erhalte von $result nur den wert 0. Es musste aber der Stromverbrauch von ca 30 herauskommen.

hier noch mal die Funktionen

Func _FB_GetRequestDECT200($Kommando)
_FB_Logfile("Executing GetRequestDECT200", 3)
;_ArrayDisplay($fields)
$mode = "GET"

$result =_FB_Request('//webservices/homeautoswitch.lua?ain=087610122457&switchcmd='&$Kommando&'&sid=' & _FB_GetSID(), "GET")

if $Kommando = 'getswitchpower' THEN

_FB_Logfile('wert'&$result& @CRLF)
EndIf
Return $result
EndFunc

;do the actual request withnthe FB
Func _FB_Request($page, $fields, $mode = "GET")
_FB_Logfile("Executing _FB_Request", 3)

$mode = StringUpper($mode)
If $mode <> "POST" And $mode <> "GET" Then
_FB_Logfile("Error: _FB_Request called with wrong mode parameter: " & $mode)
SetError(1)
Return ""
EndIf

If UBound($fields) >= 1 And $mode = "GET" Then;add post fields if any
_FB_Logfile(UBound($fields) & " fields found, adding query to request", 3)
$page = $page & _FB_HttpBuildQuery($fields)
EndIf

If $enable_remote_config = 1 Then;when ssl is used add flag
_FB_Logfile("Using SSL mode", 3)
$hRequest = _WinHttpOpenRequest($hConnect, $mode, $page, Default, Default, "*/*", BitOR($WINHTTP_FLAG_SECURE, $WINHTTP_FLAG_ESCAPE_DISABLE))
Else
$hRequest = _WinHttpOpenRequest($hConnect, $mode, $page, Default, Default, "*/*")
EndIf
If @error Or $hRequest = 0 Then
_FB_Logfile("Error: _WinHttpOpenRequest failed")
Return ""
EndIf

If $enable_remote_config = 1 And $use_lua_login = 0 Then;when ssl is used and old login methode is active, add basic auth
$scResult = _WinHttpSetCredentials($hRequest, $WINHTTP_AUTH_TARGET_SERVER, $WINHTTP_AUTH_SCHEME_BASIC, $remote_config_user, $remote_config_password)
If @error Or $scResult = 0 Then
_FB_Logfile("Error: _WinHttpSetCredentials failed")
Return ""
EndIf
EndIf

If $enable_remote_config = 1 And $check_cert = 0 Then;when ssl is used and we do not want to chech the certificate for validity, we add options to ignore errors
$allow_unknownCA_wrongCN = BitOR($SECURITY_FLAG_IGNORE_UNKNOWN_CA, $SECURITY_FLAG_IGNORE_CERT_CN_INVALID)
$soResult = _WinHttpSetOption($hRequest, $WINHTTP_OPTION_SECURITY_FLAGS, $allow_unknownCA_wrongCN);handle invalid ssl cerificate used by fritzbox
If @error Or $soResult = 0 Then
_FB_Logfile("Error: _WinHttpSetOption failed with code " & @error)
Return ""
EndIf
EndIf

If UBound($fields) >= 1 And $mode = "POST" Then;add post fields if any
_FB_Logfile(UBound($fields) & " fields found, adding query to request", 3)
$srResult = _WinHttpSendRequest($hRequest, "Content-Type: application/x-www-form-urlencoded" & @CRLF, _FB_HttpBuildQuery($fields))
Else
$srResult = _WinHttpSendRequest($hRequest)
EndIf

If @error Or $srResult = 0 Then
_FB_Logfile("Error: _WinHttpSendRequest failed")
Return ""
EndIf

$RecResResult = _WinHttpReceiveResponse($hRequest)
If @error Or $RecResResult = 0 Then
_FB_Logfile("Error: _WinHttpReceiveResponse failed")
Return ""
EndIf

Local $result = ""
While _WinHttpQueryDataAvailable($hRequest)
Local $sChunk = _WinHttpReadData($hRequest)
If @error Then ExitLoop
$result &= $sChunk
WEnd

If $result = "" Then
_FB_Logfile("Error: _WinHttpReadData failed")
Return ""
EndIf
_WinHttpCloseHandle($hRequest)

If @error Or $result = "" Then
_FB_Logfile("Error: GetRequest failed")
Else
FileDelete(@ScriptDir & "\Request.txt")
_FB_Logfile("Response: " & $result, 3, @ScriptDir & "\Request.txt")
EndIf
Return $result
EndFunc ;==>_FB_Request

Hallo
ich habe die API im FB_Tool angepasst

Func _FB_GetRequestDECT200($Kommando)
_FB_Logfile("Executing GetRequestDECT200", 3)
;_ArrayDisplay($fields)
$mode = "GET"

$result =_FB_Request('//webservices/homeautoswitch.lua?ain=087410622157&switchcmd='&$Kommando&'&sid=' & _FB_GetSID(), "GET")

if $Kommando = 'getswitchpower' THEN

_FB_Logfile('wert')
EndIf
Return $result
EndFunc ;==>_FB_GetRequest

Hiermit kann ich die Steckdosen steueurn.

Wie kann ich eime http.responseText empfangen ?

Verwende die WinHttp.include

Habe was gefunden. Hier fehlt aber doch die DECT 200
http://www.autoitscript.com/forum/topic/13…ox-from-autoit/

Wlan Aus und An habe ich getestet und geht. SID wir auch ausgelesen

ok dann liegt es wohl doch an der Sensor id warum ich die Steckdose nicht schalten kann. Ich wusste nicht genau was mit http get request gemeint ist.
Dann muss ich mal schauen warum es nicht geht.

Hallo
ich würde gerne mit Autoit eine Fritz DECT 200 Steckdose schalten. Hierzu gibt es eine API

http://avm.de/fileadmin/user…P-Interface.pdf

Wie kann ich also die anfrage als Http Get request senden ?

[url]https://fritz.box/webservices/homeautoswitch.lua?ain=087610122457&switchcmd=setswitchon&sid=8445240122405[/url]

Hallo
ich möchte ein script erstellen mit dem ich ispy öffnen kann. wenn ispy startet wir es automatisch minimiert und das Grid1 geöffnet. Diese würde ich gerne in einer gewissen größe und Position anzeigen lassen.
Ist es möglich dies in einer gewissen Position und größe anzuzeigen

If NOT ProcessExists("iSpy.exe") Then
Run("C:\Program Files\iSpy\iSpy (64 bit)\iSpy.exe","",@SW_MAXIMIZE)
EndIf
WinSetState("Grid 1", "", @SW_MAXIMIZE)

Hallo
habe es soweit hinbekommen das ich ein Screenshot von der Synology angezeigt bekommen.Jetzt habe ich ein weiteres Problemm.
Ich erhalte nur ein Aktuelles Kamerabild wenn ich im Internet Explorer auf Aktualisieren drücke. Annstonnsten erhalte ich ein altes Bild.
Ich meine damit wenn ich heute 24.10. das Script Starte erhalte ich das Bild vom 23.10.

Wie kann ich im Script Aktualisiren einbauen ? Finde nichts im Netz ?

Weiterhin Funktioniert das Speichern des Bildes mit InetGet nicht ?

#include <IE.au3>

Local $oIE = _IECreate("http://192.168.178.22:5000/webapi/auth.cgi?api=SYNO.API.Auth&version=2&method=Login&session=SurveillanceStation&account=Andreas&passwd=***********",1,1,0)

_IENavigate($oIE, "http://192.168.178.22:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=3&method=List")
_IENavigate($oIE, "http://192.168.178.22:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=1&method=getSnapshot&cameraId=2")
sleep(2000)

InetGet("http://192.168.178.22:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=1&method=getSnapshot&cameraId=2", @ScriptDir & "\Bilder\Bild.dat",1,1)

Hallo
ich habe jetzt herausgefunden mit welchen uhl ich mich auf der Synology registriene kann
Wie kann ich in Autoit mehrere UHL Links eingeben ?

http://ip-der-ds:5000/webapi/auth.cgi?api=SYNO.API.Auth&version=2&method=Login&session=SurveillanceStation
pause
http://ip-der-ds:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=3&method=List
pause
http://ip-der-ds:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=1&method=getSnapshot&cameraId=1

habe bisher nur folgendes

#include <ie.au3>

_IECreate("http://ip-der-ds:5000/webapi/auth.cgi?api=SYNO.API.Auth&version=2&method=Login&session=SurveillanceStation", 1, 1, 0)
sleep(1000)
_IECreate("http://http://ip-der-ds:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=3&method=List", 1, 1, 0)
sleep(1000)
_IECreate("http://ip-der-ds:5000/webapi/SurveillanceStation/camera.cgi?api=SYNO.SurveillanceStation.Camera&version=1&method=getSnapshot&cameraId=1", 1, 1, 0)
sleep(1000)

Es werden aber 3 Internet Explorer Fenster geöffnet. Wie kann ich alle 3 Links in einem Internet Explorer Fenster nacheinander ausführen ?
Ich dachte es geht mit der 1 nach dem Link ?

Hallo
ich verzeifle noch ich wollte mit

WinSetState("Synology DiskStation - DiscStation - Internet Explorer", "", @SW_MAXIMIZE)

den Internet Explorer Maxmimieren. Es finktioniert aber nicht.
Wenn ich z.b es mit Google versuche geht es. Ich habe auch schon im Task Manager geschaut ob ich die Anwendung falsch schreibe. Ich finde aber keinen fehler.

Hat jemand einen Rat was ich falsch mache ?

Wie kann ich Prüfen ob die Webseite http://192.168.178.22:5000/cam/ geööfnet ist ?

Hallo
kann mir jemand helfen ?
Ich wollte mir ein Programm erstellen mit dem ich eine Synology Surveillance Station autostart startet.
Folgense muss das Programm können. Beim Starten des Programm wir die UHL "http://192.168.178.22:5000/cam/" gestartet.
Hier muss sich eingelogt werden mit Benutzer : admin und Passwort 1234.

Wird das Programm erneut gestartet und die UHL ist schon geöffnet wird es nicht erneut ausgeführt.
Ist der Explorer minimiert wird er maximiert.

Bis jetzt Startet nur die UHL. Der Login Funktioniert nicht

im Anhang mal die Forms

#include <ie.au3>
;Einfaches Beispiel für das Anmelden an Webseiten mit Benutzer und Passwort am Beispiel des Autoit.de-Forums
;Autoit-Version:3.2

;Erstellt eine Instanz (neues Fenster) des InternetExplorers und gibt ein entsprechendes Objekt zurück.
$oIE = _IECreate ("http://192.168.178.22:5000/cam/")
;Prüfen ob ein Objekt erzeugt wurde
If IsObj($oIE) Then
;warten bis die Seite komplett geladen wurde
_IELoadWait($oIE)
;Erzeugen eines HTML-Formular-Objekts mit Hilfe des Formularnamens
$oForm = _IEFormGetObjByName($oIE,"Synology DiskStation-DiskStation" )
;Erzeugen eines Formularfeld-Objekts mit Hilfe des Feldnames
$oUsername = _IEFormElementGetObjByName($oForm, "username")
;Setzen des Formularfeldinhalts
_IEFormElementSetValue($oUsername, "admin")
;Erzeugen eines Formularfeld-Objekts mit Hilfe des Feldnames
$oPasswd = _IEFormElementGetObjByName($oForm, "passwd")
;Setzen des Formularfeldinhalts
_IEFormElementSetValue($oPasswd, "1234")
;Absenden des Formulars
_IEFormSubmit($oForm)

;wenn kein Objekt erzeugt wurde, Fehlermeldung ausgeben.
Else
;Detailierte Fehlerbehandlung überlasse ich einem separaten Tutorial
MsgBox(48,"Erstellen des IE-Objekts fehlgeschlagen","Es konnte keine neue InternetExplorer-Instanz erzeugt werden!")
EndIf

Hallo
es gäbe noch eine 2 Lösung.
Ich könnte über einen Script den Internet explorer als Programm Starten und die Seite der Surveillance Station öffnen (http://192.168.178.22:5000/cam/)

Hier müsste dann der Login ausgefurt werden.

Da ich nicht jedes mal warent möchte bis die Seite geladen ist würde ich sie beim Neustart automatisch Starten und minimieren .

Das Script müsste somit Prüfen ob der Internetexplorer gestartet ist und minimiert ist. Ist dies der fall muss der explorer Maximiert werden.

Hallo ich habe eine synology und mochte gerne per Autoit mich in die Disc einlogen.
Ich habe folgendes erstellt

Run ("C:\Program Files\Internet Explorer\iexplore.exe http://192.168.178.22:5000/cam/")

Jetzt feht aber noch der Login. Ich werde auf die anmelde Seite der Synology weitergeleitet.
Wie kann ich den Login mit einbinden ?

Keiner eine lösung ?
Wollte mir eine Sprechanlagenprogramm schreiben. Wenn geklingelt wird wird das Programm in den Vordergrund eingeblendet. Dort wollte ich das Livebild einer IP Kamera sehen .
Türe öffnen geht über Libnodave da eine SPS im Haus verbaut ist. Von dort kommt auch das Klingelsignal.

Über die Micro und Lautsprecher komunikation muss ich mir noch gedanken machen.

Hallo
gibt es eine Möglichkeit von einer IP Cam einen Live Stream in GUI anzuzeigen ?
Ich meine nur da Kamerabild