Moin moin,
ich hab zwar eine funktionierende Suche welche mit Datein im Verzeichnis findet -->
Private Sub CommandButton1\_Click()
Dim dat As String
Dim prog As String
Dim i As Integer
Dim ant As String
prog = TextBox1
With Application.FileSearch
.NewSearch
.LookIn = "d:\test1\"
.SearchSubFolders = True
.Filename = prog
.MatchTextExactly = False
End With
With Application.FileSearch
If .Execute() \> 0 Then
For i = 1 To .FoundFiles.Count
TextBox2 = .FoundFiles(i)
Next i
Else
ant1 = MsgBox("Es wurden keine entsprechende Datei gefunden!", vbOK)
End If
End With
End Sub
Was ich aber benötigen täte, wäre das er mit Datei-Inhalte also ne Indexsuche durchführt, die Ergebniss (Datei mit Speichepfad) in ne Listbox schreibt (nicht wie oben in eine Textbox)- da es mehrere Dateien sein können in welchen der Suchbegriff beinhaltet ist, und die Such-Ergebnisse (also die Pfad und Dateiangabe) sich per Doppelklick öffnen lässt.
Ich hab schon gegoogelt - nichts brauchbares konnt ich finden 
Hat jemand ne Idee wie ich das verwirklichen könnte?
Vor allen die Indexsuche bring ich ned hin, zumindest nicht ohne eurer Hilfe…das andere dann schaff ich - hoffe ich - allein.
Gruß Rolf
)