Beiträge von Cartan12

Schön, ich würde dir aber noch eine GUI dazu empfehlen. Ich habe dir mal ein Grundgerüst gebaut, was du damit anfängst ist deine Sache...

#include <ButtonConstants.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Programm-Planer", 351, 336, 300, 206)
$MonthCal1 = GUICtrlCreateMonthCal(@YEAR & "/" & @MON & "/" & @MDAY, 24, 80, 191, 162)
$Input1 = GUICtrlCreateInput(@HOUR, 232, 80, 41, 21)
$Updown1 = GUICtrlCreateUpdown($Input1)
GUICtrlSetLimit(-1,23,0)
$Input2 = GUICtrlCreateInput(@MIN, 280, 80, 41, 21)
$Updown2 = GUICtrlCreateUpdown($Input2)
GUICtrlSetLimit(-1,59,0)
$Label1 = GUICtrlCreateLabel("Datum", 80, 40, 67, 25)
$Label2 = GUICtrlCreateLabel("Zeit", 240, 40, 38, 17)
$Label3 = GUICtrlCreateLabel(":", 272, 80, 8, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("Programm", 56, 264, 91, 17)
$Input3 = GUICtrlCreateInput("Programm auswählen", 56, 288, 121, 21)
$Button1 = GUICtrlCreateButton("Durchsuchen", 184, 288, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Task planen!", 232, 152, 75, 25, $WS_GROUP)
GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$programm = FileOpenDialog("Programm auswählen",@ScriptDir & "\","Ausfürbare Programme (*.exe)")
GUICtrlSetData($Input3,$programm)
Case $Button2
;...
EndSwitch
WEnd

Wenn du noch hilfe brauchst... Einfach fragen

Ich finde das Projekt für Übungszwecke trotzdem ganz gut... Es gibt diese Art Programme zwar schon, aber wenn man mit ein paar Programmen anfängt und dann eine gute GUI dazu erstellt kann man viel dabei lernen. Also, wenn du Hilfe brauchst, kannst du uns gerne fragen.

Hatten wir doch schonmal mit dem IP-Adressen ändern, und der wurde wegen verstoß gegen die Forenregeln geschlossen...

Kleiner Fehler: Du musst den Titel des FENSTERS und nicht die ID angeben. So ist es richtig:

$text = WinGetText("Navision XAL Oracle RDBMS - Sigotron AG", "")
MsgBox(0, "Der gelesene Text lautet:", $text)

Schau dir doch mal UEZs Sachen an: http://www.autoitscript.com/forum/index.php?showtopic=87200
https://autoit.de/index.php?page=Thread&amp;threadID=9630
Er ist ja schließlich unser GDI+ Meister

Also von einem Multiplayerspiel in AutoIt wür de ich dringend abraten...
Ich selbst hab mal versucht mit lite-c ein Multiplayerspiel zu erstellen und bin gescheitert. Ich habe es sogar geschafft, dass sich die Figuren bewegen und schießen, aber sie haben sich (im multiplayer-modus) nichts abgezogen. Bis zu dem Punkt hatte ich ca. 3800 Zeilen Script, und darin den Fehler finden, dass ist nicht leicht.
Kurz danach hab ich dann damit aufgehört...

Das Problem ist schnell gelößt... Du musst dir nochmal die neue Anhang.au3 runterladen. Gab nämlich nochmal ein Update...

While 1 ; Einfache Endlosschleife
Sleep(30 * 1000) ; Wartet 30 sec
Send("{ENTER}") ; Sendet ENTER
; Sleep(3 * 1000) ;Wartet 3 sec (wenn erwünscht, einfach ; weg machen)
Select("{NUMPADENTER}") ; Sendet NUMPADENTER
WEnd

Genau, wofür gibts Google http://lmgtfy.com/?q=AutoIt+bot+Forum

edit: hier mal ein Beispiel:

if WinExists("Fehler!") Then Send("{ENTER}")

oder:

if WinExists("Fehler!") Then Send("{NUMPADENTER}")

Herzlich Willkommen im Forum!
Ich will dir jetzt nicht den Spaß verderben, aber das sieht mir doch stark nach einem Bot aus... Ließ dir das mal durch: https://autoit.de/index.php?page=Forumrules
Falls du eine Erklärung hast, wofür du das brauchst, können wir dir helfen

UPDATE! Die UDF unterstützt nun alle (mir bekannten) E-Mail Anbieter und es wurden viele Bugs behoben. Außerdem habe ich noch ein kleines Auswahlmenü hinzugefügt. Ich glaube, diese UDF kann man nun gut zu benutzen --> Siehe Post#1

Von mir auch.
Ich würde sagen, der Prafix [laufend] kann geändert werden...

Muss

Select
Case $nMsg = $GUI_EVENT_CLOSE
Case $nMsg = $lineargo
$Anzahl = GUICtrlRead ( $lineart )
$file = FileOpen ( "Lineareswachstum.txt", 1 )
$aenderunglinear = GUICtrlRead($lineard)
$linearbestand = GUICtrlRead($linearb)
$linearmax = GUICtrlRead($lineart)
$linearjahr = 0
For $i = 0 To $linearmax - 1 ; SOLLTE $lineartmax HEIßEN
$linearjahr = $linearjahr + 1
$linearbestand = $linearbestand + $aenderunglinear
FileWriteLine($file, $linearjahr & "-----------" & $linearbestand) ; Die &-Zeichen verbinden die Strings zu einem String
Next

EndSelect

heißen
P.S. Fragen sind nicht schlimm, dafür sind wir ja hier

Muss einfach nur

$linearJahr += 1

heißen

Select
Case $nMsg = $GUI_EVENT_CLOSE
Case $nMsg = $lineargo
$Anzahl = GUICtrlRead ( $lineart )
$linearfile = FileOpen ( "Lineareswachstum.txt", 1 )
$linearJahr = 0
$aenderunglinear = GUICtrlRead($lineard)
$linearbestand = GUICtrlRead($linearb)
$lineartmax = GUICtrlRead($lineart)
For $i = 0 To $linearmax - 1 ; SOLLTE $lineartmax HEIßEN
$linearJahr = $linearJahr += 1
$linearbestand = $linearbestand += $aenderunglinear
FileWriteLine($file, $linearJahr"-----------"$linearbestand)
Next
EndSelect

Achte mal auf die rechtschreibung

Bug gefixt ; Es klappten nun auch Texte als Anhang --> post#1

Stilgar würde mich sehr freuen, wenn die UDF in die POP3 UDF aufgenommen wird... Wäre nett wenn du dann noch meinen Namen nennst

Ich war sehr überrascht, als ich den ersten Anhang runtergeladen hatte. Es war ein Zip Archiv, doch in der Mail stand nur ein sehr langer String. Nach ein bisschen recherchieren fand ich heraus, das Anhänge (Versucht mal irgendeine Datei mit z.B. EditPlus zu öffnen) in Base64 als STRING verschlüsselt versendet werden. Das Mailprogramm entschlüsselt diese Datei und gibt den Namen an. Dann läd es diesen String runter, speichert es in eine Textdatei und ändert den Namen. Das ist genau das, was mein Script macht...
Ach ja, es gibt ein Problem, sobald der Anhang eine Textdatei IST. Dann wird der Inhalt der Datei nicht verschlüsselt, mein Script Versucht jedoch genau das... Was dabei rauskommt kann man sich ja denken
Bin fast fertig diesen Fehler zu beheben...

Funktioiert auf jeden Fall! Dieser Base64 ist der Standartcode vieler Anbieter... Ich mein, jedes Mailprogramm kann das, wiso sollen wir das nicht können!?!

Sehr nett
Würde dir empfehlen den Code und die exe als Anhang(am besten im .zip archiv) zu posten...

Da heute die Frage gestellt wurde, wie man denn Anhänge runterläd und ich dieses Problem lösen konnte, hab ich mir gedacht, ich mach daraus mal ne UDF.
Erklärung: Eine E-Mail besteht aus mehreren Teilen. Einer dieser Teile ist der Anhang. Dieser ist in Base64 verschlüsselt, also entschlüsselt dieses Script diesen Code und gibt einen Array bestehend aus dem Namen der Datei und dem entschlüsselten Text. Nun muss man nurnoch eine Datei mit dem Dateinenamen erstellen und dort den entschlüsselten Code reinschreiben (-->siehe Beispiel)

Funktion: _getanhang($v_text)
$v_text Text, der aus _POP3Retr(), bzw. _downloadmail() entstanden ist.
Rückgabe:
$rueckgabe Zurückgegebener Array
$rueckgabe[0] Decodierter Anhang
$rueckgabe[1] Name der Datei im Anhang

Funktion _downloadmail()
Kleines Auswahlmenü zum auswählen und runterladen der gewünschten E-Mail
Rückgabe:
$data Der Text der E-Mail (Mit Anhang) -->Siehe Beispiel

Beispiel:

Anhang UDF:

EDIT: _downloadmail()-Funltion hinzugefügt. _downloadmail Erstellt eine kleine GUI, in der man die gewünschte E-Mail runterladen kann. Viele, viele Bugs behoben, die UDF sollte jetzt ohne Probleme funktionieren...