Beiträge von autoBert

  • Zip auslesen und verarbeiten

    Zitat von Freaky

    Ja aber wie?
    Soll ich dem GuiCtrlCreatePic dann einfach die Source vom Bild geben ?

    Zitat von PCKing

    mit FileRead() kannst du den code vom bild rausbekommen, den speicherst du dann in einer variable und anstatt den pfad gibst du die variable an

    Dann kann er ja gleich

    [autoit]

    GuiCtrlPic(filename, left, top)

    [/autoit]

    nehmen, das klappt wenigstens im Gegensatz zu deinem Vorschlag,
    Freaky wenn du es schaffst den entpackten Source des gewünschten Bildes aus dem Zip-File in eine Variable zu bekommen, dann kannst du mit Funktionen aus http://www.autoit.de/index.php?page=Attachment&attachmentID=10231&h=16c814ec91cdcefd8807d87dda74dbb31d158a1a von UEZ es ohne zu speichern zumindest mit GDI+ erstellen,

    mfg (Auto)Bert

  • Sicherheit der Verbindung beim E-Mail senden mit AutoIt

    Die Antwort ist doch schon gegeben

    Zitat von AutoBert

    solange SSL nicht enabled ist, das geht aber bei den meisten Freemailern nicht.

    siehe auch:

    Zitat von AutoBert

    HotMail:

    * $SmtpServer = "smtp.live.com" ; address for the smtp-server to use - REQUIRED
    * $IPPort = 25 ; port used for sending the mail normaly 25
    * $ssl = 1 ; enables/disables secure socket layer sending - put to 1 if using httpS

    Hotmail ist bis jeztz der einzige von mir getestete Freemailer der SSL = 1 (also https) akzeptiert


    mfg (Auto)Bert

  • K8055 Programmer?

    Hallo button421,

    mir ist aufgefallen, dass sowwohl in deiner als auch in Schnitzel 's Version sich das Fenster für die Aktionen nicht separat schliessen lässt. Desweiteren ist es sinnvoll die Chechboxen für Ein- und Ausgänge in Arrays zu verwalten. Hier das angepasste Skript, Schnitzels-Änderuung ist eingebaut, ich hoffe dass meine Änderungen das Schreiben in die Ini betreffend nicht schädlich sind:

    Spoiler anzeigen
    [autoit]

    #region includes ;########################
    ;#include <k8055udf.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <GuiStatusBar.au3>
    #include <ListViewConstants.au3>
    #include <ComboConstants.au3>
    #endregion includes ;########################
    ;##########################################
    Global $adressebin = ""
    Global $aktion = "Programm erfolgreich gestartet"
    Global $ini = @ScriptDir & "\logdatei.ini"
    ;~ Global $inputsoutputsini = IniRead($ini,"inputsandoutputs",Default,"1")
    IniDelete($ini, "log")
    IniWrite($ini, "log", "Startdaten", @HOUR & ":" & @MIN & ":" & @SEC & ":" & @MSEC & "-Datum:" & @MDAY & "." & @MON & "." & @YEAR)
    #region ### START Verbindungsform ### Form=
    $idfrmConnect = GUICreate("Verbindung", 184, 100, 190, 126, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
    $SK5 = GUICtrlCreateCheckbox("SK5", 24, 16, 41, 17)
    $SK6 = GUICtrlCreateCheckbox("SK6", 128, 16, 41, 17)
    $Adresse = GUICtrlCreateGroup("Adresse", 8, 0, 169, 41)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateLabel("<---------------->", 64, 16, 64, 17)
    $Progress1 = GUICtrlCreateProgress(0, 80, 182, 17)
    $mitboardverbinden = GUICtrlCreateButton("Mit K8055 Board verbinden", 8, 48, 171, 25, $WS_GROUP)
    GUISetState(@SW_HIDE)
    #endregion ### START Verbindungsform ### Form=
    ;##########################################
    #region ### START Hauptform ### Form=c:\users\jonathan verbeek\desktop\k8055 programmer\hauptform.kxf
    Dim $idDigInp[6] ; nimmt die ID's der Checkboxen auf 0 ist SonderFall (Summe der gesetzten Inputs)
    Dim $idDigOut[9] ; nimmt die ID's der Checkboxen auf 0 ist SonderFall (Summe der gesetzten Outputs)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $idfrmMain = GUICreate("K8055 Board Programmer Basicpack - created by button421", 519, 412, 187, 121)
    $statusleiste = _GUICtrlStatusBar_Create($idfrmMain)
    Dim $statusleiste_PartsWidth[2] = [439, -1]
    _GUICtrlStatusBar_SetParts($statusleiste, $statusleiste_PartsWidth)
    _GUICtrlStatusBar_SetText($statusleiste, $aktion, 0)
    _GUICtrlStatusBar_SetText($statusleiste, "Verbunden", 1)
    $DigitaleEingaenge = GUICtrlCreateGroup("Digitale Eingänge", 8, 0, 169, 41)
    For $i = 1 To 5
    $idDigInp[$i] = GUICtrlCreateCheckbox("I" & $i, -16 + 32 * $i, 16, 25, 17)
    Next
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $DigitaleAusgaenge = GUICtrlCreateGroup("Digitale Ausgänge", 184, 0, 329, 41)
    For $i = 1 To 8
    $idDigOut[$i] = GUICtrlCreateCheckbox("O" & $i, 152 + $i * 40, 16, 33, 17)
    Next
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $ListView1 = GUICtrlCreateListView("Aktionen", 8, 48, 506, 310)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 502)
    $addaktion = GUICtrlCreateButton("Aktion hinzufügen", 8, 360, 107, 25, $WS_GROUP)
    $delaktion = GUICtrlCreateButton("Aktion löschen", 120, 360, 91, 25, $WS_GROUP)
    $anleitung = GUICtrlCreateButton("Anleitung für Experimente", 216, 360, 131, 25, $WS_GROUP)
    $hilfe = GUICtrlCreateButton("Hilfe und Info", 352, 360, 75, 25, $WS_GROUP)
    $beenden = GUICtrlCreateButton("Beenden", 432, 360, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    #cs funktioniert nur wenn die Werte jeweils nur in einem Iniwert gespeichert werden
    $idDigInp[0] = IniRead($ini, "inputsandoutputs", "Inp", 0)
    ConsoleWrite("Einlesen Input" & $idDigInp[0] & @CRLF) ;nur zum Verständnis kann auskommentiert werden

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 1 To 5
    If BitAND(2 ^ ($i - 1), $idDigInp[0]) = 2 ^ ($i - 1) Then
    #cs prüfen ob die entsprechenden Bits gesetzt sind
    "i1" steht für 2^0 also 1
    "i2" steht für 2^1 also 2
    "i3" steht für 2^2 also 4 (2*2)
    "i4" steht für 2^3 also 8 (2*2*2)
    "i5" steht für 2^4 also 16
    wenn 1 , 2 und 4 gesetzt kommt 11, heraus alle gesetzt = 31
    #ce
    GUICtrlSetState($idDigInp[$i], $GUI_CHECKED)
    ConsoleWrite("I" & $i & "= 1" & @CRLF)
    Else
    GUICtrlSetState($idDigInp[$i], $GUI_UNCHECKED)
    ConsoleWrite("O" & $i & "= 0" & @CRLF)
    EndIf
    Next

    [/autoit] [autoit][/autoit] [autoit]

    $idDigOut[0] = IniRead($ini, "inputsandoutputs", "Out", 0)
    ConsoleWrite("Einlesen Output" & $idDigOut[0] & @CRLF) ;nur zum Verständnis kann auskommentiert werden
    For $i = 1 To 8
    If BitAND(2 ^ ($i - 1), $idDigOut[0]) = 2 ^ ($i - 1) Then
    GUICtrlSetState($idDigOut[$i], $GUI_CHECKED)
    ConsoleWrite("i" & $i & "= 1" & @CRLF)
    Else
    GUICtrlSetState($idDigOut[$i], $GUI_UNCHECKED)
    ConsoleWrite("i" & $i & "= 0" & @CRLF)
    EndIf
    Next
    #ce

    [/autoit] [autoit][/autoit] [autoit]

    #endregion ### START Hauptform ### Form=c:\users\jonathan verbeek\desktop\k8055 programmer\hauptform.kxf
    ;#######################################
    #region ### START Aktion hinzufügen ### Form=
    $idfrmAction = GUICreate("Aktion hinzufügen", 246, 187, 192, 124, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
    $Aktionlabel = GUICtrlCreateLabel("Aktion:", 8, 8, 37, 17)
    $aktioncombo = GUICtrlCreateCombo("", 48, 8, 193, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "Meldung anzeigen|Digitalen Ausgang ein/ausschalten|Abfrage ob Digitaler Eingang ein/aus|Wert für 7-Segment Display festlegen")
    $probs = GUICtrlCreateGroup("Einstellungen für Aktion festlegen", 8, 32, 233, 121)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $cancelactionadd = GUICtrlCreateButton("Abbrechen", 168, 160, 75, 25, $WS_GROUP)
    $okactionadd = GUICtrlCreateButton("OK", 88, 160, 75, 25, $WS_GROUP)
    GUISetState(@SW_HIDE)
    #endregion ### START Aktion hinzufügen ### Form=
    ;#######################################
    While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[1]
    Case $idfrmConnect
    Switch $nMsg[0]
    Case -3
    GUISetState(@SW_HIDE, $idfrmConnect)
    Case $SK5
    If BitAND(GUICtrlRead($SK5), $GUI_CHECKED) Then
    $adressebin = "SK5/"
    EndIf
    Case $SK6
    If BitAND(GUICtrlRead($SK6), $GUI_CHECKED) Then
    $adressebin = "SK6/"
    EndIf
    Case $mitboardverbinden
    If GUICtrlRead($adressebin) = "SK5/SK6/" Then
    ;USB_DLLOpen()
    ;initial_board(0)
    GUICtrlSetState($Progress1, 100)
    MsgBox(64, "Info", "Mit Board verbunden!")
    GUISetState(@SW_SHOW, $idfrmMain)
    GUISetState(@SW_HIDE, $idfrmConnect)
    ElseIf GUICtrlRead($adressebin) = "SK6/" Then
    ;USB_DLLOpen()
    ;initial_board(1)
    GUICtrlSetState($Progress1, 100)
    MsgBox(64, "Info", "Mit Board verbunden!")
    GUISetState(@SW_SHOW, $idfrmMain)
    GUISetState(@SW_HIDE, $idfrmConnect)
    ElseIf GUICtrlRead($adressebin) = "SK5/" Then
    ;USB_DLLOpen()
    ;initial_board(2)
    GUICtrlSetState($Progress1, 100)
    MsgBox(64, "Info", "Mit Board verbunden!")
    GUISetState(@SW_SHOW, $idfrmMain)
    GUISetState(@SW_HIDE, $idfrmConnect)
    Else
    ;USB_DLLOpen()
    ;initial_board(3)
    GUICtrlSetState($Progress1, 100)
    MsgBox(64, "Info", "Mit Board verbunden!")
    GUISetState(@SW_SHOW, $idfrmMain)
    GUISetState(@SW_HIDE, $idfrmConnect)
    EndIf
    EndSwitch
    Case $idfrmMain
    Switch $nMsg[0]
    Case -3, $beenden
    Exit
    Case $idDigInp[1], $idDigInp[2], $idDigInp[3], $idDigInp[4], $idDigInp[5]
    $idDigInp[0] = 0
    For $i = 1 To 5
    If BitAND(GUICtrlRead($idDigInp[$i]), $GUI_CHECKED) Then
    $idDigInp[0] += 2 ^ ($i - 1)
    IniWrite($ini, "inputsandoutputs", "I" & $i, 1)
    ConsoleWrite("I" & $i & ": = 1")
    Else
    IniWrite($ini, "inputsandoutputs", "I" & $i, 0)
    ;IniDelete($ini, "inputsandoutputs", "I" & $i) ;evtl. obige Zeile löschen und diese nehmen
    ConsoleWrite("I" & $i & ": = 0")
    EndIf
    Next
    #cs dies in einem einzigen Ini-Eintrag zu speichern wäre eleganter
    ConsoleWrite($idDigInp[0] & @CRLF) ;nur zum Verständnis kann auskommentiert werden
    IniWrite("Inp : =" & $ini, "inputsandoutputs", "Inp", $idDigInp[0])
    #cs
    ist jetzt doppelt gemoppelt jeder einzelne Wert ist gesetzt, zusätzlich in Out Bitweise gesetzt
    "i1" steht für 2^0 also 1
    "i2" steht für 2^1 also 2
    "i3" steht für 2^2 also 4 (2*2)
    "i4" steht für 2^3 also 8 (2*2*2)
    "i5" steht für 2^4 also 16
    wenn 1 , 2 und 4 gesetzt kommt 11, heraus alle gesetzt = 31
    #ce
    #ce
    Case $idDigOut[1], $idDigOut[2], $idDigOut[3], $idDigOut[4], $idDigOut[5], $idDigOut[6], $idDigOut[7], $idDigOut[8]
    $idDigOut[0] = 0
    For $i = 1 To 8
    If BitAND(GUICtrlRead($idDigOut[$i]), $GUI_CHECKED) Then
    $idDigOut[0] += 2 ^ ($i - 1)
    IniWrite($ini, "inputsandoutputs", "O" & $i, 1) ;jetzt eigentlich überflüssig
    ConsoleWrite("O" & $i & ": = 1")
    Else
    IniWrite($ini, "inputsandoutputs", "O" & $i, 0) ;jetzt eigentlich überflüssig
    ;IniDelete($ini, "inputsandoutputs", "O" & $i) ;evtl. obige Zeile löschen und diese nehmen
    ConsoleWrite("O" & $i & ": = 0")
    EndIf
    Next
    #cs dies in einem einzigen Ini-Eintrag zu speichern wäre eleganter
    ConsoleWrite("Out : =" & $idDigOut[0] & @CRLF) ;nur zum Verständnis kann auskommentiert werden
    IniWrite($ini, "Inputsandoutputs", "Out", $idDigOut[0])
    #cs
    ist jetzt doppelt gemoppelt jeder einzelne Wert ist gesetzt, zusätzlich in Out Bitweise gesetzt
    "O1" steht für 2^0 also 1
    "O2" steht für 2^1 also 2
    "O3" steht für 2^2 also 4 (2*2)
    "O4" steht für 2^3 also 8 (2*2*2)
    "O5" steht für 2^4 also 2
    "O6" steht für 2^5 also 2
    "O7" steht für 2^6 also 2
    "08" steht f+r 2^7 also 128
    wenn 1 , 2 , 4 und 8 gesetzt kommt 139 heraus , wenn alle gestetzt sind 255
    #ce
    #ce
    Case $addaktion
    ConsoleWrite("Bin da " & @CRLF)
    GUISetState(@SW_SHOW, $idfrmAction)
    GUICtrlDelete($probs)
    EndSwitch
    Case $idfrmAction
    Switch $nMsg[0]
    Case -3, $cancelactionadd
    GUISetState(@SW_HIDE, $idfrmAction)
    Case $okactionadd
    GUISetState(@SW_HIDE, $idfrmAction)
    Case $aktioncombo
    If GUICtrlRead($aktioncombo) = "Meldung anzeigen" Then
    $probs = GUICtrlCreateGroup("Einstellungen für Meldung festlegen", 8, 32, 233, 121)
    $title = GUICtrlCreateInput("Titel der Meldung", 17, 45, 217, 21)
    $text = GUICtrlCreateInput("Text der Meldung", 17, 70, 217, 73)
    IniWrite($ini, "aktion", "Msg", "1")
    EndIf
    If GUICtrlRead($aktioncombo) = "Digitalen Ausgang Ein/Ausschalten" Then
    $probs = GUICtrlCreateGroup("Einstellungen für Ausgang festlegen", 8, 32, 233, 121)
    $outputlabel = GUICtrlCreateLabel("Ausgang:", 8, 24, 49, 17)
    $outputcombo = GUICtrlCreateCombo("", 64, 24, 153, 17, $CBS_DROPDOWNLIST)
    $inisection = IniReadSection($ini, "inputsandoutputs")
    For $i = 1 To $inisection[0][0]
    If $inisection[$i][1] Then GUICtrlSetData($outputcombo, $inisection[$i][0])
    Next
    $valueoutput = GUICtrlCreateLabel("Wert:", 8, 56, 30, 17)
    $onoutput = GUICtrlCreateRadio("Einschalten", 32, 72, 81, 17, $BS_AUTORADIOBUTTON)
    EndIf
    EndSwitch
    EndSwitch
    WEnd

    [/autoit]

    Das Projekt klinkt interessant, viel Erfolg damit

    Edit: wenn di die UDF so abänderst sparst du dir minimal Zeit:

    [autoit]

    Func ReadDigitalChannel($address, $sellect)
    $wert = ReadAllDigital($address)

    [/autoit][autoit][/autoit][autoit]

    ;MsgBox(0,"",$alldigit[0] & " " & $wert)
    If BitAND(2 ^ ($sellect - 1), $wert) = 2 ^ ($sellect - 1) Then
    Return =1
    Else
    Return =0
    EndIf
    EndFunc ;==>ReadDigitalChannel
    ;----------------------------------------------------------------------------

    [/autoit]

    so sollte es üblicherweise auch gehen wenn $alldigit ein Array[6] ist und $alldigit[1]..[$alldigit[5] jeweils den wert 1 oder 0 für den jeweiligen Channel je nach Zustand hat. Aber ich kenne die Dokmentation der DLL icht:

    [autoit]

    Func ReadDigitalChannel($address, $sellect)
    SetCurrentDevice($address)
    $alldigit = DllCall("k8055D_multi.dll", "int", "ReadAllDigital")
    Return $alldigit[$sellect]
    EndFunc ;==>ReadDigitalChannel

    [/autoit]


    was hast du dir unter Aktionen für Funktionen vorgestellt, etwas eine Art Befehlssätze, die zeilenweise abgearbeitet werden

    mfg (Auto)Bert

  • K8055 Programmer?

    Zitat von button421

    Ich will doch nur wissen, wie eine Combobox die ausgewählten Checkboxen (also mit IniRead, denn er schreibt das ja in die ini) anzeigt.


    Hallo button421, dann hänge doch bitte die INI Datei an. Idealerweise beschreibst du auch welche CheckBoxen dadurch gesetzt werden sollen (Oder ScrennShot manuell markiert),

    mfg (Auto)Bert

  • Datei zusammenfügen und wieder teilen

    Afaik nein, ich habe zum Spass 2 au3 Dateien aneinandergehängt und konnte die neue ohne Probleme mit Scite öffnen. Auch ein einlesen mit _FileReadToArray funktioniert. Habe aber keinen HexEditor um zu erkennen ob nur ein @CrLf oder ein spezielles Zeichen dazwischen eingefügt wurde. Ergebnisdatei ist exakt um 1 Byte grösser als die Summe der beiden,

    mfg (Auto)Bert

  • [Frage] eigener Webbrowser

    chip, seltsam bei mir klappt's siehe meinen vorgehenden Post oder
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    man darf aber nicht zu einem anderen Fenster und zurück wechseln weil ansonsten der Inhalt des Embedded weis wird und nie mehr refresht.

    Zitat von chip

    Da Eb_12345 ja nicht in der Lage ist gescheit zu Antworten

    da muss ich dir leider recht geben und aus dem gleichen Grund und der Unsinnigkeit des Vorhabens (er kann es ja in einem normalen Browser spielen)

    MoD bitte closen, danke

    (Auto)Bert

  • [Frage] eigener Webbrowser

    Hallo Eb_12345.

    du solltest dir angewöhnen Fragen

    Zitat von AutoBert

    Edit1:Die enzscheidende Frage ( chip hat sie ja schon gestellt) läuft das Game auf dem IE :?:

    zu beantworten.

    Zitat von Eb_12345

    @Edit
    hab mir auch mal deine webbrowser version angeschaut da kommt schonwieder -.-


    Java wurde nicht gefunden.

    dann hast du Java bei der Installation nicht für den IE aktiviert, also nochmal installieren.

    Zitat von Eb_12345

    Um RuneScape kostenlos herunterzuladen, bitte
    hier
    klicken.

    Ich werde es nicht tun, denn wenn von einer Seite die online-Version schon
    http://www.autoit.de/index.php?page=Attachment&attachmentID=10966
    solche Warnungen hervorruft, lass ich von jeglichem Inhalt dieser Seite die Finger, ausserdem bin ich kein Spielekind.

    mfg (Auto)Bert

  • HELP mein script will nicht funktionieren....

    Hallo World-Killer (hoffentlich nicht ernst gemeint),

    • du solltest eine aussagekräftige Überschrift nehmen. Vielleicht hilft ja dass weiter:
      http://www.autoit.de/index.php?page=User&userID=204778
    • gerade bei verschlüsseltem Text ist es wichtig [autoit]$FileHandle = FileOpen($DeinPfad,2)[/autoit] zum öffnen der Datei zu verwenden, sonst gibst nur Müll
    • Du hast [autoit]GuiCtrlRead[/autoit] vergessen

    hier das korrigierte Skript:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Include <String.au3>

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=C:\Users\Michaela\Desktop\ver und entschlüssler.kxf
    $Form1 = GUICreate("Ver- und Entschlüssler", 626, 355, -1, -1)
    GUISetBkColor(0xA0A0A0)
    $Edit1 = GUICtrlCreateEdit("", 8, 8, 513, 337)
    GUICtrlSetData(-1, "")
    GUICtrlSetFont(-1, 8, 400, 0, "arial")
    GUICtrlSetBkColor(-1, 0xC8C8C8)
    $Button1 = GUICtrlCreateButton("Speichern", 536, 80, 75, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "arial")
    $Button2 = GUICtrlCreateButton("Laden ", 536, 128, 75, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "arial")
    $Button3 = GUICtrlCreateButton("Homepage", 536, 176, 75, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "arial")
    $Button4 = GUICtrlCreateButton("Anleitung", 536, 224, 75, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "arial")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $pfad01 = FileSaveDialog ("Speicherort auswahl...","","Multisavedateien(*.tfj)")
    $stringer01 = _StringEncrypt (1, GuiCtrlRead($Edit1), "hallo",4)
    $hFile = FileOpen($pfad01,2) ;damit die Datei jedesmal neu erstellt wird
    FileWrite ($hFile , $stringer01)
    FileClose($hFile)
    Case $Button2
    $pfad02 = FileOpenDialog ("Datei laden...","","Multisavedateien(*.tfj)")
    $reader = FileRead ($pfad02)
    $stringer02 = _StringEncrypt (0, $reader, "hallo",4)
    GUICtrlSetData ($Edit1, $stringer02)
    Case $Button3
    ShellExecute ("http://www.fratzi.jimdo.com/")
    Case $Button4
    MsgBox (0,"Anleitung", "Die Verwendung von diesem Programm ist Kinderleicht! Einfach das Edit1 löschen und Text eingeben, wenn es fertig ist, auf Speichern drücken. Andernfalls können Sie Gespeicherte dateien aufrufen und Sie lesen bzw umändern.")
    EndSwitch
    WEnd

    [/autoit]

    mfg (Auto)Bert

  • [Frage] eigener Webbrowser

    Hallo Eb_12345,

    anhand von
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    siehst kann ich mich mit dem Webbrowser-Beispiel (siehe Sigantur) auf die Url zugreifen, nach dem Erscheinen des Java Symbols habe ich abgebrochen, da ein vorheriger Test mit dem IE (nach Herunterladen von Java, was bei meiner Verbindung 12 KB/s leider sehr lange dauert) wusste dass man sic einloggen muss,

    Edit1:Die enzscheidende Frage ( chip hat sie ja schon gestellt) läuft das Game auf dem IE :?:

    Edit2: bei http://www.runescape.de/ kommt nach dem Starten folgendes:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    du kannst also nicht erwarten, dass ich mich weiter mit diesem Thema beschäftige. Noch dazu stellt sich mir die Frage warum du das Spiel nicht in deinem "normalen" Browser startest, da funhunktioniert es doch

    mfg (Auto)Bert

  • GUICtrlCreateTab

    Zitat von JoGi

    Nun ich meinte "ALLES" das ein Anfänger halt so weiß.


    naja, dann solltest du dir vielleicht einmal die Hilfe herunterladen und durchlesen., speziell

    [autoit]

    GuiCtrlRead

    [/autoit]

    , denn es geht auch damit:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt('MustDeclareVars', 1)

    [/autoit] [autoit][/autoit] [autoit]

    Example()

    [/autoit] [autoit][/autoit] [autoit]

    Func Example()
    Local $tab, $tab0, $tab0OK, $tab0input
    Local $tab1, $tab1combo, $tab1OK
    Local $tab2, $tab2OK, $msg

    [/autoit] [autoit][/autoit] [autoit]

    GUICreate("Meine GUI mit Tabs") ; Erstellt ein GUI-Fenster welches mittig ausgerichtet wird

    [/autoit] [autoit][/autoit] [autoit]

    GUISetBkColor(0x00E0FFFF)
    GUISetFont(9, 300)

    [/autoit] [autoit][/autoit] [autoit]

    $tab = GUICtrlCreateTab(10, 10, 200, 100)

    [/autoit] [autoit][/autoit] [autoit]

    $tab0 = GUICtrlCreateTabItem("Tab0")
    GUICtrlCreateLabel("Beschriftung0", 30, 80, 80, 20)
    $tab0OK = GUICtrlCreateButton("OK0", 20, 50, 50, 20)
    $tab0input = GUICtrlCreateInput("Standard", 80, 50, 70, 20)

    [/autoit] [autoit][/autoit] [autoit]

    $tab1 = GUICtrlCreateTabItem("Tab----1")
    GUICtrlCreateLabel("Beschriftung1", 30, 80, 80, 20)
    $tab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
    GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon") ; Standard Jon
    $tab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)

    [/autoit] [autoit][/autoit] [autoit]

    $tab2 = GUICtrlCreateTabItem("Tab2")
    GUICtrlSetState(-1, $GUI_SHOW) ; Lässt die GUI anzeigen
    GUICtrlCreateLabel("Beschriftung2", 30, 80, 80, 20)
    $tab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateTabItem("") ; Beendet die Tab Definition

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel("Beschriftung3", 20, 130, 80, 20)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    ; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $tab
    MsgBox(0, "", GUICtrlRead($tab))

    [/autoit] [autoit][/autoit] [autoit]

    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    EndFunc ;==>Example

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    im obigen (etwas abgewandelten) Beispiel aus der Hilfe wird der Index des ausgewählten Tabs ermittelt, mit

    [autoit]

    GUICtrlRead($tab,1)

    [/autoit]

    die ControlID

    mfg (Auto)Bert

  • [Frage] eigener Webbrowser

    Hallo Eb_12345,

    könntest du bitte Fragen/Bitten direkt beantworten ohne pauschale Antworten zu geben?

    Zitat von chip

    Geht das Browsergame den so in deinem Internet Explorer? Weil wie du selbst gesagt hast wird einfach nur der IE eingebunden.

    Zitat von chip

    Sag mal die URL bei der das Problem kommt.

    Zitat von Eb_12345

    nein also bei allen games die mit java laufen funkts nich aber bei normalen browsern schon


    Stelle also bitte eine Url eines (oder mehreren) nicht anmeldepflichtigen Browsergames (ohne grosse Hardware Anforderungen) ein, bei dem dein IEembedded nicht funktioniert, ansonsten wird dass eine ewig langer Thread vermutlich ohne Lösung,

    mfg (Auto)Bert

  • Sicherheit der Verbindung beim E-Mail senden mit AutoIt

    Zitat von AngryApe

    Wenn ich mir bspw. ein kleines Script schreibe mit welchem ich schnell mal ein paar Daten auf Arbeit an mich sende, könnte dann der Admin meine Paßwörter einsehen?

    Die Fragestellung ist für mich etwas seltsam, wenn du DATEN deinerr Firma an dich senden musst und vor allem auch darfst, weil du sie für Heimarbeit benörigts, dann hat dir der Admin mit Sicherheit eine Lösung zum Veschicken eingerichtet . Ansonsten ist dazu nur zu sagen, die Daten (vor allem dei Anmeldedaten) sind auch nicht sicherer als wenn du dich mit einbem normalen Webbrowser bei deinem Freemailer einloggst, ja der Admin und jeder andere auf der Transportstrecke kann über simples Sniffen deine Zgangsdaten auslesen, die (geheimen Daten) der Firma abgreifen etc. solange SSL nicht enabled ist, das geht aber bei den meisten Freemailern nicht. Du solltest also wenigsten die Firmendaten durch verschlüsseln mit einbem starken Schlüssel schützen. Vor allem solltest du euren Admin in die Problematik mit einbeziehen.

    mfg (Auto)Bert