SSL Request

#include ssl_request.ahk

IniRead, Host, settings.ini, Optionen, Host, localhost
IniRead, File, settings.ini, Optionen, File, index.php
IniRead, Port, settings.ini, Optionen, Port, https
IniRead, Post, settings.ini, Optionen, Post, %A_Space%
IniRead, checkBox, settings.ini, Optionen, Base64, 0

Gui, Add, Text, x22 y70 w80 h20 , Remote-Datei
Gui, Add, Text, x22 y110 w80 h20 , Port
Gui, Add, Text, x22 y150 w80 h20 , Post-Daten
Gui, Add, Text, x22 y370 w140 h20 , Serverantwort
Gui, Add, Text, x22 y30 w80 h20 , Host / IP

Gui, Add, Edit, x102 y30 w320 h20 vHost, %Host%
Gui, Add, Edit, x102 y70 w320 h20 vFile, %File%
Gui, Add, Edit, x102 y110 w320 h20 vPort, %Port%
Gui, Add, Edit, x22 y180 w400 h130 vPost, %Post%
Gui, Add, Edit, x22 y390 w400 h230 vOutput +ReadOnly,

Gui, Add, Button, x262 y330 w160 h20 gButton, HTTPS-Request
Gui, Add, CheckBox, x22 y330 w140 h20 vcheckBox, Base64
Gui, Show, x425 y127 h645 w447, HTTPS-Request via SSL-Verschlüsselung

GuiControl,, checkBox, %checkBox%
Return

GuiClose:
ExitApp


Button:
Gui, Submit, NoHide

IniWrite, %Host%, settings.ini, Optionen, Host
IniWrite, %File%, settings.ini, Optionen, File
IniWrite, %Port%, settings.ini, Optionen, Port
IniWrite, %Post%, settings.ini, Optionen, Post
IniWrite, %checkBox%, settings.ini, Optionen, Base64

if(!StrLen(Host) || !StrLen(File) || !StrLen(Port))
{
    MsgBox Keine gültige Eingabe!
    return
}

if(ssl_request(Host, File, Post, Port, answer, checkBox))
{
    GuiControl, Text, Output, %answer%
}
else
{
    text := "Fehler in der Abfrage!`r`n" . answer
    MsgBox %text%
    GuiControl, Text, Output,
}
return