Hallo,
Da ich immer wieder autoitscripte speichere und nach der zeit nicht mehr finde habe ich diesen script geschrieben.
Wem es nützlich ist kann es ja haben 
Desktopsuchmaschine
-
Hallo Deepred.
Das ist doch ein Dir *.* /s von der Festplatte und das in einem Fenster ausgegeben. Aber ich habe festgestellt, das es bei mir nicht kein AutoIt-Script anzeigt. Erstens weil die nicht auf dem Laufwerk C liegen und dann wohl auch, weil nicht speziell nach *.au3 gesucht wird.
Aber von der Grafischen Oberfläche, möchte ich noch einen Tip geben. Im Ergebnis sollte man dann noch suchen können nach Zeilen wo .au3 enthalten ist.
Gruß, Lina.
-
Hi,
Source wäre nett!
greetz
-
qon: Warum willst du source?
ist dich net so schwer:
cmd DIR *.au3 -> hier hat Deepred nur *.* außerdem wird nur auf C: gesucht. Menine liegen aber auf D:\
Alles in GuiCtrlEdit packen und nen Button mit _GUICtrlEdit_Find dazu -
Tja auf die leichtesten sachen kommen ja nicht alle leute
[autoit]
.
Außerdem kann man daran noch vieles verbessern
z.b laufwerke auswählen usw...#include <GuiEdit.au3>
[/autoit][autoit][/autoit][autoit]
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <WindowsConstants.au3>$rueckgabe = ""
[/autoit][autoit][/autoit][autoit]
$fehler = ""GUICreate("Desktop Suchmaschine 1.00",500,535)
[/autoit][autoit][/autoit][autoit]
$edit = GUICtrlCreateEdit("Bitte warten...",0,0,500,500,BitOR($ES_AUTOVSCROLL, $WS_VSCROLL, $ES_MULTILINE, $WS_HSCROLL, $ES_NOHIDESEL))
$Button1 = GUICtrlCreateButton("Suchen", 3, 502, 100, 30)
$Button2 = GUICtrlCreateButton("Log Speichern", 110, 502, 100, 30)
GUISetState()$pid = run(@comspec & " /c DIR /S CMD.* c:\","",@SW_HIDE,2)
[/autoit][autoit][/autoit][autoit]While 1
[/autoit][autoit][/autoit][autoit]
$rueckgabe &= StdOutRead($pid)
If @error Then ExitLoop
sleep(10)
WEnd
;~ $Rueckgabe = StringReplace($Rueckgabe, '', 'ü')GUICtrlSetData($edit,$Rueckgabe)
[/autoit][autoit][/autoit][autoit]While 1
[/autoit]
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button1
_GUICtrlEdit_Find ($Edit)
Case $msg = $Button2
$log_save = FileOpen("FileLog.log",1)
FileWrite($log_save,$rueckgabe)
FileClose($log_save)
EndSelect
WEnd -
Ich führe nicht gerne kompiliierte exen aus von leuten den ich nicht absolut vertraue
hab schon genug erfahrungen damit gesammelt
und n tipp deepred:
den code im quelltextmodus einfügen, dann treten keine bugs mit der formatierung sowie includes auf
greetz