Suche mit Ausgabe in ein anderen fenster

heyhey83

[Blockierte Grafik: http://flightworld.lima-city.de/suche.jpg]
geht das in autoit umzusetzen also wenn ich in der suche XXX eingebe und klicke auf suchen dann soll im andern fenster die xxx.html datei anzeigen

**alpines**

Ja.

heyhey83

okay und wie mache ich das denn gibt es da ein kleinen code den zurzeit mache ich das über html will es aber über autoit machen

**alpines**

Erstell dir doch einfach eine GUI die überprüft ob sich der Inhalt von dem Input verändert hat und beim anderen lässt du eine Shell.Explorer.2-Obj laufen die dann aktualisiert wird wenn sich der Inhalt des Inputs verändert hat.

heyhey83

okay gerade zuviel input für mich

**Kanashius**

Möchtest du den Inhalt der xxx.html anzeigen lassen, oder alle dateien, die so (oder so ähnlich) heißen?

heyhey83

Nur die html also in den ordner sind verschide ne html die eine heist xxx die andere eee usw also gebe ich in der suche xxx ein zeigt er mir xxx.html gebe ich in der suche ein eee dann die eee.html

**Kanashius**

Also. Du kannst das so machen:
mittels FileFindFirstFile (und FileFindNextFile) alle Dateien in dem Ordner suchen und in ein Array schreiben. (Ich meine da gab es auch in einer Udf nen Befehl für ... Ah, habs: _FileListToArray)
Dann kannst du ein Input erstellen und die WM-My_Command events abfragen. Die Codes 1024 und 786 zeigen eine Änderung des Inputs an.
Beispiel:

Spoiler anzeigen

[autoit]

GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND")

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

Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
Local $nNotifyCode=BitShift($wParam, 16)
Local $hCtrl=$lParam
If $nNotifyCode = 1024 Or $nNotifyCode = 786 Then
if $hCtrl = GUICtrlGetHandle($DasInputControl) then
;datei auflisten
endif
EndIf
Return $GUI_RUNDEFMSG
EndFunc

[/autoit]

MfG Kanashius

heyhey83

Also habe das jetzt mal so gemacht nun wie ändere ich das ganze und mit dem code von Kanashius

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 1177, 850, 313, 48)
$Input1 = GUICtrlCreateInput("Input1", 824, 120, 121, 21)
$Button1 = GUICtrlCreateButton("Suchen", 952, 120, 75, 25)
$ListView1 = GUICtrlCreateListView("", 88, 80, 657, 729)
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]

**Kanashius**

Nach erstellen wird der Ordner in ein Array gelesen. Wenn im Input-Feld getippt wird, wird das Array durchsucht (Bei leerem Input werden alle Dateien angezeigt). Wenn etwas eingetippt wird, werden die Ergebnisse, die Exakt übereinstimmten oben angezeigt. Unter dem Schwarzen Balken stehen die Dateien, die den eingegebenen Text irgendwo im Namen haben.
Ich hoffe, das hilft dir Weiter.

MfG Kanashius

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <GuiListView.au3>
#include <WindowsConstants.au3>
#include <File.au3>

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 1177, 850, 313, 48)
$Input1 = GUICtrlCreateInput("", 824, 120, 121, 21)
$Button1 = GUICtrlCreateButton("Suchen", 952, 120, 75, 25)
$ListView1 = GUICtrlCreateListView("Dateiname", 88, 80, 657, 729)
_GUICtrlListView_SetColumnWidth($ListView1,0,653)
GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND")
GUISetState(@SW_SHOW)
$Folder="C:\Users\Patrick\Desktop"
$FolderList=_FileListToArray($Folder,"*",1)
for $i=1 to UBound($FolderList)-1 step 1
GUICtrlCreateListViewItem($FolderList[$i],$ListView1)
next

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

#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] [autoit][/autoit] [autoit]

Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
Local $nNotifyCode = BitShift($wParam, 16)
Local $hCtrl = $lParam
If $nNotifyCode = 1024 Or $nNotifyCode = 786 Then
If $hCtrl = GUICtrlGetHandle($Input1) Then
_GUICtrlListView_DeleteAllItems($ListView1)
$suchbegriff=GUICtrlRead($Input1)
if $suchbegriff="" then
for $i=1 to UBound($FolderList)-1 step 1
GUICtrlCreateListViewItem($FolderList[$i],$ListView1)
next
else
for $i=1 to UBound($FolderList)-1 step 1
if StringInStr($FolderList[$i],$suchbegriff)=1 then
GUICtrlCreateListViewItem($FolderList[$i],$ListView1)
endif
next
GUICtrlCreateListViewItem("",$ListView1)
GUICtrlSetBkColor(-1,0x000000)
for $i=1 to UBound($FolderList)-1 step 1
if StringInStr($FolderList[$i],$suchbegriff)>1 then
GUICtrlCreateListViewItem($FolderList[$i],$ListView1)
endif
next
endif
EndIf
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_COMMAND

[/autoit]

heyhey83

okay nun kommt immer wenn ich es erstellen will eine Fehler Meldung Error Unable to add resources

**Kanashius**

Ich denke, du musst den Ordnerpfad ändern

heyhey83

denn muss ich ändern aber da kann ich doch auch @ScriptDir weill ich will da kein pfad angeben

[autoit]

$Folder="C:\Users\Patrick\Desktop"

[/autoit]

heyhey83

also die Ausgabe soll ja links daneben erfolgen da soll ja die html schön geöffnet ausgeben

**Kanashius**

Achso... Dann hab ich das oben doch falsch verstanden, und du möchtest doch den Inhalt der Datei angezeigt bekommen...
Soll die Html als Text oder als Html angezeigt werden?

heyhey83

na ja als html also wie als wenn sie normal geöffnet ist

**Kanashius**

Dann so:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <IE.au3>

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 1177, 850, 313, 48)
$Input1 = GUICtrlCreateInput("", 824, 120, 121, 21)
$Button1 = GUICtrlCreateButton("Suchen", 952, 120, 75, 25)
$oIE=_IECreateEmbedded()
$Obj=GUICtrlCreateObj($oIE,88,80,657,729)
GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND")
GUISetState(@SW_SHOW)
$FolderIE=StringReplace(@ScriptDir,"\","/")

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

#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] [autoit][/autoit] [autoit]

Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
Local $nNotifyCode = BitShift($wParam, 16)
Local $hCtrl = $lParam
If $nNotifyCode = 1024 Or $nNotifyCode = 786 Then
If $hCtrl = GUICtrlGetHandle($Input1) Then
$suchbegriff=GUICtrlRead($Input1)
if FileExists($suchbegriff) then
_IENavigate($oIE,"file://localhost/"&$FolderIE&"/"&$suchbegriff)
endif
EndIf
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_COMMAND

[/autoit]

heyhey83

okay aber wie gesagt bekomme immer noch die Fehler Meldung ich schaue gerade warum bin ich doof oder blind

heyhey83

also das ganze liegt ja bei mir alles in einen ordner habe ich da was übersehen in den code was ich ändern muss kann den fehler nicht finden

**Kanashius**

Eigentlich müsste das so funktionieren... Bei mir funktioniert es jedenfalls... Gib mal die genaue Zeile der Fehlermeldung und die genauen Infos (also alles, was bei SciTe steht)