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. limette

Beiträge von limette

  • Internet-Explorer Button drücken!!!!

    • limette
    • 31. August 2008 um 14:33

    Du willst einfach nur, dass der Button gedrückt wird ?
    Dann sieh dir doch mal an, was der Button macht:
    get_all_ships(51, 0,0,0,13,0,0,0,0,0,0,0,103,0);document.aa.flotten1.click()

    Damit kann man arbeiten.
    Versuch doch mal:
    _IENavigate( $ie, 'javascript:get_all_ships(51, 0,0,0,13,0,0,0,0,0,0,0,103,0);document.aa.flotten1.click()', 0 )

    Ich weiß nicht, ob das mit 2 Befehlen funktioniert, wenn nicht sag bescheid ;)

    mfg limette

    Edit: Müsste so funktionieren. Getestet mit 'javascript:alert("hallo1");alert("hallo2");, works ^^

  • Brauche hilfe bei einem PC sperre

    • limette
    • 31. August 2008 um 14:28

    Ja und jetzt ?
    Ich hab dir die Lösung gegeben, wenn du das jetzt nicht verstehst
    dann frag nach ;)
    Ach, und - 1-Zeilen-Posts machen einen schlechten Eindruck ;)

    mfg limette

    Edit: "es ghet nicht" - Was soll das heißen ? Zeig deinen jetzigen Code und
    gib uns INFOrmationen....

  • Brauche hilfe bei einem PC sperre

    • limette
    • 31. August 2008 um 14:25
    [autoit]

    If $a = GUICtrlRead ("ich bin doof und nicht schlau") = 1 Then

    [/autoit]


    Was soll das denn ?
    Warum nicht so:

    [autoit]

    If $a = 'ich bin doof und nicht schlau' Then

    [/autoit]


    ? ;)

    mfg limette

    Edit: Aus geht dein Script wohl wegen einem Syntax-Error. Denn 2 Gleichheitszeichen in einem Vergleich ? Nope ^^
    Außerdem: GuiCtrlRead( $ctrlid ), ich versteh nicht warum du da nen Text eingesetzt hast :P

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 31. August 2008 um 14:22

    Zum FileDelete:
    Pack zwischen Send und FileDelete mal ein Sleep( 5000 ) oder so,
    nur mal zum Testen, ob es daran liegt, dass das Fenster noch offen ist.

    Die Codezeile:

    [autoit]


    TrayTip("Downloading... (Abbruch mit ESC)", "Status:" & Round( (@InetGetBytesRead/$size)*100, 2 ) & ' %', 10, 16)
    ;TrayTip( 'Titel', 'Textstück 1' & 'Textstück 2' & '......' & Runde( gelandene Bytes geteilt durch Gesamtanzahl an Bytes mal 100 auf 2 Dezimalstellen ) & ' %', 10, 16 )

    [/autoit]


    dürfte sich so selbst erklären ;)

    limette

  • Gui mit Inputboxen für Email Script - Problem

    • limette
    • 31. August 2008 um 13:51

    Ist aber auch nur Suboptimal, dann sind
    sie zwar deklariert, haben aber bei Funktionsaufruf
    keinen Wert -->also: Werte in der Funktion zuweisen.
    Wie ich schon sagte :D
    Dann kann man sich auch das Deklarieren vorweg
    sparen und hat dann die Variablen eben nur Lokal in
    der Funktion (oder vertu ich mich jz wieder ?);
    --> können im Main-Prog nicht stören ^^

    limette

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 31. August 2008 um 12:56

    1. Wie, der bricht frühzeitig ab ?

    2. Zur MsgBox, das hier ist dein alter Code:

    [autoit]

    WinWaitActive("Setup - nLite", "Das Setup hat die Installation von nLite auf Ihrem Computer abgeschlossen") ;hier wartet er doch auf das 'Abgeschlossen'-Fenster
    send("{enter}") ; 'Hier wird das vermutlich weggeklickt
    If MsgBox( 64, 'Die Installation von nLite-1.4.8 ist abgeschlossen', 'Drücken sie auf OK, um die Installation abzuschließen und die heruntergeladene Datei zu löschen' ) = 1 Then ;Anfang der If-Klausel
    InetGet( 'abort' ) ; Beende den Download
    FileDelete( 'C:\nLite-1.4.8.exe' ) ;Lösche die Datei
    Exit ; Beendet
    EndIf

    [/autoit]


    Wenn du doch schon mit WinWaitActive wartest, dann kannst du doch davon ausgehen,
    dass danach dieses Fenster auch offen ist. Und dann kannst du doch löschen, also
    ganz ohne If-Then ....

    [autoit]


    WinWaitActive("Setup - nLite", "Das Setup hat die Installation von nLite auf Ihrem Computer abgeschlossen")
    send("{enter}")
    FileDelete( 'C:\nLite-1.4.8.exe' ) ;Lösche die Datei

    [/autoit]

    mfg limette

  • Gui mit Inputboxen für Email Script - Problem

    • limette
    • 31. August 2008 um 12:51

    Hm, du hast Recht. Wäre auch zu schön gewesen wenn nicht ;)

    Aber wie kommt es bei ihm dann zu dem Fehler von wegen 'undeclared variable' ?
    Ich meine, die Variable wurde deklariert, ob sie nun einen Wert hat oder nur ein
    leerer String ist ist doch total egal ?!

    limette

    Edit: ACH ... er hat die zum Zeitpunkt des Funktionsaufrufs ja noch garnicht deklariert,
    das folgt ja erst, wenn er aus der While-Schleife raus ist, aber da geht er ja nicht raus.
    Naja, aber meine Version mit den Variablen in der Funktion müsste passen ;)

  • Gui mit Inputboxen für Email Script - Problem

    • limette
    • 31. August 2008 um 12:41

    Oh .... :whistling:
    Hab ich mich wohl vertan ^^
    Seit wann ist das so ?
    Ich dachte die Variablen im Main-Prog währen auch nur da verfügbar,..
    habe oft das Problem, dass ich auf Variablen, die im Main-Prog deklariert & definiert
    wurden in Funktionen nur zugreifen kann, wenn ich sie vorher als Global
    deklariert habe.
    Hm.. :rolleyes:
    Man lernt nie aus...

    ..
    MOMENT ...

    Zitat

    Ich bekomme ganze Zeit einen Fehler angezeigt: Variable used without being declared.:


    dann hatte ich doch Recht, oder ?! oO

    mfg limette

  • Gui mit Inputboxen für Email Script - Problem

    • limette
    • 31. August 2008 um 12:29

    Jo, seine Probleme von "undeclared variable" lagen aber halt nicht an der
    Mail-Funktion :rolleyes:

    _InetSendSmtpMailCom findet mal allerdings auch
    mit der Forensuche... ;)
    Aber danach war halt nicht gefragt.

    mfg limette =)

  • Desktop Radio 3.9

    • limette
    • 31. August 2008 um 12:26
    Zitat

    Ansonsten hatte ich vor einigen Wochen Deepred schon per Email mitgeteilt, dass er vollkommen Recht hat, wenn er seinen Code vor Trittbrettfahrern schützt. :huh:


    Bin ich der B.O.F.H ? Kann ich eure E-Mails lesen ? ^^

    Zitat

    Aber, ich sagte ihm auch, er könne etwas Hilfestellung geben


    Na klar, spricht ja auch nichts gegen =)
    Ich meinte ja bloß, dass der Post da oben ziemlich schräg rüberkommt,
    das klingt so fordernd.
    Der Satz

    Zitat

    Jetzt sollte er sein Wissen oder zumindest Teile davon der Community wieder zurückgeben. :!:


    Klingt bloß so nach "Gib es uns wieder ! Na los !" x)
    ... wo doch alles was er an Hilfe bekommen hat eben in den Topics hier im Forum steht,
    was wiederum jeder lesen kann. Naja wie gesagt,
    ich wollte nur anmerken, dass Forderungen nach Code niemals gültig sind ;)

    mfg limette

  • IE Auf "link" klicken, der keinen Namen ud keine ID hat?

    • limette
    • 31. August 2008 um 12:08

    Ich versteh nicht was du meinst.
    Aber du kannst dir ja einfach mal die Variablen
    überprüfen, an unterschiedlichen Stellen zB in Dateien
    oder die Konsole schreiben lassen.

    mfg limette

  • Gui mit Inputboxen für Email Script - Problem

    • limette
    • 31. August 2008 um 11:53
    Zitat von Crazy-A


    Übernehme mal die Variablen aus der Funktion in das GUI.

    Hö ? Was soll das denn heißen ?

    Naja, lass dich von der nicht verrückt machen,
    die andern Topics hatten nämlich nichts mit deinem Script hier zu tun.
    Außer dass es auch ums E-Mail-Senden ging.

    Bei dir gibt es aber ein anderes Problem.
    Du hast die Variablen zwar deklariert, allerdings außerhalb der Funktion, in
    der die Mail-Funktion aufgerufen wird. Dort verlieren sie ihren 'scope', ihren
    Wirkungsbereich, dort sind sie nicht mehr zuständig. Außer du deklariest sie
    als Global.
    Ach, und "$s_SmtpServer = $smtp" ist wahrscheinlich das, was Crazy-A meinte.
    Das geht so nicht, so ist $s_SmtpServer nur gleich der ID des Inputs.
    Um den Wert zu übernehmen brauchst du GuiCtrlRead.

    So sollte es gehen:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <INet.au3>

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

    #Region ### START Koda GUI section ### Form=
    Opt("GUIOnEventMode", 1) ; Wechsle in den OnEvent Modus
    $Form1 = GUICreate("form1", 242, 297, 193, 125)
    $smtp = GUICtrlCreateInput("smtp", 40, 48, 161, 21)
    $name = GUICtrlCreateInput("name", 40, 72, 161, 21)
    $absenderemail = GUICtrlCreateInput("absendermail", 40, 96, 161, 21)
    $adresse = GUICtrlCreateInput("adresse", 40, 120, 161, 21)
    $betreff = GUICtrlCreateInput("betreff", 40, 144, 161, 21)
    $txt = GUICtrlCreateInput("text", 40, 168, 161, 21)
    $ok = GUICtrlCreateButton("Email senden", 40, 240, 161, 41, 0)

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

    GUICtrlSetOnEvent($ok, "senden")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    WEnd

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

    func senden()
    $s_SmtpServer = GUICtrlRead( $smtp )
    $s_FromName = GUICtrlRead( $name )
    $s_FromAddress = GUICtrlRead( $absenderemail )
    $s_ToAddress = GUICtrlRead( $adresse )
    $s_Subject = GUICtrlRead( $betreff )
    ;Dim $as_Body[2]
    ;$as_Body[0]
    ;$as_Body[1]
    $as_Body = GUICtrlRead( $txt )
    _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)
    EndFunc

    [/autoit]

    Wenn es Fehler beim Senden der Mail geben sollte: ForenSuche, denn dazu gibt es einige
    Topics mehr ;)

    mfg limette

    Edit:
    @Crazy-A:
    Vielleicht solltest du dir einen Post auch mal durchlesen.
    Denn nur weil im Thema das Wort "E-Mail Script" vorkommt, heißt das noch lange nicht,
    dass der Fehler auch da liegt. Hättest du dir den Code kurz angeguckt
    hättest du auch gesehen, dass sein Fehler in der Deklaration & Wertzuweisung lag.
    Folglich hat das nichts mit den anderen Topics zu tun, in denen es um fehlgeschlagene
    Mailsendungen geht. In diesem Fall hätte ein kleiner Hinweis auf den Wirkungsbereich
    von Variablen deinerseits auch gereicht, man muss nicht auf alles gleich den
    "Lies die Hilfe, surf durchs Forum !"-Stempel drücken.

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 31. August 2008 um 11:41
    Zitat

    ich habe es zwar über ne MsgBox gelöst aber mich würde interessieren ob es auch ohne möglich ist ne datei zu löschen


    Lass die MsgBox doch einfach weg.
    Und das InetGet( 'abort' ) brauchst du da doch garnicht mehr oO

    Zum Downloadstatus: Du holst dir in der Schleife jedes mal die Größe der Datei
    auf dem Server - warum ?
    Und das hier:

    [autoit]

    TrayTip("Downloading... (Abbruch mit ESC)", "Größe der Datei:" & $size @InetGetBytesRead, 10, 16)

    [/autoit]


    Passt doch auch nicht, da müsstest du nen Syntax-Error o.ä. kriegen.
    ; "Größe der Datei:" & $size @InetGetBytesRead
    mach doch keinen Sinn oO
    Wofür soll das "$size @InetGetBytesRead" denn sein ?

    Machs doch so:

    Spoiler anzeigen
    [autoit]


    #include <Misc.au3> ;für _IsPressed
    $size = InetGetSize("http://www.nowhere.com/somelargefile.exe") ;Jz ist $size = Größe der herunterzuladenen Datei
    InetGet("http://www.nowhere.com/somelargefile.exe", 'file.exe', 1, 1)
    Break(0) ;Verhindert Unterbrechungen
    While @InetGetActive
    TrayTip("Downloading... (Abbruch mit ESC)", "Status:" & Round( (@InetGetBytesRead/$size)*100, 2 ) & ' %', 10, 16)
    If _IsPressed('1B') Then ;Wenn ESC gedrückt wurde
    If MsgBox(64 + 4, 'Bestätigen', 'Möchten Sie den Download wirklich abbrechen ?') = 6 Then ;Anfang der If-Klausel
    InetGet('abort') ; Beende den Download
    FileDelete('C:\nLite-1.4.8.exe') ;Lösche die Datei
    Exit ; Beendet
    EndIf ;Ende der If-Klausel
    EndIf
    Sleep(100)
    WEnd

    [/autoit]

    mfg limette

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 30. August 2008 um 21:45

    Warum übernimmst du das nicht so, wie ich dir geschrieben habe ?

    Spoiler anzeigen
    [autoit]


    If MsgBox( 4, 'Bestätigen', 'Möchten Sie den Download abbrechen ?' ) = 6 Then ;Anfang der If-Klausel
    InetGet( 'abort' ) ; Beende den Download
    FileDelete( 'pfad zu deiner datei' ) ;Lösche die Datei
    Exit ; Beende
    EndIf ;Ende der If-Klausel

    [/autoit]

    Was du geschrieben hast geht so nicht, denn:
    If .... Then Exit InetGet( 'abort' )
    FileDelete( 'pfad_zur_datei' )
    Ist eine einzeilige If-Klausel, d.h. wenn du Nein klickst wird die Datei gelöscht, wenn du Ja klickst
    bricht er den Download ab und beendet das Programm !
    Grundsätzlich funktioniert If-Then so:

    If Bedingung = True Then
    Aktion 1
    Aktion 2
    ElseIf AndereBedingung = True Then
    Aktion 3
    Else
    Aktion 4
    EndIf

    MsgBox( 4, '', '' ) = 6 ist nur ein Vergleich. Wenn Nein geklickt wurde, gibt dieser
    Vergleich False zurück, denn:
    7 = 6 ; Falsch !
    Wenn jedoch Ja geklickt wurde gibt der Vergleich True zurück, denn
    6 = 6 ; Wahr !

    mfg limette

    Edit: Mit Parametern meine ich die erste Angabe bei der MsgBox.
    4 = ja/nein, 64 = info-icon etc. vll gibts da was, das deinen Wünschen entspricht ;)

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 30. August 2008 um 21:06
    Zitat

    bekommt man das X im Info Fenster weg


    Ich wüsste gerade nicht wie, kannst ja mal in den Parametern stöbern...

    Zitat

    Und wenn man den Download abbricht müsste er auch die runtergeladene Datei mit löschen.

    Spoiler anzeigen
    [autoit]


    If MsgBox( 4, 'Bestätigen', 'Möchten Sie den Download abbrechen ?' ) = 6 Then
    InetGet( 'abort' )
    FileDelete( 'pfad zu deiner datei' )
    EndIf

    [/autoit]

    Wo ist das Problem ? ^^

    limette

  • Desktop Radio 3.9

    • limette
    • 30. August 2008 um 20:35

    Genau das meine ich. Sowas ist viel zu oft -
    ich komme selbst nicht selten in die Versuchung,
    große Teile so zu übernehmen....
    Dann muss ich mich immer selbst daran erinnern, dass das
    1. Mir nichts bringt
    2. Das für den Autor sche*** ist.

    @uli: Bevor du dich angesprochen fühlst, ich unterstelle hier niemandem etwas.
    Deine "Forderung" nach Code kam bloß .. schlecht rüber. Vor allem, da du von
    Deepred in der dritten Person gesprochen hast oO

    mfg limette

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 30. August 2008 um 20:29
    [autoit]

    If MsgBox( 64+4, 'Bestätigen', 'Wollen Sie den Download wirklich abbrechen?' ) = 7 Then

    [/autoit]

    DAS hab ich dir so nicht geschrieben ;)
    Fakt ist: Die Bedingung ist erfüllt, wenn die MsgBox 7 zurückgibt. Sie gibt 7 zurück, wenn 'Nein' gedrückt wurde !
    Wie im Script oben zu sehen, habe ich auf '6' geprüft. Denn 6 steht für 'ja' ^^
    Einfach mal in der Hilfe die Rückgabewerte für MsgBoxen ansehen ;)

    Also: Die 7 durch eine 6 ersetzen und schon bricht er auf 'ja' ab ;)

    Du kannst das auch mal so testen:

    [autoit]


    $rueckgabe_der_msgbox = MsgBox( 4, 'Frage', 'Ja oder Nein ?' )
    MsgBox( 64, 'Info', 'Der Button, den du gedrückt hast, hatte den Wert: ' & $rueckgabe_der_msgbox )

    [/autoit]


    ;)
    msgbox limette

    Edit: Vor lauter MsgBoxen komm ich noch ganz durcheinander ^^
    mfg limette

  • Desktop Radio 3.9

    • limette
    • 30. August 2008 um 20:17

    Erstmal "Danke !" an Deepred, ist 'n klasse Programm ^^

    Zu

    Zitat

    Teile des Skriptes sollten publiziert werden, damit andere Programmierer auch sich solch einem Projekt widmen können. Deepred hatte in der Vergangenheit auch den Rat des Forums erhalten und entsprechend programmieren können. Jetzt sollte er sein Wissen oder zumindest Teile davon der Community wieder zurückgeben. :!:


    Möchte ich noch etwas sagen.
    Eben jenes Wissen, dass 'er' hier bekommen hat ist in den Topics für jeden hier nachlesbar.
    Ich kann vollkommen verstehen, wenn 'er' seinen Source nicht veröffentlichen möchte,
    denn in soetwas steckt zT sehr viel Arbeit. Oft ist es dann so, dass große Teile ohne Kommentar
    zum Author übernommen werden;- verdammt ärgerlich.
    Es hat niemand das Recht darauf, den Source oder Teile davon zu gesicht zu
    bekommen. Diese Einstellung finde ich schlichtweg falsch.

    @Deepred: Dass du deine UDFs trotzdem veröffentlichen möchtest finde ich natürlich klasse ! :D

    mfg limette

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 30. August 2008 um 19:14

    Auf Druck von 'ESC' wird nochmal nachgefragt:

    Spoiler anzeigen
    [autoit]

    #include <Misc.au3> ;für _IsPressed

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

    InetGet("http://ftp22.nero.com/Nero8/Nero-8.3.6.0_deu_update.exe", @ScriptDir & '\Nero-8.3.6.0_deu.exe', 1, 1)

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

    While @InetGetActive
    TrayTip("Downloading", "Bytes = " & @InetGetBytesRead, 10, 16)
    If _IsPressed( '1B' ) Then ;Wenn ESC gedrückt wurde
    If MsgBox( 4, 'Bestätigen', 'Wollen Sie den Download wirklich abbrechen ?' ) = 6 Then InetGet( 'abort' ) ; breche den Download ab. Aus der Schleife geht der dann von alleine,
    ; da die Bedingung der While-Schleife @InetGetActive ist
    EndIf
    Sleep(100)
    Wend

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

    MsgBox(0, "Bytes read", @InetGetBytesRead)

    [/autoit]

    Für den Downloadstatus sieh dir mal die Funktion 'InetGetSize' an ;)
    Damit holst du dir die Dateigröße und schreibst den Tooltip um, in

    ToolTip( Round( ($gesamte_groesse / @InetGetBytesRead )* 100, 2 ) & ' %' )

    (Keine Garantie, nur gerade aus dem Kopf aufgeschrieben,... ;) )

    Ansonsten kann ich noch auf HotKeySet, den Parametern von MsgBox und GuiCreate
    verweisen ;)

    mfg limette

  • Habe ein Problem mit dem Befehl InetGet

    • limette
    • 30. August 2008 um 18:01

    In der Hilfe gibt es dazu ein gutes Beispiel:

    Spoiler anzeigen
    [autoit]

    InetGet("http://www.nowhere.com/somelargefile.exe", "test.exe", 1, 1)

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

    While @InetGetActive
    TrayTip("Downloading", "Bytes = " & @InetGetBytesRead, 10, 16)
    Sleep(250)
    Wend

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

    MsgBox(0, "Bytes read", @InetGetBytesRead)

    [/autoit]

    Bezogen auf dein Script währe das:

    Spoiler anzeigen
    [autoit]


    #include <Misc.au3> ;für _IsPressed

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

    InetGet("http://ftp22.nero.com/Nero8/Nero-8.3.6.0_deu_update.exe", @ScriptDir & '\Nero-8.3.6.0_deu.exe', 1, 1)

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

    While @InetGetActive
    TrayTip("Downloading", "Bytes = " & @InetGetBytesRead, 10, 16)
    If _IsPressed( '1B' ) Then ;Wenn ESC gedrückt wurde
    InetGet( 'abort' ) ; breche den Download ab. Aus der Schleife geht der dann von alleine,
    ; da die Bedingung der While-Schleife @InetGetActive ist
    EndIf
    Sleep(100)
    Wend

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

    MsgBox(0, "Bytes read", @InetGetBytesRead)

    [/autoit]

    mfg limette

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™