Beiträge von Rombur

Rombur

Hallo

crocojunk

Bei mir wird nach dem Speichern zwar eine .croco Datei erstellt,
aber der txt wird nicht in der Datei gespeichert.

habe winxp sp3

Rombur

Hallo R60

Google mal nach "TaskAssign"

Rombur

ShellExecute ( "C:\Dokumente und Einstellungen\X\Desktop\Fenster.htm" )

Rombur

Danke SEuBo

Das Thema hätte mich vor 2-3 Wochen fast zum verzweifeln Gebracht.

(dabei ist es ja eigentlich ziemlich einfach)

Rombur

Hallo SEuBo

Ich hoffe du bist nicht mehr so "kurz angebunden"
Und wenn das der Fall sein sollte,könntest du dann,zu dem Thema ein Beispiel machen ?

Rombur

hier noch ein paar Beispiele.

http://www.tanmar.info/content/view/21/50/
http://www.patshaping.de/hilfen_ta/pop3_smtp.htm

Rombur

ich habe es gerade auch über web.de getestet,
und da geht es bei mir auch

das hat vielleicht etwas mit den smtp server zu tun.

gmx: smtp - mail.gmx.net

web.de: smtp - smtp.web.de

Rombur

Hallo TheShadowAE

Dein emailmanager sieht richtig gut aus finde ich!
aber leider Funktioniert es bei mir nicht.

ich habe Autoit 3.3.4.0 und getestet mit gmx, googlemail, freenet

beim abrufen kommt, Server nicht gefunden.

und beim Senden kommt zwar die Meldung das die Mail versendet wurde,
aber es kommt keine an

Rombur

Zitat von Rombur

Hallo Sprenger120

Also bei mir laufen beide Scripte (ehrlich gesagt finde ich auch keinen unterschied zwischen beiden)

ps.:ich habe allerdings noch die FFMPEG.exe zum Script getan,

wie schon gesagt gehen bei mir beide Scripte !

sind auch beide im rar Archiv.

ps.: ich nehme mal an das es bei dir an einem fehlenden Codec liegt.

geht denn mein avi bei dir?

Rombur

ich hab dir mal die avi,und alles was ich verwendet habe hoch geladen.

http://www.datafilehost.com/download-b5e35093.html

Rombur

ich habe win xp sp3

und die avi Dateien sind in recht guter Qualität.(10 sec 5 mb)

mit dem vlc und dem kmp Player laufen sie.

Spoiler anzeigen

Format : AVI
Format/Info : Audio Video Interleave
File size : 10.2 MiB
Duration : 17s 800ms
Overal bit rate : 4802 Kbps

Video
Format : RGB
Codec ID : RGB
Codec ID/Info : Uncompressed RGB32
Duration : 17s 800ms
Bit rate : 4800 Kbps
Width : 200 pixels
Height : 200 pixels
Display aspect ratio : 1.000
Frame rate : 5.000 fps
Resolution : 24 bits
Bits/(Pixel*Frame) : 24.000
Stream size : 10.2 MiB

Rombur

Hallo Sprenger120

Also bei mir laufen beide Scripte (ehrlich gesagt finde ich auch keinen unterschied zwischen beiden)

ps.:ich habe allerdings noch die FFMPEG.exe zum Script getan,

Rombur

Hi

Suche mal nach Reconnect !

Es gibt hier im Forum ein Script,das Funktioniert.

Ich hatte es auch mal Genutzt.

Rombur

Danke AutoBert

ich kann die GUI jetzt bewegen!

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 396, 281, 192, 124, $WS_POPUP, $WS_EX_CONTROLPARENT)
GUICtrlCreateBackgroundImage("Form1", @TempDir & "\background_pic.jpg")
Func GUICTrlCreateBackGroundImage($fenster_titel, $pfad)
$size = WinGetPos($fenster_titel,"")
GUICtrlCreatePic($pfad, 0, 0, $size[2],$size[3])
GUICtrlSetSTate(-1,$GUI_DISABLE)
EndFunc ;==>GUICTrlCreateBackGroundImage

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

;GUICtrlCreatePic(@TempDir & "\background_pic.jpg", 0, 0, 396, 281)
$Button1 = GUICtrlCreateButton("Play", 10, 250, 45, 20, $WS_GROUP)
GUICtrlSetTip ($Button1,"BLUB ")
$Button2 = GUICtrlCreateButton("Ruhe", 10, 200, 45, 20, $WS_GROUP)
GUICtrlSetTip ($Button2,"BLUB ")
$Button3 = GUICtrlCreateButton("Ausw.", 10, 152, 45, 20, $WS_GROUP)
GUICtrlSetTip ($Button3,"BLUB")
$Button4 = GUICtrlCreateButton("Exit", 330, 250, 45, 20, $WS_GROUP)
;GUICtrlCreatePic(@TempDir & "\background_pic.jpg", 0, 0, 396, 281)

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

GUISetState(@SW_SHOW)

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

#EndRegion ### END Koda GUI section ###

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

FileInstall ("background_pic.jpg", @TempDir & "\background_pic.jpg")
FileInstall ("P J.MP3", @TempDir & "\P J.MP3")

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg

Case $Button1
$Sound1 = SoundPlay(@TempDir & "\P J.MP3",0)

Case $Button2
SoundPlay("")

Case $Button3
$auswahl = fileopendialog("Such dir was","C:\Users\" & @username & "\Music","Musik(*.mp3)",1+4)
SoundPlay ( $auswahl,0)

Case $Button4
Exit
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

[/autoit]

nur das jetzt die Buttons nicht mehr funktionieren,aber das bekomme ich bestimmt hin.

also Danke nochmal

Edit: jetzt geht es

Rombur

Hallo

ich habe dazu eine frage.

wie ist es möglich den Button,das Bild zu bewegen?

Rombur

hallo sc4ry

habe dein Clipboard mal getestet und finde es richtig gut

ps:
bei mir stürzt es übrigens nicht ab,habe windows xp sp3

Rombur

Hallo Andy

ich Danke dir für deine Hilfe,so wie das Script jetzt ist wollte ich es haben.

Und zu deinem anderen Programm,das ist ja richtig Genial!
Hätte nicht gedacht das dieses mit Autoit möglich ist.

Danke noch einmal

Rombur

Hallo

ich habe die gui von Andy etwas ausgebaut,jetzt kann man seine Spielzahlen eintragen und in eine ini Speichern.

Bild
[Blockierte Grafik: http://s11.directupload.net/file/d/1993/wek5xxro_jpg.htm] http://s11.directupload.net/file/d/1993/wek5xxro_jpg.htm

aber ich komme wieder nicht weiter,und zwar sollen die Zahlen verglichen werden wenn man auf den Button Pruefen klickt.

ich hoffe mir kann jemand helfen

code

Spoiler anzeigen

[autoit]

#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <Inet.au3>
#include <String.au3>
$body = _INetGetSource("http://www.lotto.de/gewinnzahlen_und_quoten.html")

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

$filewr = FileOpen(@ScriptDir & "\lotto.txt", 2)

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

$start = '<td height="32" class="zq17"><strong>'
$end = '</strong></td>'

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

$stringb = _StringBetween($body, $start, $end)
;msgbox(0,"Gewinnzahlen",$stringb[0])

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

If IsArray($stringb) Then
$stringb = $stringb[0]
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $stringb = ' & $stringb & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
EndIf

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

FileWriteLine($filewr, $stringb)

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

$Zahlen = StringSplit($stringb, ",", 3)
;_ArrayDisplay($Zahlen)
Dim $radio[50]

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

$gui = GUICreate('Lottozahlen', 310, 530, 193, 125)
$label = GUICtrlCreateLabel(" Die aktuellen Lottozahlen sind:", 75, 1, 200, 13)
$label1 = GUICtrlCreateInput("" & $stringb & "", 50, 16, 200, 20)
$label3 = GUICtrlCreateLabel("Bitte markieren Sie Ihre getippten Zahlen im unteren Feld:", 10, 37, 300, 13)
$label2 = GUICtrlCreateInput("Sie haben 0 Richtige!", 50, 340, 200, 20)
;$label4 = GUICtrlCreateLabel("Spiel1 = " & @CRLF & "Spiel2 = " & @CRLF & "Spiel3 = " & @CR=LF & "Spiel 4 = " & @CRLF & "Spiel5 = " & @CRLF & "Spiel6 = " & @CRLF & "Losnummer = ", 10, 370, 300, 120)
$Input = GUICtrlCreateInput("", 10, 370, 110, 20)
$Input1 = GUICtrlCreateInput("", 10, 395, 110, 20)
$Input2 = GUICtrlCreateInput("", 10, 420, 110, 20)
$Input3 = GUICtrlCreateInput("", 10, 445, 110, 20)
$Input4 = GUICtrlCreateInput("", 10, 470, 110, 20)
$Input5 = GUICtrlCreateInput("", 10, 495, 110, 20)

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

GUICtrlCreateLabel("1", 2, 372, 8, 13)
GUICtrlCreateLabel("2", 2, 397, 8, 13)
GUICtrlCreateLabel("3", 2, 422, 8, 13)
GUICtrlCreateLabel("4", 2, 447, 8, 13)
GUICtrlCreateLabel("5", 2, 472, 8, 13)
GUICtrlCreateLabel("6", 2, 497, 8, 13)

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

$Writebutton = GUICtrlCreateButton("Speichern", 130, 370, 55, 20, $WS_GROUP)
$Readbutton = GUICtrlCreateButton("Abrufen", 190, 370, 55, 20, $WS_GROUP)
$Pruefen = GUICtrlCreateButton("Pruefen", 250, 370, 55, 20, $WS_GROUP)

$Writebutton1 = GUICtrlCreateButton("Speichern", 130, 395, 55, 20, $WS_GROUP)
$Readbutton1 = GUICtrlCreateButton("Abrufen", 190, 395, 55, 20, $WS_GROUP)
$Pruefen1 = GUICtrlCreateButton("Pruefen", 250, 395, 55, 20, $WS_GROUP)

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

$Writebutton2 = GUICtrlCreateButton("Speichern", 130, 420, 55, 20, $WS_GROUP)
$Readbutton2 = GUICtrlCreateButton("Abrufen", 190, 420, 55, 20, $WS_GROUP)
$Pruefen2 = GUICtrlCreateButton("Pruefen", 250, 420, 55, 20, $WS_GROUP)

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

$Writebutton3 = GUICtrlCreateButton("Speichern", 130, 445, 55, 20, $WS_GROUP)
$Readbutton3 = GUICtrlCreateButton("Abrufen", 190, 445, 55, 20, $WS_GROUP)
$Pruefen3 = GUICtrlCreateButton("Pruefen", 250, 445, 55, 20, $WS_GROUP)

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

$Writebutton4 = GUICtrlCreateButton("Speichern", 130, 470, 55, 20, $WS_GROUP)
$Readbutton4 = GUICtrlCreateButton("Abrufen", 190, 470, 55, 20, $WS_GROUP)
$Pruefen4 = GUICtrlCreateButton("Pruefen", 250, 470, 55, 20, $WS_GROUP)

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

$Writebutton5 = GUICtrlCreateButton("Speichern", 130, 495, 55, 20, $WS_GROUP)
$Readbutton5 = GUICtrlCreateButton("Abrufen", 190, 495, 55, 20, $WS_GROUP)
$Pruefen5 = GUICtrlCreateButton("Pruefen", 250, 495, 55, 20, $WS_GROUP)

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

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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

Func _Write($Datei, $section, $key, $value)
IniWrite($Datei, $section, $key, $value)
EndFunc

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

Func _Read($Datei, $section, $key, $deflaut)
$wert = IniRead($Datei, $section, $key, $deflaut)
Return $wert
EndFunc

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

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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

For $x = 0 To 6
For $y = 1 To 7
$radio[$x * 7 + $y] = GUICtrlCreateCheckbox($x * 7 + $y, ($y - 1) * 40 + 20, $x * 40 + 60, 30, 30, $BS_pushlike)
Next
Next

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

GUISetState()
$anzahlrichtige = 0
While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
Case $radio[1] To $radio[49] ; <-----------
For $richtig In $Zahlen
If $msg - $radio[1] + 1 = $richtig Then
$anzahlrichtige += 1
GUICtrlSetData($label2, "Sie haben " & $anzahlrichtige & " Richtige!")
Sleep(100)

EndIf
Next
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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

Case $Writebutton
$write = GUICtrlRead($Input)
_Write("Lotto.ini","1","",$write) ;schreibt in die .ini
Case $Readbutton
$Read = _read("Lotto.ini", "1", "", "")
GUICtrlSetData($Input, $Read)

Case $Writebutton1
$write = GUICtrlRead($Input1)
_Write("Lotto.ini","2","",$write)
Case $Readbutton1
$Read = _read("Lotto.ini", "2", "", "")
GUICtrlSetData($Input1, $Read)

Case $Writebutton2
$write = GUICtrlRead($Input2)
_Write("Lotto.ini","3","",$write)
Case $Readbutton2
$Read = _read("Lotto.ini", "3", "", "")
GUICtrlSetData($Input2, $Read)

Case $Writebutton3
$write = GUICtrlRead($Input3)
_Write("Lotto.ini","4","",$write)
Case $Readbutton3
$Read = _read("Lotto.ini", "4", "", "")
GUICtrlSetData($Input3, $Read)

Case $Writebutton4
$write = GUICtrlRead($Input4)
_Write("Lotto.ini","5","",$write)
Case $Readbutton4
$Read = _read("Lotto.ini", "5", "", "")
GUICtrlSetData($Input4, $Read)

Case $Writebutton5
$write = GUICtrlRead($Input5)
_Write("Lotto.ini","6","",$write)
Case $Readbutton5
$Read = _read("Lotto.ini", "6", "", "")
GUICtrlSetData($Input5, $Read)

EndSwitch
WEnd

[/autoit]

ini

Spoiler anzeigen

Code

[1]
=24 30 33 34 36 45
[2]
=12 14 15 16 17 18
[3]
=1 3 6 19 20 21  
[4]
=20 21 22 23 24  25
[5]
=32 33 34 35 36 37
[6]
=41 42 43 44 45 46

Alles anzeigen

Rombur

Andy
ich danke auch dir!

Rombur

@

Greek

du hast auch 6 richtige bei mir danke dir !

Beiträge von Rombur

Autoit Editor

CPU Auslasten

Firefox Document

Teil einer Website in GUI einbetten

Teil einer Website in GUI einbetten

emailmanager

emailmanager

emailmanager

AVI Writer UDF

AVI Writer UDF

AVI Writer UDF

AVI Writer UDF

Fritz!box Reconnect

Transparenter Hintergrund der GUI

Transparenter Hintergrund der GUI

Clipboard-Verwaltung für Text

Lottozahlen vergleichen

Lottozahlen vergleichen

Lottozahlen vergleichen

Lottozahlen vergleichen