Beiträge von TheLuBu

Kannst du dann mit

For $i = 0 To Ubound($avArray) - 1
If StringinStr($avArray[$i], "Hunde") Then
Msgbox (0, "", "Quelltext Hunde gefunden")
ElseIf StringinStr($avArray[$i], "Katzen") Then
Msgbox (0, "", "Quelltext Katzen gefunden")

Alternativ kannst du auch in der Quelltextdatei, wo alles zusammen gelegt ist,
Das hier eintragen

(MeinTRENNZEICHEN)
Katzen
(MeinTRENNZEICHEN)
[Quelltext Katzen]
(MeinTRENNZEICHEN)
Hunde
(MeinTRENNZEICHEN)
[Quelltext Hunde]

Wenn du das dann mit

Stringsplit()

trennst, kannst du
Wieder in ner Schleife durchgehen

For $i = 0 To Ubound($avArray) - 1
If $avArray[$i] = "Hunde" Then
Msgbox (0, "", "Quelltext Hunde gefunden in Arrayplatz "& $i + 1)
ElseIf $avArray[$i] = "Katzen" Then
Msgbox (0, "", "Quelltext Katzen gefunden in Arrayplatz "& $i + 1)

Du könntest natürlich alle Quellcodes in eine Datei werfen und dann zwischen jedem Quellcode ein eindeutiges Trennzeichen setzen, also z.B.

Quelltext1 bla blabla
TheLuBuAutoit2011
Quelltext2 bla bla bla bla
TheLuBuAutoit2011
Quelltext3 bla bla bla bla
TheLuBuAutoit2011
....

Diese Datei dann einfach später einlesen und mit

Stringsplit($Dateiinhalt, "TheLuBuAutoit2011", 1)

in ein Array einlesen.

Dabei ist wichtig, das der Text ( TheLuBuAutoit2011) nicht im Quelltext vorkommt und du bei Stringsplit hinten den parameter = 1 setzt, um den gesamten String als Trennzeichen zu nutzen

Hallo Ilse
ich würde dir wiedermal Arrays empfehlen
1 oder mehrdimensional, wie du es halt möchtest, da isses am einfachsten die wieder rauszulesen.

Du musst die Reihenfolge beachten
Das

InetGetInfo()

ist nicht in der Schleife, und einige Variablen sind nur deklariert, aber ohne Werte, bevor du sie benutzt.

Als Beispiel, du declarierst oben bereits

Local $aData = InetGetInfo($File)

aber es ist noch gar kein $File mit dem Handle von InetGet() vorhanden.

Nochmal vielleicht etwas verständlicher

If $line <> "" or $line <> "#" Then

Wenn Deine Variable nicht leer ist, führst du die folgenden Befehele aus
Wenn in deiner Varibale die Raute ("#") steht, ist die Variable auch nicht leer, also wird der Code ausgeführt
Wenn deine Variable leer ist, ist sie nicht gleich der Raute ("#"), also wird der Code auch weiter ausgeführt

Scite4Autoit, kannste dir direkt hier runterladen

schau dir mal
Eigenes Tab-Register (OwnTab-UDF)
an

Schau dir mal die Hilfe zu

InetGetInfo()

an, die parameter 0 und 2 sollten dir helfen.

Das ganze in ner Schelife

Die Downloadspeed funktion habe ich ausm englischen Forum
http://www.autoitscript.com/forum/topic/63…download-speed/

Zu deiner While Schleife

Setz mal

While 1

oben hin
und in Zeile 106

;Erneutes Einlesen der nächsten Zeile
$zeile = FileReadLine($cfg)
If @error = - 1 Then Exitloop
$line = Stringleft($zeile,1)

$Zeile wird nie - 1 es sei denn, in der Zeile steht - 1. Es wird nur ein Error gesetzt, der - 1 ist, wenn das Dateieende erreicht ist

Er kann die Word Datei nicht öffnen
Füg mal bitte

ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : @ScriptDir & "\AutoIt\Test\Word"&"\Daten.doc" = ' & @ScriptDir & "\AutoIt\Test\Word"&"\Daten.doc" & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console

vor die Zeile

$oDoc = $oWord.Documents.Open(@ScriptDir & "\AutoIt\Test\Word"&"\Daten.doc")

ich glaube das der Pfad nicht richtig ist

P.S: Bitte benutzt

[Autoit][/autoit]

um deinen Code zu formatieren, ist übersichtlicher

was für eine Fehlermeldung bekommst du denn?

HAst du es denn ausch schon ohne die Klassen versucht?
Also mit

$kasperskytitle = WinGetHandle("Kaspersky Internet Security 2011")
WinSetState ($kasperskytitle,"",@SW_HIDE )
Sleep(3000)
WinSetState ($kasperskytitle,"",@SW_SHOW )

-EDIT-
Ansonsten hast du

AutoItSetOption("WinTitleMatchMode", 4)

am Anfang deines Scripts eingefügt? Ohne das dürfte die Fensterekennung mit Classennamen nicht funktionieren (zumindest laut Hilfedatei)

-EDIT2 -
Achja, der Titlename ist nicht AVP.Kaspersky... , sondern nur Kaspersky..., zumindest laut dem AutoIt Info Tool Auszug

$kasperskytitle = WinGetHandle("[TITLE:Kaspersky Internet Security 2011; CLASS:AVP.MainWindow]")
WinSetState ($kasperskytitle,"",@SW_HIDE )
Sleep(3000)
WinSetState ($kasperskytitle,"",@SW_SHOW )

Probiers mal bitte mit dem Code
Verschwindet das Fenster für 3 Sekunden und erscheint dann wieder?

klar, kannste natürlich direkt oben in deinen Globalen Variablen = 0 setzen

Du kannst am Anfang

$start = FileGetTime($hFile, 0, 1)

aufrufen und beim Beenden überprüfen, ob die Datei immernoch den selben Timestamp hat oder nicht

If $start = FileGetTime($hFile, 0, 1) Then MsgBox(16, "Speichern?", "Es wurde noch nicht gespeichert")

Setz in Zeile 48

$iPercent = Round($aInfo[0] / $iSize * 100,2)

mal klammern

$iPercent = Round(($aInfo[0] / $iSize) * 100,2)

und $iSize ist beim ersten Aufruf = "" und nicht gleich 0, kann auch daran liegen

schau nochmal in meinen vorherigen Post, habe das (dank BugFix ) verbessert

Willst du den Text zwischen "ilse" und "" rausfinden (_Stringbetween) oder nur wissen, ob und wenn ja, an welcher stelle "Ilse" steht?
Wenn du das Wort Ilse in dem Text suchen willst solltest du es so machen

-EDIT- BugFix war schneller
-EDIT2- Das kommt davon, wenn man mit Kopfschmerzen vorm PC sitzt ;), jetzt sollte es stimmen

For $i = 1 To UBound($aZielRead,1)-1
$search = StringinStr($aZielRead[$i],"ilse", 1) ;String wird gesucht
If $search <> 0 Then
$Search += StringLen("Ilse")
_GUICtrlEdit_InsertText($Ziel, @CRLF& "Text", $search) ; fügt den Text hinter dem gefundenen ein
Else
EndIf
next

nagut, dann probiers mal hiermit

While Not WinActive("Message from webpage")
Sleep(100)
WEnd
; hier dann der klick

Die ID des Buttons solltest du ja mit dem Autoit Window Info Tool rausfinden.
Dann wartet dein Script, bis die Messagebox da is und klickt sie an

ändere mal das bei dir ab Zeile 72

For $i = 1 To UBound($aZielRead,1)-1
$search = _StringBetween($aZielRead[$i],"ilse","") ;String wird gesucht
If IsArray($Search) Then
$pos = Stringinstr($aZielRead[$i], $search[0]) ; sucht die position des strings im Text
$pos += Stringlen($search[0]) ; addiert die Stringlänge zur gefundenen postion hinzu
;_GUICtrlEdit_InsertText($Ziel, "Text" @CRLF, $pos) ; fügt den Text hinter dem gefundenen ein
;_ArrayDisplay($search)
_GUICtrlEdit_InsertText($Ziel, "Text", $pos) ; fügt den Text hinter dem gefundenen ein
Else
endif
next