mehrere html datein im selben firefoxfenster öffnen

RedHead

hi leute...

ich sitze zur zeit an meiner facharbeit. Da ich für den späteren quellennachweis, die verwendeten seiten runterladen musste, habe ich nun ein menge html datein auf meinen laptop. wenn ich nun jedes mal weiter an meiner facharbeit arbeiten möchte muss ich allerdings alle datein per hand öffnen...das ist ein bisschen mühselig und da dachte ich mir das ich das auch mit autoit einfacher machen kann allerdings werde die html datein nicht alle im selben ff-fenster geöffnet, sonder jede datei im eigenen fenster am ende habe ich nun unzählige ff-fenster und habe keine ordnung mehr
nun meine frage ist jetzt ob man das so machen kann das alle datein im selben ff-fenster geöffnet werden? und wenn ja, wie?? kann mir einer helfen??

mein bisheriger code:

Spoiler anzeigen

[autoit]

Global $a_found[1] = [0]

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

_FileFindAll("Z:\Chemie - Facharbeit\Facharbeit\Online", $a_found)

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

For $a = 1 To $a_found[0]
ShellExecute($a_found[$a])
Do
Sleep(100)
Until ProcessExists("firefox.exe")
Next

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

Func _FileFindAll($s_path, ByRef $a_found, $s_filetype = False, $s_filename = False)
If $s_path == "" Or Not IsArray($a_found) Then Return SetError(-1)
If StringRegExp(StringLeft($s_path, 1), "[a-zA-Z]") And StringMid($s_path, 2, 1) == ":" Then
If StringRight($s_path, 1) <> "\" Then $s_path &= "\"
Local $s_suchen, $s_weitersuchen, $i_ubound
If $s_filetype And StringLeft($s_filetype, 1) <> "*" Then $s_filetype = "*" & $s_filetype
$s_suchen = FileFindFirstFile($s_path & "*")
If $s_suchen == -1 Then Return SetError(-2)
While 1
$s_weitersuchen = FileFindNextFile($s_suchen)
If @error Then ExitLoop
If Not @extended Then
If $s_filetype And Not $s_filename Then
If StringRight($s_weitersuchen, StringLen($s_filetype) - 1) == StringTrimLeft($s_filetype, 1) Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
ElseIf $s_filename And Not $s_filetype Then
If StringLeft($s_weitersuchen, StringLen($s_filename)) == $s_filename Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
ElseIf $s_filename And $s_filetype Then

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

If (StringRight($s_weitersuchen, StringLen($s_filetype) - 1) ==
StringTrimLeft($s_filetype, 1)) And (StringLeft($s_weitersuchen,
StringLen($s_filename)) == $s_filename) Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
Else
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
EndIf
WEnd
$a_found[0] = UBound($a_found) - 1
Return $a_found
Else
Return SetError(-1)
EndIf
EndFunc

[/autoit]

BinDannMalWeg

Dafür gibt es doch die Firefox UDF...

RedHead

ja, aber die beziehen sich (soweit ich das sehe) nur auf aktion im firefox eine udf, die dafür sorgt das alle html datein im selben ordner geöffnet werde, habe ich nicht gesehen

wird die firefox - udf datei eigentlich irgendwann mal komplett in autoit integriert?? so wie die internet explorer udfs?

**chesstiger**

Ich glaube eher nicht...
Weil dazu vorher Änderungen am System (bzw. an FireFox) notwendig sind.

Aber du kannst einfach mit der FF.au3 eine FireFox-Sitzung erstellen und dann in deiner For-Schleife anstatt ShellExecute _FFTabAdd benutzen.

lg chess

**autoBert**

Zitat von RedHead

nun meine frage ist jetzt ob man das so machen kann das alle datein im selben ff-fenster geöffnet werden? und wenn ja, wie??

Alle im selben Fester zu öffnen ist mit der besagten ff.au3 möglich, du musst nur jedesmal einen neuen Tab erstellen:

Spoiler anzeigen

[autoit]

#include <FF.au3>
#include <Array.au3>
Global $a_found[2]

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

_FileFindAll("Z:\Chemie - Facharbeit\Facharbeit\Online", $a_found)
_ArrayDisplay($a_found)
If _FFConnect() Then
$bfirst = True
For $a = 1 To $a_found[0]
If StringUpper(StringLeft(StringRight($a_found[$a],5),4)) = ".HTM" Then
If $bfirst Then
_FFOpenURL("file:///" & $a_found[$a])
Else
_FFTabAdd("file:///" & $a_found[$a])
EndIf
$bfirst = False
EndIf
Next
EndIf

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

Func _FileFindAll($s_path, ByRef $a_found, $s_filetype = False, $s_filename = False)
If $s_path == "" Or Not IsArray($a_found) Then Return SetError(-1)
If StringRegExp(StringLeft($s_path, 1), "[a-zA-Z]") And StringMid($s_path, 2, 1) == ":" Then
If StringRight($s_path, 1) <> "\" Then $s_path &= "\"
Local $s_suchen, $s_weitersuchen, $i_ubound
If $s_filetype And StringLeft($s_filetype, 1) <> "*" Then $s_filetype = "*" & $s_filetype
$s_suchen = FileFindFirstFile($s_path & "*")
If $s_suchen == -1 Then Return SetError(-2)
While 1
$s_weitersuchen = FileFindNextFile($s_suchen)
If @error Then ExitLoop
If Not @extended Then
If $s_filetype And Not $s_filename Then
If StringRight($s_weitersuchen, StringLen($s_filetype) - 1) == StringTrimLeft($s_filetype, 1) Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
ElseIf $s_filename And Not $s_filetype Then
If StringLeft($s_weitersuchen, StringLen($s_filename)) == $s_filename Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
ElseIf $s_filename And $s_filetype Then
If (StringRight($s_weitersuchen, StringLen($s_filetype) - 1) == StringTrimLeft($s_filetype, 1)) And (StringLeft($s_weitersuchen, StringLen($s_filename)) == $s_filename) Then
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
Else
$i_ubound = UBound($a_found, 1)
ReDim $a_found[$i_ubound + 1]
$a_found[$i_ubound] = $s_path & $s_weitersuchen
EndIf
EndIf
WEnd
$a_found[0] = UBound($a_found) - 1
Return $a_found
Else
Return SetError(-1)
EndIf
EndFunc ;==>_FileFindAll

[/autoit]

Du benötigst dafür noch Mozrepl.

Edit: ein 1. Test verlief negativ, anscheinend ist es mit der ff.au3 nicht möglich lokale Dateie zu öffnen:

Code

_FFConnect: OS:	WIN_XP WIN32_NT 2600 Service Pack 3
_FFConnect: AutoIt:	3.3.6.1
_FFConnect: FF.au3:	0.6.0.1b-7
_FFConnect: IP:	127.0.0.1
_FFConnect: Port:	4242
_FFConnect: Delay: 	2ms
_FFConnect: Socket: 	1516
_FFConnect: Browser:	Mozilla/5.0 (Windows NT 5.1; rv:10.0.5) Gecko/20100101 Firefox/10.0.5
__FFSendJavaScripts: Sending functions to FireFox .......... done
_FFOpenURL: file:///D:\Dokumente und Einstellungen\Bert\Eigene Dateien\Downloads\CMS+Inet\Wordpress3.3\wordpress\liesmich.html
__FFSend: try{window.content.top.document.location.href='file:///D:\Dokumente und Einstellungen\Bert\Eigene Dateien\Downloads\CMS+Inet\Wordpress3.3\wordpress\liesmich.html'}catch(e){'_FFCmd_Err';};
__FFRecv: _FFCmd_Err
_FFOpenURL ==> No match: file:///D:\Dokumente und Einstellungen\Bert\Eigene Dateien\Downloads\CMS+Inet\Wordpress3.3\wordpress\liesmich.html
+>19:31:45 AutoIT3.exe ended.rc:0
+>19:31:46 AutoIt3Wrapper Finished
>Exit code: 0    Time: 27.369

Alles anzeigen

mfg autoBert