Beiträge von alpines

Super, ich hab mal den grünen Haken für [gelöst] gesetzt (1. Beitrag bearbeiten), wenn du weitere Fragen hast kannst du sie gerne hier stellen oder einen neuen Thread aufmachen

[Blockierte Grafik: http://i.imgur.com/sDpabY8.png]

Er schmeißt mir bei einigen Scripten aber andauernd die Meldung GDIConstants.au3. Welche AutoIt-Version hast du denn?

Zitat von chesstiger

Aber wer braucht schon ein Switch oder For? Wir sind doch kreativ und wissen, wie AutoIt Control-IDs vergibt.

Das ist ja mal richtig fahrlässig programmiert

Ich glaube man blickt da in ein paar Monaten besser durch wenn man das lieber loopt aber jeder solls machen wie er es am besten versteht,
und bei dem Coding-Stil vom TE ist das glaube ich eher verwirrend.

@chesstiger Bei deinem Script vernachlässigst du aber die Tatsache, dass nur die 4 Tiles angemalt werden sollen.
Wenn man auf den Hintergrund klickt wird er auch eingefärbt also musst du noch GUICetCursorInfo()[4] switchen oder mit einer For-Schleife noch die Tiles abfragen.

GUIGetCursorInfo ist das was du brauchst:

#include <Misc.au3>
#include <GUIConstantsEx.au3>


Opt("GUIOnEventMode", 1)


;Variablen
$fenster = 0


$rhorizontal1 = 0
$rhorizontal2 = 0
$rhorizontal3 = 0


$rvertikal1 = 0
$rvertikal2 = 0
$rvertikal3 = 0


;Anklickbare Felder von links nach rechts, von oben nach unten
$f1 = 0
$f2 = 0
$f3 = 0
$f4 = 0






$fenster  = GUICreate ("GUI 4x4", 140, 140)
GUISetOnEvent($GUI_EVENT_SECONDARYDOWN, "_RightClick")
GUISetBkColor (0xFFFFFF)
GUISetOnEvent(-3, "_Exit")


   $rvertikal1 = GUICtrlCreateGraphic (0, 0, 1, 140)
	GUICtrlSetBkColor ($rvertikal1, 0xA0A0A0)
   $rvertikal2 = GUICtrlCreateGraphic (70, 0, 1, 140)
	GUICtrlSetBkColor ($rvertikal2, 0xA0A0A0)
   $rvertikal3 = GUICtrlCreateGraphic (140, 0, 1, 140)
	GUICtrlSetBkColor ($rvertikal3, 0xA0A0A0)


   $rhorizontal1 = GUICtrlCreateGraphic (0, 0, 140, 1)
	GUICtrlSetBkColor ($rhorizontal1, 0xA0A0A0)
   $rhorizontal2 = GUICtrlCreateGraphic (0, 70, 140, 1)
	GUICtrlSetBkColor ($rhorizontal2, 0xA0A0A0)
   $rhorizontal3 = GUICtrlCreateGraphic (0, 140, 140, 1)
	GUICtrlSetBkColor ($rhorizontal3, 0xA0A0A0)


   $f1 = GUICtrlCreateGraphic (1, 1, 69, 69)
	GUICtrlSetOnEvent(-1, "ueberpruefung")
   $f2 = GUICtrlCreateGraphic (71, 1, 69, 69)
	GUICtrlSetOnEvent(-1, "ueberpruefung")
   $f3 = GUICtrlCreateGraphic (1, 71, 69, 69)
	GUICtrlSetOnEvent(-1, "ueberpruefung")
   $f4 = GUICtrlCreateGraphic (71, 71, 69, 69)
	GUICtrlSetOnEvent(-1, "ueberpruefung")


GUISetState (@SW_SHOW)


While 1
    Sleep (10)
 Wend


Func _RightClick()
	$curInfo = GUIGetCursorInfo($fenster)
	Switch $curInfo[4]
		Case $f1
			GUICtrlSetBkColor ($f1, 0x000000)
		Case $f2
			GUICtrlSetBkColor ($f2, 0x000000)
		Case $f3
			GUICtrlSetBkColor ($f3, 0x000000)
		Case $f4
			GUICtrlSetBkColor ($f4, 0x000000)
	EndSwitch
EndFunc


Func ueberpruefung ()
    Select
    Case @GUI_CtrlId = $f1
	   GUICtrlSetBkColor ($f1, 0xFF0000)
    Case @GUI_CtrlId = $f2
	   GUICtrlSetBkColor ($f2, 0xFF0000)
    Case @GUI_CtrlId = $f3
	   GUICtrlSetBkColor ($f3, 0xFF0000)
	Case @GUI_CtrlId = $f4
	   GUICtrlSetBkColor ($f4, 0xFF0000)
	EndSelect
 EndFunc


 Func _Exit ()
	Exit
 EndFunc

Freut mich, dass ich dir helfen konnte und umso mehr freut es mich, dass du vorbildhaft den grünen Haken gesetzt hast.

Wie schaut denn deine $AttachFile dann aus?

Erlaubt dein Email-Provider überhaupt derartige Anhänge zu senden? Eventuell ist sie zu groß oder passwortgeschützt etc.
Hast du mal versucht den absoluten Pfad anzugeben? Also "C:\datei.txt"?

Sieh dich doch in der Dokumentation für Access.au3 mal um, da findest du sicherlich Funktionen zum Schreiben oder Query-Ausführen in Access.
Der Rest ist ähnlich wie beim Speichern in Dateien: Datenbank öffnen, Einträge lesen/speichern, Datenbank schließen.

Da bin ich doch auch dabei.

Guten Rutsch ins neue Jahr 2017, mögen eure heuchlerischen Vorsätze in den ersten Tagen zusammenbrechen!

Zitat von hevilp

Hallo,

die Daten sind nicht runterladbar:

Code

Fatal error: An error occured. Sorry.
Information:


ID: a871d2535dc5c3051f7feb350438b1d75d75c9aa
Bitte teilen Sie dem Betreiber die oben stehende ID mit.
Die Fehlermeldung kann mit dieser ID über „ACP » Protokoll » Fehler“ eingesehen werden.

Der Quellcode wurde doch gepostet? Kopier ihn doch einfach?

Dann stimmt mit deiner IE Version oder mit der Website etwas nicht, mein Code sollte funktionieren.

Oh mein Gott, es ist viel zu früh am Morgen... Habs gefixt.

Das ist das Problem mit der IE-UDF, der spinnt teilweise rum und startet einfach nicht - aber da gibt es einen kleinen Workaround für.

#include <IE.au3>


Global Const $S_USERNAME = "test"
Global Const $S_PASSWORD = "12345"


_IEErrorNotify(False)


Do
	Global $oIE = _IECreate("intranet.com/user/login")
Until IsObj($oIE)


$oUsername = _IEGetObjById($oIE, "edit-name")
$oPassword = _IEGetObjById($oIE, "edit-password") ;<- Nicht sicher ob die ID stimmt
$oSubmit = _IEGetObjById($oIE, "edit-submit")


_IEFormElementSetValue($oUsername, $S_USERNAME)
_IEFormElementSetValue($oPassword, $S_PASSWORD)
_IEAction($oSubmit, "click")


Sleep(500)
_IELoadWait($oIE)

Außerdem brauchst du die ganzen optionalen Parameter für _IECreate nicht auszufüllen.
Das _IELoadWait() danach kannst du dir auch schenken, weil das im _IECreate schon enthalten ist.

Hier nochmal ohne CSGO im Hintergrund:
[Blockierte Grafik: http://i.imgur.com/K2a6NJ0.png]

@Andy

i7-4790 (im Hintergrund laufen aber einige Programme)
[Blockierte Grafik: http://i.imgur.com/Tu0XNX0.png]

@Cape-City kennst du ternäre Operatoren? Die lassen sich in deinem Beispiel hervorragend anwenden und man spart dadurch 4 Zeilen.
Statt zwei If-Zweige hinzuschreiben kann man das ganze auch so hinschreiben (verfügbar ab 3.3.10.2 glaube ich):

Return _IsPressed("1B") ? $PROGRESS_CANCEL : $PROGRESS_CONTINUE

Zitat von Kloppstock

Wie schaffe ich es, dass autoit dann auf den link klickt? (siehe roter Kasten im Anhang)
Scheint für mich als noob ieframe zu sein.

Das hat doch was mit "_IEFormElementGetObjByName" zu tun, wobei hier Name "name" ist wie es mir der Quelltext anzeigt oder?

Die Id des Buttons lautet "edit-submit", also holst du mit _IEGetObjById() das Objekt und mit _IEAction() klickst du drauf.

Wenn alles geklärt ist dann setz ich mal den grünen Haken für [gelöst] (1. Beitrag bearbeiten).
Solltest du Probleme haben die Grüße abzuschicken (über die Maus und Tastatursteuerung) kannst du ja trotzdem hier fragen oder einen neuen Thread aufmachen.

Zitat von BugFix

Bei Frauen aber bitte als festes Alter die 29 hinterlegen....

Oder das Alter einfach ausblenden wenn sie über 29 sind