Guten Morgen Chip,
merci für deinen Beitrag.
Ja, aber da muß ich dich wie du geschrieben hast korrigieren.
Kennst du Web-Developer?
Also die Seite wird geladen (ist leer also ohne eigene Daten)
Mit Web-Developer siehst du dann die umfangreiche Tabelle.
Hier muß ich mir alles immer von Hand zusammenstellen.
Ich dachte vielleicht irgendwie so:
1. Formular wird geladen
2. Msgbox Die FormularID ist form-login
Ich klicke auf das Suchfeld und die Meldung kommt "searchword"...
Hallo,
ich stehe vor dem großen Problem
von mehreren Seiten Formularinfos auslesen zu müssen.
Z.Zt. mache ich das alles von Hand, was sehr mühsam ist.
Kann man das irgendwie automatisieren?
Eine Beispielseite
https://autoit.de/www.hundewelt.com
Diese Seite hat 3 Felder.
1. Suche
2. Benutzername
3. Passwort
4. FormularID
Das wären z.B. die Daten der Seite
$Suche = searchword
$Benutzername=username
$Passwort=passwd
$FormularID=form-login
Würde mich riesig freuen wenn es hierfür eine Lösung gibt.
Viele Grüße
Ilse
Hallo Tweaky,
super..., endlich komm ich dank deiner Hilfe etwas weiter.
Vielen Dank
Ilse 
Hallo Tweaky,
merci für deine Hilfe.
Kannst du bitte noch einmal drübersehen?
Ich habe noch 2 Felder als eine Art Zwischenspeicher eingebaut!
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\mcc\desktop\autoit-programmierung\inianzeiger.kxf
$Form1_1 = GUICreate("Form1", 410, 158, 306, 277)
$btnIniWahl = GUICtrlCreateButton("Ini öffnen", 8, 24, 75, 25, $WS_GROUP)
$btnstart = GUICtrlCreateButton("<<", 88, 24, 75, 25, $WS_GROUP)
$btnEnde = GUICtrlCreateButton(">>", 304, 24, 75, 25, $WS_GROUP)
$btnzurueck = GUICtrlCreateButton("<", 160, 24, 75, 25, $WS_GROUP)
$btnvor = GUICtrlCreateButton(">", 232, 24, 75, 25, $WS_GROUP)
$btnEntfernen = GUICtrlCreateButton("Diesen Eintrag entfernen", 232, 104, 147, 25, $WS_GROUP)
$Nr = GUICtrlCreateInput("", 48, 72, 33, 21)
$Eintrag = GUICtrlCreateInput("", 88, 72, 289, 21)
$Label1 = GUICtrlCreateLabel("Nr", 24, 72, 15, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$i = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btniniWahl
$openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
If @error Then
MsgBox(4096, "", "No File(s) chosen")
Else
$openini = StringReplace($openini, "|", @CRLF)
EndIf
Case $btnstart
Case $btnEnde
Case $btnzurueck
$i -= 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096, "Info", $Starte)
Case $btnvor
$i += 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096, "Info", $Starte)
$MeineSuche = IniRead($openini, "Startseite", "key", "NotFound")
Msgbox(4096,"test",$MeineSuche)
GUICtrlSetData($Nr,$MeineSuche)
;$ID = GUICtrlSetData(
Case $btnEntfernen
IniDelete($openini, "Startseite", $Nr)
EndSwitch
WEnd
Z.B. wenn ich vor oder Zurück klicke, dann soll die jeweilige Nr und der dazugehörige Wert
in das Feld eingetragen werden.
Wenn ich dann auf entferne Klicke soll der Ini-Eintrag gelöscht werden.
Ich krieg das einfach nicht hin...
Wäre toll wenn du mir weiterhelfen könntest.
Liebe Grüße
Ilse
Hallo,
weiß jemand wie man eine ini durchblättern kann?
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\mcc\desktop\autoit-programmierung\inianzeiger.kxf
$Form1_1 = GUICreate("Form1", 403, 67, 306, 277)
$btniniWahl = GUICtrlCreateButton("Ini öffnen", 8, 24, 75, 25, $WS_GROUP)
$btnstart = GUICtrlCreateButton("<<", 88, 24, 75, 25, $WS_GROUP)
$btnEnde = GUICtrlCreateButton(">>", 304, 24, 75, 25, $WS_GROUP)
$btnzurueck = GUICtrlCreateButton("<", 160, 24, 75, 25, $WS_GROUP)
$btnvor = GUICtrlCreateButton(">", 232, 24, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btniniWahl
$openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
If @error Then
MsgBox(4096, "", "No File(s) chosen")
Else
$openini = StringReplace($openini, "|", @CRLF)
EndIf
Case $btnstart
Case $btnEnde
Case $btnzurueck
Case $btnvor
Global $i = 1
While 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096,"Info",$Starte)
$i = $i +1
ExitLoop
WEnd
EndSwitch
WEnd
Hier habe ich irgendwo ein Fehler!
Ich möchte es so haben, daß ich jedesmal klicken muß
um einen INI-Eintrag z.B. nach vorne zu blättern.
Meine Ini:
[autoit]
[Startseite]
1=Inhalt1
2=Inhalt2
3=Inhalt4
Viele Grüße
Ilse 
ich konnte mich erst heute wieder melden!
Also hier mal das Script:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <FF.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 447, 102, 192, 124)
$btnStart = GUICtrlCreateButton("Start", 40, 32, 187, 49)
$btnentfernen = GUICtrlCreateButton("entfernen", 232, 32, 187, 49)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
WinSetOnTop($Form1, "", 1)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btnStart
$openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
If @error Then
MsgBox(4096, "", "No File(s) chosen")
Else
$openini = StringReplace($openini, "|", @CRLF)
EndIf
For $i = 1 To 3
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
If _FFConnect() Then
_FFOpenURL($Starte)
_FFLoadWait()
EndIf
Next
Case $btnentfernen
IniDelete($openini, "Startseite", $i) ; das geht leider nicht!
EndSwitch
WEnd
Hier mal die Ini:
[Startseite]
1=http://www.hunde.de
2=http://www.hundewelt.de
3=http://www.hunde.com
Kurze Info:
1. Ich starte Firefox
2. Dann starte ich das Script
3. Ich klicke auf Start und wähle meine ini
Dann werden die Seiten gestartet:
Seite 1
Seite 2...
So und nun nochmal das Problem:
Wenn z.B. die Seite 2 also ini [Startseite] ID 2
erscheint und ich auf den Button entferne Klicke,
dann soll genau dieser Eintrag aus der ini raus.
Hoffe ich habe es diesmal etwas besser erklärt...
Liebe Grüße
Ilse
Sorry, konnte mich jetzt erst wieder melden.
Jaaa, genau so!
Ein herzliches Dankeschön
Liebe Grüße
Ilse
geht leider immer noch nicht
Fehler in dieser Zeile
$Progress1 = GUICtrlCreateProgress(0, 0, 817, 81, $PBS_SMOOTH)
WARNING: $PBS_SMOOTH: possibly used before declaration
Fehlt da noch ein #include?
Hab alles angepasst,
geht aber leider nicht
$gui1 = GUICreate("Fenster") ; muß ich hier was ändern?
GUISetState(@SW_SHOW, $gui1)
$Progress1 = GUICtrlCreateProgress(0, 0, 817, 81, BitOR($PBS_SMOOTH,$WS_POPUPWINDOW))
GUISetState(@SW_SHOW)
GUICtrlSetData ($Progress1,$i)
Hallo Raupi,
bin gerade etwas weiter gekommen. Klappt soweit, sieht aber nicht gut aus!
[autoit][/autoit][autoit][/autoit][autoit]$gui1 = GUICreate("Fenster1")
GUISetState(@SW_SHOW, $gui1)
$Progress1 = GUICtrlCreateProgress(64, 48, 817, 81)
GUISetState(@SW_SHOW)
GUICtrlSetData ($Progress1,$i)
Weißt du wie man nur die reine Progressbar darstellen kann!
Ich meine OHNE FENSTER?
So daß auf dem Bildschirm nur der Balken zu sehen ist?
Ohne Titelleiste, minimieren, schliessen...
Grüße
Ilse
Ich kriegs mal wieder nicht hin...
Also,
es gibt eine Gui Nr. 1 mit einem Loop
For $i=1 to $anzahl
...
...
wend
nun möchte ich eine 2. Gui anzeigen
die nur eine Progressbar in der Mitte des Bildschirms zeigt
$Progress1 = GUICtrlCreateProgress(64, 48, 817, 81)
GUISetState(@SW_SHOW)
GUICtrlSetData ($Progress1,$i)
wie kann man das machen?
Habe schon alles mögliche probiert!
Viele Grüße
Ilse
Ich habe ein Problem mit einem Button.
Es ist etwas schwierig zu erklären.
Also, in diesem Loop werden Seiten geladen.
Das klappt auch prima. Meine Gui hat einen Button entfernen.
Wenn ich nun darauf klicke, dann soll der aktuelle Zähler
entfernt werden.
$openini = @ScriptDir & "\" & GUICtrlRead ($txtKatalogname)
$anzahl = GUICtrlRead($txtanzahl)
For $i=1 to $anzahl
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
If _FFConnect() Then
_FFOpenURL($Starte)
_FFLoadWait()
EndIf
Next
Case $btnentfernen ; Hier existiert ein Button in der Gui zum entfernen
IniDelete($openini, "Startseite", $i)
Das Problem ist, wie kann ich den Button innerhalb
des Loops aufrufen? Daß wenn geklickt wird
der aktuelle Zähler erkannt wird und der richtige Eintrag entfernt wird?
Die Ini sieht so aus:
[autoit]
[Startseite]
1=www.hunde.de
2=www.hundewelt.de ; z.B. wenn diese Seite kommt dann soll mit dem Button gelöscht werden.
3=www.hunde.com
huhh....
Hoffe Ihr wißt was ich meine
Liebe Grüße
Ilse
DANKE für die tollen Beispiele!
$Eintrag1= "79" ; also F9
_ispressed CodeTabelle für alle die
den gleichen Fehler machen.
Da habe ich irgendwie etwas falsch gedacht.
$Eintrag1= "1" upps das war die linke Maustase...und nicht die Taste 1
Grüße
Ilse
vielleicht erkläre ich es mal anders:
Der Text wird im Browser markiert!
$Eintrag1= "31" ; das war ein Fehler 1 ist die linke Maustaste!
$Eintrag2= "32"
31 = lt. Hilfe 1 key
32 = lt. Hilfe 2 key
So, wenn das Script gestartet wurde passiert erst mal nichts!
Dann markiere ich mit der Maus meinen gewünschten Text im Browser!
Jetzt drücke ich die Taste 1 (31 = lt. Hilfe 1 key)
also
If _IsPressed ($Eintrag1) then
Send("^c") ; der Text ist ja markiert
$text = ClipGet()
MsgBox(4096,"test",$text)
....
was mache ich hier verkehrt?
Guten Morgen Schnitzel,
hast Recht, die Maustasten werd ich nicht benutzen.
Deshalb wollte ich ja normale Tasten nutzen!
Ich makriere von Hand und drücke die Taste
Ziffer 1
Ziffer 2
ESC
So wie ich das probiert habe klappt es aber nicht!
Keine Ahnung warum dieser Code nicht geht:
#Include <Misc.au3>
$Eintrag1= "1"
$Eintrag2= "2"
Do
If _IsPressed ($Eintrag1) then
Send("^c")
$text = ClipGet()
MsgBox(4096,"test",$text)
;IniWrite($openini,"Rasse",$i,$text)
EndIf
If _IsPressed ($Eintrag2) then
Send("^c")
$text = ClipGet()
;IniWrite($openini,"Alter",$i,$text)
EndIf
Until _IsPressed("{esc}")
Ist das der falsche Befehl hierfür?
Hallo und guten Morgen zusammen,
ich möchte gerne einen Text der markiert ist
mit einer Taste bearbeiten.
Geht mal wieder nicht...
#Include <Misc.au3>
$Eintrag1= "1"
$Eintrag2= "2"
Do
If _IsPressed ($Eintrag1) then
Send("^c")
$text = ClipGet()
MsgBox(4096,"test",$text)
;IniWrite($openini,"Rasse",$i,$text)
EndIf
If _IsPressed ($Eintrag2) then
Send("^c")
$text = ClipGet()
;IniWrite($openini,"Alter",$i,$text)
EndIf
Until _IsPressed("{esc}")
Also, wenn ich die Taste 1 Drücke
dann soll mein markierter Text in die INI!
Drücke ich die Taste 2 dann soll der 2. Text in die INI
Drücke ich ESC dann bin ich fertig!
Viele Grüße
Ilse
Hallo,
super es hat endlich geklappt!
Dank Euch
Ilse
Hallo,
sollte wirklich simpel sein, aber wie kann ich eine Msgbox automatisch beeinflussen?
Habe heute keine Nerven...
$Meldung = MsgBox(4,"Weiter","Automatisch zu Meldung 6",5)
If $Meldung = 6 then
MsgBox(4096,"Ja","Weiter",2)
EndIf
If $Meldung = 7 then
MsgBox(4096,"Nein...","Weiter...",2)
Er soll immer automatisch zur Meldung 6
erst wenn man auf nein klickt, dann zu Meldung 7
Ich möchte auf einer Seite
einen Text markieren und wenn ich die Taste loslasse
dann soll der markierte Text in meine Ini
Ich habe schon mit Hotkeys probiert,
aber das ist etwas umständlich.
Das mit dem markieren geht schneller
oder gibt es da eine bessere Lösung.
Ich wollte es so lösen:
Ich markiere immer 2 Wörter
1. Wort Collie soll in die INI
2. Wort 2 Jahre soll in die ini
1. Wort Schäferhund soll in die INI
2. Wort 3 Jahre soll in die ini
Eine Frage noch:
Wenn ich mit der Maus etwas markiere
und dann die Maus loslasse...
dann soll etwas passieren.
Also so:
Ich markiere ein Wort mit der linken Maustaste
Wenn ich nun die linke Taste loslasse, startet das Script
Geht das?
