1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Schnuffel

Beiträge von Schnuffel

  • Euer größtes Projekt?

    • Schnuffel
    • 30. Oktober 2010 um 21:53

    na dann mach ich auch mal ...

    Ich versuche mich seit ca. 2 Jahren mit größeren Unterbrechungen an einer Zeiterfassung für Unternehmen > 10 Mitarbeiter auf Basis von SQLite.
    Bisheriger Code ca. 2200 Zeilen.
    Wobei ich hier nicht zum gegenseitigen Sch****längen messen aufrufen möchte. :)

    Ich fürchte aber, dass das eine unvollendete bleiben wird, da mir die Motivation an dem Projekt gänzlich fehlt. :(

  • Server startet nicht ohne Bildschirm

    • Schnuffel
    • 30. Oktober 2010 um 21:21

    also, ohne mich jetzt zu weit aus dem Fenster lehnen zu wollen.

    Ich habe noch kein Mainboard erlebt dass nicht bootet,
    wenn kein Monitor angeschlossen ist.

    I.d.R. fehlt dem PC/Server eine Tastatur, die man notfalls auch im BIOS abschalten kann (zumindest die erfordernis einer solchen ...)

  • _INet(SMTP)Mail

    • Schnuffel
    • 30. Oktober 2010 um 20:17

    sicherlich,

    kürze einfach alles raus, was Du nicht brauchst wie Attachments, ErrorHandler...

    empfangen geht auch in autoit.
    Such mal nach POP3.
    Problem ist aber, dass der Emailempfang etwas komplizierter im Management ist,
    als einfach was wegzuschicken.

  • Formel aufstellen

    • Schnuffel
    • 30. Oktober 2010 um 19:38

    ich denke er möchte ein eigenes Spiel proggen und braucht dafür eine Formel ;)

  • _INet(SMTP)Mail

    • Schnuffel
    • 30. Oktober 2010 um 17:54

    nimm die UDF, die ich als Link gepostet habe.
    Damit kannst Du auch Username und Passwort für den SMTP-Server ohne Probleme angeben.
    Das ist auch der Grund für Deinen Fehler 50. Keine Authentifizierung am SMTP-Server.
    ;)

  • _INet(SMTP)Mail

    • Schnuffel
    • 30. Oktober 2010 um 12:38

    InetSmtpMailCom

  • Http-Traffic manipulieren

    • Schnuffel
    • 30. Oktober 2010 um 11:52

    bitte selber schließen im ersten Thread.
    Danke ;)

  • Http-Traffic manipulieren

    • Schnuffel
    • 30. Oktober 2010 um 11:47

    aber ein sehr schlechtes.
    Ich denke, Du willst etwas bestimmtes erreichen.
    Entweder glaubst Du die Lösung dafür schon gefunden zu haben und möchtest "nur" noch einen Weg gezeigt bekommen wie das geht.
    Oder Du willst wirklich etwas "unanständiges" anstellen...

    I.d.R. ist es sinnvoller zu beschreiben, was man erreichen möchte.
    Die Lösung sieht meist etwas anders aus als man selber glaubt.

    Für Netzwerk sniffen und sogar Paket-Änderungen wird es egal aus welchem Grund hier sicherlich keinen Support geben ;)

  • Http-Traffic manipulieren

    • Schnuffel
    • 30. Oktober 2010 um 10:53

    Kannst Du uns einen praktischen Einsatzzweck für:

    Zitat

    um das Netzwerk zu sniffen, aber ich hab es noch nicht geschafft, den Inhalt zu manipulieren

    liefern?

  • pruefen ob checkbox aktiviert ist

    • Schnuffel
    • 28. Oktober 2010 um 19:25

    Hallo super47,

    mit folgendem Code kannst Du eine Checkbox grundsätzlich aktivieren:

    [autoit]

    ControlSend(Name des Fensters, "", "[CLASS:Button; INSTANCE:1]", "+")

    [/autoit]


    dementsprechend mit

    [autoit]

    ControlSend(Name des Fensters, "", "[CLASS:Button; INSTANCE:1]", "-")

    [/autoit]

    grundsätzlich deaktivieren.

    Der Status der Checkbox ist dabei egal.
    D.h. bei "+" bleibt eine aktivierte Checkbox das auch, ansonsten wird diese aktiviert.
    bei "-" wird eine Checkbox deaktiviert.

    Das Control musst Du vielleicht noch anpassen, da das wahrscheinlich nicht die Checkbox direkt ist.
    ;)

  • _INetSmtpMail gibt @error 50

    • Schnuffel
    • 24. Oktober 2010 um 14:35

    Naja, error 5x sagt keine Verbindung zum SMTP-Server.

    Ich persönlich mag die UDF gar nicht,
    da es keine direkte Eingabemöglichkeit gibt für eine Authentifizierung am SMTP-Server.

    Das wird auch Dein Problem sein.

    Vergiß entweder diese UDF, oder erarbeite einen Workaround, um damit die Useranmeldedaten am SMTP zu übertragen.
    Ich habe dazu keine Lust, da es wie gesagt schon funktionierende Lösungen gibt. ;)

    Edit: Link für eine erweiterte UDF --> http://www.autoitscript.com/forum/index.php?showtopic=23860&view=findpost&p=166575

  • _INetSmtpMail gibt @error 50

    • Schnuffel
    • 24. Oktober 2010 um 14:24

    schau mal in meiner Signatur, vielleicht hilft Dir das ...

  • ALT Taste dauer aktiv ??

    • Schnuffel
    • 22. Oktober 2010 um 08:07

    Hallo clonker,

    Du hast bei den Abfragen der Alt-V-Zahl Tasten nur bei der 1 den Richtigen Code eingefügt.
    Hier mal korrigiert.

    Spoiler anzeigen
    [autoit]

    #Include <Misc.au3>
    #Include <Clipboard.au3>

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

    HotKeySet("{ESC}", "_exit")

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

    Func _exit()
    Exit
    EndFunc ;==>_exit

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

    While 1
    Select
    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("31")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "1", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 1 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("32")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "2", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 2 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("33")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "3", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 3 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("34")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "4", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 4 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("35")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "5", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 5 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("36")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "6", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 6 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("37")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "7", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 7 gespeichert !")

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("38")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "8", $clipboarddata)

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

    Case _IsPressed("12") And _IsPressed("43") And _IsPressed("39")
    Sleep(100)
    Send("^c")
    $clipboarddata = _ClipBoard_GetData()
    IniWrite(@ScriptDir & "/cliptemp.ini", "slot", "9", $clipboarddata)
    MsgBox(0, "MultiClipboard", " Daten wurden in Slot 9 gespeichert !")

    ;------------------------------------

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("31")
    $clipboarddata = _ClipBoard_GetData()
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "1", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("32")
    $clipboarddata = _ClipBoard_GetData()
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "2", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("33")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "3", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("34")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "4", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("35")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "5", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("36")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "6", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("37")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "7", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("38")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "8", "error")
    Send($inidata)

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

    Case _IsPressed("12") And _IsPressed("56") And _IsPressed("39")
    $inidata = IniRead(@ScriptDir & "/cliptemp.ini", "slot", "9", "error")
    Send($inidata)

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

    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
  • Checkbox Status in einer *.ini speichern

    • Schnuffel
    • 21. Oktober 2010 um 21:09

    ich hab mal die schlimmsten Fehler korrigiert und das ganze angepasst...
    Ist natürlich nur als Demonstration zu sehen.
    Wenn Du in der ini statt 0 eine 1 setzt und die Zeile 54: IniWrite(@ScriptDir & "\test.ini", "Zeile1", $aArray[$i], BitAND(GUICtrlRead($Checkbox[$i]), $GUI_CHECKED))
    deaktivierst, dann wird die ini gelesen und die checks dementsprechend gesetzt.

    Spoiler anzeigen
    [autoit]

    #include <GuiDateTimePicker.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <ComboConstants.au3>
    #include <DateTimeConstants.au3>
    #include <EditConstants.au3>
    #include <Excel.au3>
    #include <Array.au3>
    #include <File.au3>
    #include <GuiComboBox.au3>
    #include <Date.au3>
    #include <GuiListView.au3>
    #include <ListViewConstants.au3>
    #include <string.au3>

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

    #include <Misc.au3>

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

    #include <GuiEdit.au3>
    #include <GuiConstantsEx.au3>

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

    Opt("GUIOnEventMode", 1)

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

    testgui()
    Func testgui()
    $Form1 = GUICreate("Testgui", 746, 450, 258, 119)
    $Group2 = GUICtrlCreateGroup("Spalten Löschen für & $neulabel", 4, 30, 737, 338, BitOR($GUI_SS_DEFAULT_GROUP,$BS_LEFT))
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Radioeinaus1 = GUICtrlCreateRadio("testtabelle1", 305, 401, 89, 17, BitOR($GUI_SS_DEFAULT_RADIO,$BS_LEFT))
    $Radioeinaus2 = GUICtrlCreateRadio("testtabelle2", 403, 401, 73, 17, BitOR($GUI_SS_DEFAULT_RADIO,$BS_LEFT))
    $beenden = GUICtrlCreateButton("Beenden", 500, 395, 120, 25)

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

    GUISetState(@SW_SHOW)
    GUISetOnEvent($GUI_EVENT_CLOSE, "beenden")
    GUICtrlSetOnEvent($Radioeinaus1, "testtabelle1")
    ; GUICtrlSetOnEvent($Radioeinaus2, "testtabelle2")
    GUICtrlSetOnEvent($beenden, "beenden")

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

    While 1
    Sleep(50)
    WEnd
    EndFunc;==>testgui

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

    Func testtabelle1()
    $Open = FileOpenDialog("",@ScriptDir,"(test1.xls)")
    $oExcel = _ExcelBookOpen($Open, 0)
    $Spalten = $oExcel.Worksheets(1).UsedRange.Columns.Count
    Local $Checkbox[$Spalten+1]
    Dim $aArray = _ExcelReadArray($oExcel, 1, 1, $Spalten, 0, 1)
    _ExcelBookClose($oExcel,0,0)
    For $i = 1 To $aArray[0]
    IniWrite(@ScriptDir & "\test.ini", "Zeile1", $aArray[$i], BitAND(GUICtrlRead($Checkbox[$i]), $GUI_CHECKED))
    Next

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

    $var = IniReadSection( @ScriptDir & "\test.ini", "Zeile1")
    If @error Then
    MsgBox(4096, "", "Es ist ein Fehler aufgetreten. Warscheinlich keine INI Datei vorhanden.")
    Else

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

    For $i = 1 To $var[0][0]
    $top = 25 + ($i * 20)
    $left = 25
    If $top > 345 and $left = 25 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 200 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 375 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 550 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    $Checkbox[$i] = GUICtrlCreateCheckbox($var[$i][0], $left, $top, 175, 17)
    If $var[$i][1] = 1 Then GUICtrlSetState($Checkbox[$i], $GUI_CHECKED)
    Next
    EndIf

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

    EndFunc;==>testtabelle1
    #cs
    Func testtabelle2()
    $Open = FileOpenDialog("",@ScriptDir,"(test2.xls)")
    $oExcel = _ExcelBookOpen($Open)
    $Spalten = $oExcel.Worksheets(1).UsedRange.Columns.Count
    $Spalten = $Spalten+2
    Local $Checkbox[$Spalten]
    Dim $aArray[$Spalten]
    For $i = 1 To UBound($aArray) -1
    $aArray[$i] = _ExcelReadArray($oExcel, 1, $i, 1, 1)
    _ArrayToClip($aArray[$i])
    $ddd = (ClipGet())
    IniWrite(@ScriptDir & "\test.ini", "Zeile2", $ddd, "")
    Next
    _ExcelBookClose($oExcel)
    $var = IniReadSection( @ScriptDir & "\test.ini", "Zeile2")
    If @error Then
    MsgBox(4096, "", "Es ist ein Fehler aufgetreten. Warscheinlich keine INI Datei vorhanden.")
    Else

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

    For $i = 1 To $var[0][0]-1
    $top = 25 + ($i * 20);
    $left = 25;
    If $top > 345 and $left = 25 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 200 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 375 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 550 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    $Checkbox[$i] = GUICtrlCreateCheckbox($var[$i][0], $left, $top, 175, 17)
    Next
    EndIf
    EndFunc;==>testtabelle2
    #ce
    Func beenden()
    Exit
    EndFunc;==>beenden

    [/autoit]
  • Guten Tag AutoIt Com.

    • Schnuffel
    • 21. Oktober 2010 um 20:26

    auch von mir ein
    Herzlich Willkommen

  • wer hat mit dieser UDF erfahrung? _INetSmtpMailCom

    • Schnuffel
    • 21. Oktober 2010 um 19:40

    ich denke nicht, dass der body zu lang ist, sondern das "to"-Feld

    Edit: zumindest wäre das eine Möglichkeit ...

    Edit2:
    Also in Deutschland und den meisten der restlichen Welt wurden sogenannt Relay-Server abgeschafft.
    Auf diesen musste man sich nicht identifizieren.
    D.h.: i.d.R. ist für den erfolgreichen Versand mindestens erforderlich:
    - SMTP-Server der Absender-Emailadresse ($s_SmtpServer)
    - Authentifizierung am SMTP-Server mit Email/Passwort ($s_Username/$s_Password)
    - Betreff ($s_Subject)
    - From-Emailadresse ($s_FromAddress)
    - To-Emailadresse ($s_ToAddress)

    die angegebenen Variablen sind die aus meinem Script, sollten aber mit der originalen _INetSmtpMailCom identisch sein ;)

    Ach ja, es gibt aber durchaus ein Datenlimit für den Body. Genaue Grenze müsste ich erst recherchieren.

  • wer hat mit dieser UDF erfahrung? _INetSmtpMailCom

    • Schnuffel
    • 21. Oktober 2010 um 19:14

    ansonsten schau mal in meiner Signatur ...

  • Signaturen Generator

    • Schnuffel
    • 20. Oktober 2010 um 19:54

    also von etwas keine Ahnung haben und mit den Scripten von anderen dann ein Tut erstellen.
    Dreist bist Du gar nicht, oder...
    PS: Du könntest wenigstens deine bisherigen Versuche einstellen...

    Zitat

    weil ich das nicht ganz richtig hinkriege

  • GUISetOnEvent vs. GUIGetMsg

    • Schnuffel
    • 20. Oktober 2010 um 16:55

    ja, aber auch nur, wenn Du keinen:

    [autoit]

    Sleep(60000)

    [/autoit]

    einbaust :rofl:

  • Text Schreiber mit Backoffice

    • Schnuffel
    • 20. Oktober 2010 um 16:28

    wieviele Artikel mit Barcode willst Du denn damit einpflegen/abrufen.
    Davon hängt ab, ob es noch mit einer .ini zu erledigen ist, oder doch besser mit einer Datenbank z.B. SQLite.

    Eigentlich brauchst Du nur eine Möglichkeit über ein Input den Barcode einzuscannen und ein Textfeld daneben, um der Zahlenkolonne einen Text zuzuweisen.
    Dieses Datenpaar wird dann in einer ini gespeichert.
    Zur Abfrage/Eintragung in eine txt-Datei wird dann einfach in einem zweiten Inputfeld der eingescannte Barcode mit der ini verglichen und der passende Text ausgegeben.

    Ist eigentlich keine große Sache.

    Was wäre denn die Gegenleistung?

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™