Sorry, meinte natürlcih nicht ID sondern Index. Rechtsklick -> Web Developer -> Formulare -> Formularinformationen anzeigen
dann bekommst du sowas hier raus
Beiträge von SEuBo
-
-
hast du dir die Seite dann mal per Firefox und Web Developer Toolbar angeguckt? Dann seihst du nämlich direkt die ID's der Formularfelder
-
Mal rein aus interesse - wozu zum Henker soll das _IELoadWait() ?
ZitatPausiert das Skript bis eine Seite im Browser fertig geladen wurde.
Bist du sicher dass er dein Script nicht einfach deswegen pausiert ?Ansonsten ist auch Firefox mit der Web-Developer toolbar nützlich. Damit kannst du dir leicht Formularinformationen anzeigen lassen.
-
-
-
ohne programm kein timer.
Würde es nicht funktionieren einen von TimerInit() erzeugten Timestamp in einer .ini Datei zu speichern?
-
guictrlsetimage() ...danach hatte ich gesucht
Tja für dich als Neuling in AutoIt kann ich die Hilfe nur empfehlen - da steht alles drin was du suchst
-
Ich glaub ich muss mir das mit den GUI's mal lange anschauen
Tools -> Koda Form Designer
Damit findet man sich gut rein.Allerding empfehler ich GUI's von Hand zu erstellen - so bekommt man besser ein gefühl dafür.
-
Hier das bilderwechseln mal wesentlich gekürzt.
[autoit]Global $i = 0, $Pic[2] = ["C:\Für Sarah\Bilder\Klassenbild.jpg","C:\Für Sarah\Bilder\Tulpen.jpg"]
[/autoit][autoit][/autoit][autoit]GUICreate("Test",420,600)
[/autoit][autoit][/autoit][autoit]
$n = GUICtrlCreatePic("",10,150,400,300)
GUISetState()AdlibEnable("_ChPic",5000)
[/autoit][autoit][/autoit][autoit]Func _ChPic()
[/autoit][autoit][/autoit][autoit]
GUICtrlSetImage($n,$Pic[$i])
$i += 1
If $i = UBound($Pic) Then $i = 0
EndFuncDo
[/autoit]
$msg = GUIGetMsg()
Sleep(666)
Until $msg = -3
AdlibDisable()Bzw, wenn du die Beta benutzt musst du statt AdlibEnable() und -Disable(), AdlibRegister() und -UnRegister() verwenden
-
Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <String.au3>#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Enigma = GUICreate("Enigma", 442, 413, 344, 193)
$head = GUICtrlCreateLabel("Enigma", 161, 20, 119, 41)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$title_eingabe = GUICtrlCreateLabel("Eingabe:", 32, 70)
$eingabe = GUICtrlCreateInput("", 32, 88, 385, 89)
GUICtrlSetData(-1, "")
$title_ausgabe = GUICtrlCreateLabel("Ausgabe:", 32, 206)
$ausgabe = GUICtrlCreateEdit("", 32, 224, 385, 89)
GUICtrlSetData(-1, "")
$information1 = GUICtrlCreateLabel("Text to Hex -> codieren", 32, 318)
$information2 = GUICtrlCreateLabel("Hex to Text -> decodieren", 32, 333)
$code = GUICtrlCreateButton("codieren", 36, 356, 121, 25, $WS_GROUP)
$copyright = GUICtrlCreateLabel("Scripted by UWC | Schrubber @ 2009", 8, 392, 184, 17)
$decode = GUICtrlCreateButton("decodieren", 165, 356, 121, 25, $WS_GROUP)
$quit = GUICtrlCreateButton("Quit", 295, 356, 121, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###$byte = 1
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $code
GUICtrlSetData($ausgabe, '')
Dim $arstring = StringSplit(GUICtrlRead($eingabe), ''), $str = ''
For $i = 1 To UBound($arstring) -1
$str &= StringUpper(Hex(Asc($arstring[$i]), 2)) & ' '
Next
GUICtrlSetData($ausgabe, $str)Case $decode
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetData($ausgabe, '')
Dim $chstring = StringSplit(GUICtrlRead($eingabe), ''), $str2 = ''
For $ii = 1 To $chstring[0] Step 3
$hex = $chstring[$ii] & $chstring[$ii+1]
$str2 &= Chr(Dec($hex))
Next
GUICtrlSetData($ausgabe, $str2)Case $quit
[/autoit]
Exit
EndSwitch
WEnd -
Dann lass Else doch einfach weg
oder steh ich jetzt wieder aufm Schlauch und hab was übersehen? -
Das ist die Return Value, die hat nichts mit @error zu tun.
So siehts zb bei StringInStr aus:
ZitatReturn Value
Success: Returns the position of the substring.
Failure: Returns 0 if substring not found.
@Error 0 - Normal operation
1 - Invalid "start" or "occurance" parameter given.Eine funktion kann zb bei einem Fehlschlag 0 zurückgeben, und über @error näher bestimmen, um welchem fehler es sich handelt.
[autoit]
[/autoit]
Func _Function()
;Return: 0 = Fehler! / 1 = Kein Fehler
;@Error = 0 (Kein Fehler). @Error = 1 (Kein Admin). @Error = 2 (Username nicht "Admin")
If @UserName = "Admin" Then
If IsAdmin() Then
SetError(0) ; Kein Fehler!
Return 1 ; Kein Fehler
Else
SetError(1);Kein Admin
Return 0 ; Gebe 0 zurück (Fehler)
EndIf
Else
SetError(2); Username ist nicht Admin
Return 0 ; Gebe 0 zurück (Fehler)
EndIf
EndFunc -
Gibt WinGetText() was brauchbares aus?
Dann kannst du nämlich mit dem hier arbeiten.
[autoit][/autoit][autoit][/autoit][autoit]While WinExists("Computernamen ändern")
[/autoit][autoit][/autoit][autoit][/autoit]
If StringInStr(WinGetText("Computernamen ändern"), "Willkommen in der") Then
....
ElseIf StringInStr(WinGetText("Computernamen ändern"), "Zugriff verweigert") Then
....
Else
....
EndIf
WEnd -
Zwischen den beiden Posts waren 2 Minuten vergangen. Wenn ich mal davon ausgehe, dass du noch ca. 30 sekunden zum aufschlagen der Hilfe, sowie zitieren deines alten posts und einfügen des Code Schnipsels gebraucht hast, dann frage ich mich :
Warum hast du dir nicht 1:30 min mehr Zeit genommen, um zu suchen, BEVOR du das gepostet hast? -
[autoit]
_GUICtrlListView_DeleteAllItems()
[/autoit] -
If @error = 0 heißt ja auch so viel wie "Falls kein Fehler aufgetreten ist"
Muss dann schon so lauten:
[autoit]
[/autoit]
$Text = GUICtrlRead($Input)
If $Text = 0 Then@EDIT: Korrigiert. Danke Andy für den Tip
-
Zitat[autoit]
[/autoit]
---
$Combo1 = GUICtrlCreateCombo($artikel[0], 32, 64, 329, 25)
$Combo1 = GUICtrlSetData(-1, $liste, $artikel[0])
---Jaja.. Ein Teufelskreis. Da GUICtrlSetData erfolgreich war, ist $Combo1 bei dir im Script immer "1".
Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>$x=1
[/autoit] [autoit][/autoit] [autoit]
DIM $artikel[100]
DIM $bestandalt[100]
DIM $liste
_lesen()
_fuellen()
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 168, 192, 124)
$Combo1 = GUICtrlCreateCombo($artikel[0], 32, 64, 329, 25)
GUICtrlSetData(-1, $liste, $artikel[0])
$aktuell = GUICtrlCreateInput("aktuell", 384, 64, 49, 21)
$neu = GUICtrlCreateInput("neu", 464, 64, 49, 21)
$OK = GUICtrlCreateButton("Übernehmen", 536, 64, 81, 25, $WS_GROUP)
$Exit = GUICtrlCreateButton("Beenden", 272, 112, 113, 33, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("TonerTyp auswählen:", 32, 40, 153, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("aktuell", 392, 40, 35, 17)
$Label3 = GUICtrlCreateLabel("neu", 472, 40, 22, 17)
$Label4 = GUICtrlCreateLabel("Tonerbestand", 400, 16, 101, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitCase $Exit
[/autoit] [autoit][/autoit] [autoit]
ExitCase $Combo1
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetData ( $aktuell, _anzeigen())
EndSwitch
WEndFunc _lesen()
[/autoit] [autoit][/autoit] [autoit]While $x <= 99
[/autoit] [autoit][/autoit] [autoit]$artikel[$x] = IniRead ("\\printserver\c$\NSClient++\nrpe\Tonerstandplugin.ini", "TonerTyp"&$x, "Tonerartikel", "0")
[/autoit] [autoit][/autoit] [autoit]
$bestandalt[$x] = IniRead ("\\printserver\c$\NSClient++\nrpe\Tonerstandplugin.ini", "TonerTyp"&$x, "Tonerbestand", "0")
$x += 1
WEnd
EndFunc
Func _fuellen()
$x = 1
$liste = $artikel[$x]
$x = 2While $x <= 99
[/autoit] [autoit][/autoit] [autoit]$liste = $liste &"|"& $artikel[$x]
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$x += 1
WEnd
EndFunc
Func _anzeigen()
$auswahl = GUICtrlRead ($Combo1)
$i = 0
$x = 1While $i = 0
[/autoit] [autoit][/autoit] [autoit]If $auswahl = $artikel[$x] Then $i = 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$x += 1WEnd
[/autoit] [autoit][/autoit] [autoit]$toneraktuell = $bestandalt[$x]
[/autoit]
Return $toneraktuell
EndFunc$x = $x + 1 geht viel cooler mit $x += 1
Mal davon abgesehen, dass dur dir mit einer For $x = 0 to 100 Schleife statt dem While, die Zeile eh ganz weglassen kannst. -
Sorry, aber in der hab ich schon vergeblich gesucht. Ein Stichwort wäre hilfreich
[autoit]
/EDIT: Achso ganz logisch: Er rückt die Liste ja auf, d.h. er will irgendwann den Wert löschen, der ganz oben ist, der ist inzwischen aber schon nach unten gewandertFor $e = 0 to $i
[/autoit]
MsgBox(0, "$e&$i", $e &" "&$i)
_GUICtrlListView_DeleteItem($liste, $e)
NextExakt. Und genau deshalb musst du von hinten löschen
[autoit]For $e = $i to 0 step -1
[/autoit]
MsgBox(0, "$e&$i", $e &" "&$i)
_GUICtrlListView_DeleteItem($liste, $e)
Next -
@ Schnitzel:
Dealstreet.deDie Buttons sind eigentlich nur Links, welche aber über JS / AJAX verabeitet werden. Die Funktion um ein Gebot auszuführen ist glaube ich hier drin:
https://static.dealstreet.de/s/js/custom/au…andler-1.0.1.jsallerdings kenn ich mir mit JS zu wenig aus um da was brauchbares raus zu bekommen. hab schon alles mit IENavigate versucht...
"auctionhandler.setbid()", "auctionhandler.setbid(this)","auctionhandler.setbid.click([auktionsnummer]) und so weiter und so fort.. aber es klappt einfach nichts. Wenn sich wer mit JS/Ajax kenntnissen mal da durchkämpfen wil nur zu.. -
Was zur Hölle ist eine Track history?!
Website einbinden geht mit
[autoit]_IECreateEmbedded
[/autoit]