Beiträge von descent

descent

Hab noch eine Frage und wusste nicht ob ich dafür nen neuen Thread machen soll, weshalb ich es einfach hier anfüge, da es sich um das gleiche Programm handelt.

Ist es möglich, ein Inputfeld so zu verändern, dass dieses zur Passworteingabe geeignet ist? D.h. es sollte beispielsweise bei einer Eingabe * oder # anzeigen. Ich weiß das dies über Inputbox funktioniert, jedoch möchte ich kein extra Fenster, welches sich bei dirser Funktion ja immer öffnet, sonder ein Eingabefeld welches sich auf meinem GUI befindet.

Die alte Frage besteht nach wie vor

descent

Dies ist der Teil der mit die oben genannten Probleme bereitet:

Spoiler anzeigen

[autoit]

....
$sHTML=_FFReadHTML()
$sHTML1=_StringBetween($sHTML, ">Verkauft</a>","</div>")
$sHTML2=_StringBetween($sHTML1[0], "(",")")

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

$r = _GetArray($sHTML2[0])

for $i = 1 to $sHTML2[0]
$AtklNr=_FFXPath("//tbody//tr["&$r[$i]&"]//td[3]","textContent")
GUICtrlCreateListViewItem($AtklNr, $ListView1)
next
.....

[/autoit]

descent

Habe vergessen zu schreiben, dass die Daten die folgen, also im ListView 5, 6, 7.. aufgelistet werden. Habe nun versucht die Zeilen einzeln auszugeben, was auch nicht funktioniert. Erhalte bei Ausgabe nr. 2, 3, 4 keinen Text. Die anderen Zeilen funktionieren problemlos.
Es befindet sich in den Zeilen ein ähnlicher text, welcher sich nur sich nur durch die folge der Zeichen unterscheidet.

descent

Hallo,
ich arbeite derzeit noch immer an einem Script, welches Daten einer Tabelle von einer Homepage einließt. Dies geschieht mittels der FF.au3 und _FFXPath. Jedoch bin ich hier auf ein Problem gestoßen, welche ich nicht lößen kann.
Ich lese eine ganze Zeile ein und gebe die Daten in einem LiestView aus. Hierbei tritt ein "Fehler" auf. Es werden die Texte komplett eingelesen und nacheinander eingetragen, jedoch "übersprigt" es jedes mal die Texte welche in meiner ListView an 2, 3 un 4 Stelle ausgegeben werden sollten. Da ich die Zeilenangabe über ein Array verarbeite, habe ich schon überprüft, ob es unterschiede in den Link gibt, was jedoch nicht der Fall ist. Die Zahl der Zeile, müsste was ich über _ArrayDisplay gesehen habe auch stimmen.
Hatte schon einmal jemand von euch das selbe Problem oder weiß wie man es umgehen kann?
Es handelt sich hierbei um die Seite Ebay.
Wenn mehr Informationen benötigt werden kann ich diese euch gerne mitteilen.

descent

Vielen Dank
Deine Kommentare machen mir das um einiges verständlicher

descent

Danke, das ist geanu das was ich gesucht habe.
Leider verstehe ich es nicht ganz :pinch:
Kannst du vllt Kommentare hinzufügen um zu erläutern, was welche Zeile bewirkt?

descent

Hallo,
ich steh gerade ziemlich auf der Leitung was die Wertzuweisung eines Array´s betrifft. Ich lese von eines Homepage einen Wert aus, der bei mir nun beispielsweise 9 ist. Der höchste Wert der nun in das Array gespeichert werden soll, ist das 3 fache des eingelesenen Wertes, also 27. Die Werte davor sollen in 3er Schritten nach oben laufen (3, 6, 9, 12, 15 ,18 , 21, 24, 27).
Hat jemand eine Idee wie ich hier nun vorgehe?
Ich weiß es nicht, da die 9 variabel ist und ich nicht weiß wie ich die Werte davor bestimmten soll.

Danke für jeden Vorschlag im voraus.

mfg

descent

Ne While-Schleife?

Die wiederholt sich dann eben die ganze Zeit

descent

Ich weiß nicht genau wie der Kalender bei Google aufgebaut ist, jedoch kann man was die Automatisierung eines Browsers betrifft sehr viel über die FF.au3 machen.
Mehr Informationen dazu findest du unter diesen Links:
https://autoit.de/index.php?page=Thread&threadID=13983
https://autoit.de/index.php?page=Thread&threadID=15415
http://thorsten-willert.de/Themen/FFau3/Beispiele/files
http://german.documentation.ff-au3.thorsten-willert.de/

descent

Versuchs mal hiermit

[autoit]

HotKeySet ( "key" [, "function"] )

[/autoit]

http://www.autoitscript.com/autoit3/docs/f…s/HotKeySet.htm

descent

Hat niemand eine Idee?

descent

Hallo,
habe eib Problem bei der FF.au3. Zum Einlesen von Daten aus einer Tabellenspalte verwende ich _FFXPath(). Nun möchte ich jedoch nicht den Inhalt, sondern den Link des Inhaltes ausgeben. Wie gehe ich da vor?
Ebenso bereitet mir das Einlesen von kompletten Tabellen und ein daraufhin folgendes Ausgeben der Daten in einer Listview noch Schwierigkeiten. Das Ausgeben von einzelnen Daten funktioniert soweit Problemlos, ausschließlich das Ausgeben von kompletten Tabellen schaffe ich nicht.
Bsp.:

[autoit]

_FFXPath("//table//tr[2]//td[3]//a[1]//strong","textContent") ;Einlesen des ersten Inhaltes

[/autoit][autoit]

_FFXPath("//table//tr[4]//td[3]//a[1]//strong","textContent") ;Einlesen des zweiten Inhaltes

[/autoit]

Wie ermittle ich bei diesem Beispiel die Anzahl der Zeilen?

descent

so ist es am Anfang einer, falls du das wolltest

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.0
Author: myName

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

Script Function:
Template AutoIt script.

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

#ce ----------------------------------------------------------------------------

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

; Script Start - Add your code below here

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

#include <WindowsConstants.au3>
#include <GuiConstants.au3>
#include <Array.au3>
#include <file.au3>
#include <StaticConstants.au3>

$gui = GUICreate("RPG", 400, 400)
GUISetBkColor(0x000099)

GUISetState()

$dll = DllOpen ("user32.dll")
;Global $clientsize = WinGetClientSize($gui)
;Global $speedder = 150
;Global $food
$snakelength = 0
Dim $board[40][40]; tracks the board
Dim $snake [10][10];[$snakelength + 1][3]; positions and parts of the snake
;Dim $food_location[2]; not possible for multiple food locations?

Global $dx = 0
Global $dy = 1

_Start ()

While 1
Sleep (140)
GUICtrlDelete ($Snake [1][0])
If _IsPressed(25) Then ;= Links
$dx = -1
$dy = 0
move ()
EndIf
If _IsPressed(27) Then ;= Rechts
$dx = 1
$dy = 0
move ()
EndIf
If _IsPressed(26) Then ;= Hoch
$dx = 0
$dy = -1
move ()
EndIf
If _IsPressed(28) Then ;= Runter
$dx = 0
$dy = 1
move ()
EndIf

$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch

WEnd
Func _IsPressed($hexkey)
Local $ar, $brv
$hexkey = '0x' & $hexkey
$ar = DllCall("user32", "int", "GetAsyncKeyState", "int", $hexkey)

If $ar[0] <> 0 Then
$brv = 1
Else
$brv = 0
EndIf

Return $brv
EndFunc
Func _Start ()
$snakelength = 0
;ReDim $snake;[$snakelength + 1][3]
Local $x, $y, $a, $b, $pos
For $x = 0 To 39
For $y = 0 To 39
$board[$x][$y] = 1; empty
Next
Next
$a = Int(Random(3, 36))
$b = Int(Random(3, 36))
$snake[0][2] = GUICtrlCreateLabel("", $a * 10, $b * 10, 10, 10)
GUICtrlSetBkColor($snake[0][2], 16777215)
$pos = ControlGetPos($gui, "", $snake[0][2])
$snake[0][0] = Int($pos[0] / 10)
$snake[0][1] = Int($pos[1] / 10)
EndFunc

Func move()

Local $newhead[3]
$newhead[0] = $snake[0][0] + $dx
$newhead[1] = $snake[0][1] + $dy

Local $oldtail[3]
$oldtail[0] = $snake[$snakelength][0]
$oldtail[1] = $snake[$snakelength][1]
$oldtail[2] = $snake[$snakelength][2]

Select
Case $newhead[0] < 0 Or $newhead[0] > 39 Or $newhead[1] < 0 Or $newhead[1] > 39
If $snakelength > 0 Then
;
EndIf

Case $board[$newhead[0]][$newhead[1]]; OK to go there
$newhead[2] = GUICtrlCreateLabel("", $newhead[0] * 10, $newhead[1] * 10, 10, 10)
GUICtrlSetBkColor($newhead[2], 16777215)
If $board[$newhead[0]][$newhead[1]] = 2 Then; Ate Food
; Move food
Do
$a = Int(Random(0, 39))
$b = Int(Random(0, 39))
Until $board[$a][$b] = 1; empty
$board[$a][$b] = 2; food
GUICtrlSetPos($food, $a * 10, $b * 10)
$snakelength = $snakelength + 1
ReDim $snake[$snakelength + 1][3]
Else
GUICtrlDelete($oldtail[2])
$board[$oldtail[0]][$oldtail[1]] = 1
EndIf
$board[$newhead[0]][$newhead[1]] = 0
For $i = $snakelength To 1 Step - 1; Array shift
$snake[$i][0] = $snake[$i - 1][0]
$snake[$i][1] = $snake[$i - 1][1]
$snake[$i][2] = $snake[$i - 1][2]
Next
$snake[0][0] = $newhead[0]
$snake[0][1] = $newhead[1]
$snake[0][2] = $newhead[2]
EndSelect
EndFunc

[/autoit]

descent

so vllt?

Spoiler anzeigen

[autoit]

#include <WindowsConstants.au3>
#include <GuiConstants.au3>
#include <Array.au3>
#include <file.au3>
#include <StaticConstants.au3>

$gui = GUICreate("RPG", 400, 400)
GUISetBkColor(0x000099)

GUISetState()

$dll = DllOpen ("user32.dll")
;Global $clientsize = WinGetClientSize($gui)
;Global $speedder = 150
;Global $food
$snakelength = 0
Dim $board[40][40]; tracks the board
Dim $snake [10][10];[$snakelength + 1][3]; positions and parts of the snake
;Dim $food_location[2]; not possible for multiple food locations?

Global $dx = 0
Global $dy = 1

_Start ()

While 1
Sleep (140)
GUICtrlDelete ($Snake [1][0])
If _IsPressed(25) Then ;= Links
$dx = -1
$dy = 0
move ()
EndIf
If _IsPressed(27) Then ;= Rechts
$dx = 1
$dy = 0
move ()
EndIf
If _IsPressed(26) Then ;= Hoch
$dx = 0
$dy = -1
move ()
EndIf
If _IsPressed(28) Then ;= Runter
$dx = 0
$dy = 1
move ()
EndIf

$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch

WEnd
Func _IsPressed($hexkey)
Local $ar, $brv
$hexkey = '0x' & $hexkey
$ar = DllCall("user32", "int", "GetAsyncKeyState", "int", $hexkey)

If $ar[0] <> 0 Then
$brv = 1
Else
$brv = 0
EndIf

Return $brv
EndFunc
Func _Start ()
$snakelength = 1
;ReDim $snake;[$snakelength + 1][3]
Local $x, $y, $a, $b, $pos
For $x = 0 To 39
For $y = 0 To 39
$board[$x][$y] = 1; empty
Next
Next
$a = Int(Random(3, 36))
$b = Int(Random(3, 36))
$snake[0][2] = GUICtrlCreateLabel("", $a * 10, $b * 10, 10, 10)
GUICtrlSetBkColor($snake[0][2], 16777215)
$pos = ControlGetPos($gui, "", $snake[0][2])
$snake[0][0] = Int($pos[0] / 10)
$snake[0][1] = Int($pos[1] / 10)
EndFunc

Func move()

Local $newhead[3]
$newhead[0] = $snake[0][0] + $dx
$newhead[1] = $snake[0][1] + $dy

Local $oldtail[3]
$oldtail[0] = $snake[$snakelength][0]
$oldtail[1] = $snake[$snakelength][1]
$oldtail[2] = $snake[$snakelength][2]

Select
Case $newhead[0] < 0 Or $newhead[0] > 39 Or $newhead[1] < 0 Or $newhead[1] > 39
If $snakelength > 0 Then
;
EndIf

Case $board[$newhead[0]][$newhead[1]]; OK to go there
$newhead[2] = GUICtrlCreateLabel("", $newhead[0] * 10, $newhead[1] * 10, 10, 10)
GUICtrlSetBkColor($newhead[2], 16777215)
If $board[$newhead[0]][$newhead[1]] = 2 Then; Ate Food
; Move food
Do
$a = Int(Random(0, 39))
$b = Int(Random(0, 39))
Until $board[$a][$b] = 1; empty
$board[$a][$b] = 2; food
GUICtrlSetPos($food, $a * 10, $b * 10)
$snakelength = $snakelength + 1
ReDim $snake[$snakelength + 1][3]
Else
GUICtrlDelete($oldtail[2])
$board[$oldtail[0]][$oldtail[1]] = 1
EndIf
$board[$newhead[0]][$newhead[1]] = 0
For $i = $snakelength To 1 Step - 1; Array shift
$snake[$i][0] = $snake[$i - 1][0]
$snake[$i][1] = $snake[$i - 1][1]
$snake[$i][2] = $snake[$i - 1][2]
Next
$snake[0][0] = $newhead[0]
$snake[0][1] = $newhead[1]
$snake[0][2] = $newhead[2]
EndSelect
EndFunc

[/autoit]

descent

Vielen Dank. Du bist der Beste
Sieht sehr gut aus. Werd mich da jetzt reinarbeiten damit ich weiß wie du das gemacht hast. Habe noch nie mit Arrays gearbeitet, weshalb es mir ziemliche Schwierigkeiten bereitet.

descent

Danke dir vielmals. Stehe nun vor einem weiteren Problem. Ich möchte die Inhalte in einer eigenen Listview auf einem Gui ausgeben. Das Einfügen einzelner Werte klappt soweit dank deiner Hilfe auch . Wie muss ich jedoch vorgehen, um alle Daten die gefunden wurden einzulesen? Es wäre auch noch interessant zu wissen ob man die Breite der Einzelnen Unterteilungen im Listview festlegen kann.

Danke im Voraus für jegliche Tipps und Hilfen.

Spoiler anzeigen

[autoit]

#Include <FF.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <Array.au3>

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

_FFStart("http://german.documentation.ff-au3.thorsten-willert.de/") ; beinhaltet schon _FFLoadWait

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

$_FF_COM_TRACE = False ; Ausgabe in die Console ausschalten

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

$aTD = _FFXPath("//table[1]//td[1]","textContent",6) ; alle Zellen auslesen
$aTD1 = _FFXPath("//table[1]//td[2]","textContent",6) ; alle Zellen auslesen

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$List1 = GUICtrlCreateListview("Zeile 1|Zeile 2", 32, 64, 561, 344)
GUICtrlCreateListViewItem($aTD[1] &"|"& $aTD1[1], $List1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

[/autoit]

descent

Vielen Dank, dass ist eig. genau das, wonach ich gesucht habe. Weißt du ob man nun, unabhängig von der Länge Tabelle, da diese ja bei anderen variieren kann, die komplette einlesen kann, damit man diese später beispielsweise wieder über ein Label auf einem Gui ausgeben kann?
Das mit dem Ausgeben müsste ich hinbekommen, nur das Einlesen bereitet mir noch immer Schwierigkeiten..

descent

Hallo,
versuche seit geraumer Zeit den Inhalt einer Tabelle auf einer Homepage auszulesen. Leider habe ich keine Ahnung wie ich dabei vorgehen soll und alle Versuche die ich bisher getätigt habe, sind gescheitert. Habe es zuletzt über die FF.au3 versucht. Wollte den Quelltext einlesen und dann aus diesem den für mich relevanten Teil herausfiltern. Nur weiß ich nicht wie ich dazu vorgehen soll. Das auslesen des Quelltextes ging Problemlos.

Bsp.:

Wenn ich von dieser Seite nur die erste Zelle ausgeben möchte, wie gehe ich da vor?
Wäre nett wenn mir dies jemand erklären könnte.

Spoiler anzeigen

[autoit]

#Include <FF.au3>

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

_FFStart("http://german.documentation.ff-au3.thorsten-willert.de/")
_FFLoadWait()

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

$sHTML = _FFReadHTML()

MsgBox(64,"Sourcecode",StringLeft($sHTML,1000))

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

while 1
wend

[/autoit]

descent

Danke für deine Hilfe
Leider funktioniert dies auch nicht korrekt.
Wenn ich 2 Lieder in die Playlist einordne, eines Starte und dann auf das 2te umschalte, kann ich egal welches Lied ich auswähle nur noch dieses anhören.

descent

Das mit dem Dateiname klappt nun. Habe nur jetzt das Problem das ich nichts mehr abspielen kann :pinch:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Include <GuiListView.au3>
#include <SliderConstants.au3>

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

Opt("GUIOnEventMode", 1)

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

$Form1 = GUICreate("Form1", 306, 133, 260, 280, $WS_POPUP)
GUISetBkColor(0xE0FFFF)
$Play = GUICtrlCreateLabel("4", 200, 36, 53, 45)
GUICtrlSetFont(-1, 36, 800, 0, "Webdings")
GUICtrlSetColor(-1, 0xFF0F00)
GUICtrlSetOnEvent(-1, "PlayClick")
GUICtrlSetTip(-1, "Play")
$For = GUICtrlCreateLabel("8", 243, 44, 31, 34)
GUICtrlSetFont(-1, 20, 400, 0, "Webdings")
GUICtrlSetColor(-1, 0xFF0FF0)
GUICtrlSetOnEvent(-1, "ForClick")
GUICtrlSetTip(-1, "Nächter Titel")
$back = GUICtrlCreateLabel("7", 180, 44, 31, 34)
GUICtrlSetFont(-1, 20, 400, 0, "Webdings")
GUICtrlSetColor(-1, 0xFF0FF0)
GUICtrlSetOnEvent(-1, "backClick")
GUICtrlSetTip(-1, "Vorheriger Titel")
$open = GUICtrlCreateLabel("1", 215, 86, 27, 21)
GUICtrlSetFont(-1, 12, 800, 0, "Wingdings")
GUICtrlSetColor(-1, 0xFF0FF0)
GUICtrlSetOnEvent(-1, "openClick")
GUICtrlSetTip(-1, "Öffnen")
$slider = GUICtrlCreateSlider(16, 112, 137, 19, $TBS_BOTTOM)
GUICtrlSetColor(-1, 0xFF0FF0)
GUICtrlSetData($slider, 100)
GUICtrlSetLimit($slider , 100, 0)
$List1 = GUICtrlCreateListView("Titel|Pfad", 16, 16, 137, 97)
GUISetState(@SW_SHOW)
WinSetTrans("Form1", "", 480)

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

While 1
SoundSetWaveVolume(GUICtrlRead($slider))
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

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

Func openClick()
$laden = FileOpenDialog("Öffnen", @DesktopDir, "(*.mp3)")
$Song1=stringsplit($laden,"\")
$Song=StringSplit($Song1[$Song1[0]],".")
guictrlcreatelistviewitem($Song[1]&"|"&$laden,$List1)
EndFunc

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

Func playclick()
$laden = _GUICtrlListView_GetItemTextString($List1)
SoundPlay($laden)
EndFunc

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

Func ForClick()
EndFunc

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

Func backClick()
EndFunc

[/autoit]

Beiträge von descent

_FFXPath

_FFXPath

_FFXPath

_FFXPath

Array

Array

Array

Script mit ESC beenden

Automatisiertes bearbeiten von Einträge in Google Kalender

Script mit ESC beenden

Firefox

Firefox

2D Spiel

2D Spiel

Firefox Daten einlesen

Firefox Daten einlesen

Firefox Daten einlesen

Firefox Daten einlesen

Musikplayer

Musikplayer