Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Access Dokumente Druchsuchen + Text anzeigen
zurück: Rowsource mit MSSQL Abfrage befüllen weiter: Feld mit Bild verknüpfen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Maxilus
Auszubildender Fachinformatiker


Verfasst am:
10. Sep 2012, 08:14
Rufname:

Access Dokumente Druchsuchen + Text anzeigen - Access Dokumente Druchsuchen + Text anzeigen

Nach oben
       Version: Office XP (2002)

Hi,

Also ich hab da mal eine Frage.

Ich hab ein Access Programm mit dem ich Dokumente speichern kann.
Jetzt möchte ich aber gern so etwas Ähnliches wie die Textsuche in Word 2010 einbauen nur das es Dokumente Durchsucht.

Dass das Programm Dokumente durchsuchen kann ist ja nicht schwer:
Code:
    Dim i As Integer
    Const SearchWord As String = "Hello"
   
    With Application.FileSearch
        .LookIn = "C:\Test12345"
        .FileType = msoFileTypeAllFiles
        .SearchSubFolders = True
        .TextOrProperty = SearchWord
        .Execute
        For i = 1 To .FoundFiles.Count
            MsgBox .FoundFiles(i)
        Next i
    End With
Wenn ich diesen Code ausführe zeigt er mir Die Dokumente an in denen, in diesem Bsp. "Hello" drin steht.

Meine Wunsch Ausgabe würde aber evtl. so aussehen:

Suche : Hallo

[Kontext:]
"Hallo, sagte er " Wurde in C:\Test1234\Geschichte.txt" gefunden.

[]

Irgendwie so.
Ich hoffe ihr könnt euch darunter etwas vorstellen. Smile

Danke schon mal

Max
reeky
Access VBA Forgeschrittener


Verfasst am:
10. Sep 2012, 09:53
Rufname:


AW: Access Dokumente Druchsuchen + Text anzeigen - AW: Access Dokumente Druchsuchen + Text anzeigen

Nach oben
       Version: Office XP (2002)

Hallo,

setze doch einfach mal einen Haltepunkt am Ende des With-Blockes und öffne das Lokal-Fenster (über Ansicht).
Dort kannst du dann sehen, welche Eigenschaften das Objekt besitzt. Irgendwo darin sollte dann auch der Pfad abgelegt sein und vielleicht auch die Fundstelle. Über die Fundstelle könntest du dann ein paar Zeichen bzw. Wörter mehr einblenden lassen (welche sich nach dem Fundort befinden).
Maxilus
Auszubildender Fachinformatiker


Verfasst am:
10. Sep 2012, 10:00
Rufname:

AW: Access Dokumente Druchsuchen + Text anzeigen - AW: Access Dokumente Druchsuchen + Text anzeigen

Nach oben
       Version: Office XP (2002)

Also wenn ich den Programm Code ausführe gibt er mir ja den Pfad in welchen die Datei ist in welcher der Text steht.

Also weiß ich die Datei und weiß das dort dieser Text steht aber das einzige was er mir ausgibt ist der Dateipfad. Ich möchte jedoch die datei sozusagen öffnen und dann die Zeile raussuchen in der das steht und als Suchergebnis darstellen Smile

Bei Word 2010 gibt es das. (siehe Anhang)
so wie das Gelb markierte möchte ich es darstellen und dann durch einen klick auf das Feld das Dokument öffnen : )

hier im Bsp. geht das nur innerhalb vom Text aber durch den oben geschriebenen Code sucht Access auch innerhalb der Datei danach.

Lg MAx



Bsp.jpg
 Beschreibung:
 Dateigröße:  105.29 KB
 Angeschaut:  159 mal

Bsp.jpg


reeky
Access VBA Forgeschrittener


Verfasst am:
10. Sep 2012, 10:22
Rufname:


AW: Access Dokumente Druchsuchen + Text anzeigen - AW: Access Dokumente Druchsuchen + Text anzeigen

Nach oben
       Version: Office 2007

Mh... leider kenne ich das von dir verwendete Objekt application.filesearch nicht mehr, da es in Office 2007 nicht mehr verfügbar ist.

In Office 2007 wird ein anderer Ablauf dafür verwendet. Ich habe mir kurz den Ablauf in der 2007er Version angeschaut und musste feststellen, dass du mit dieser Variante an dein Ziel kommst.

Hier ist mal der Link von dem Code: Kein FileSearch Objekts in Office 2007

Mit den Stringfunktionen kannst du dann die genaue Stelle des Suchwortes finden und dann mit weiteren Stringfunktionien die folgenden/vorangegangnen 2-4 Wörter ausgeben lassen.

Bei weiteren Fragen melde dich einfach.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Text formatieren mit Abfrage 3 valdy 1219 15. Aug 2005, 14:22
Willi Wipp Text formatieren mit Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: gruppieren-beide texteintraege anzeigen 7 paty 1196 14. Jun 2005, 02:54
tobes gruppieren-beide texteintraege anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Text abschneiden A2k 1 Domainhunter 928 24. Mai 2005, 13:06
Dalmatinchen Text abschneiden A2k
Keine neuen Beiträge Access Tabellen & Abfragen: Numerische Werte in als Text definiertem Feld 4 Terminator 811 25. Apr 2005, 07:50
stpimi Numerische Werte in als Text definiertem Feld
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrageergebnis als neues Formular anzeigen 2 mila 3034 12. Apr 2005, 12:38
mila Abfrageergebnis als neues Formular anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: alle Kunden mit letzter Rechnung anzeigen 2 Dalmatinchen 1109 08. März 2005, 20:58
Dalmatinchen alle Kunden mit letzter Rechnung anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: select.... where mit einer Variablen/Feld statt 'Text' abfr. 3 Guybrush junior 2745 07. März 2005, 20:28
Guybrush junior select.... where mit einer Variablen/Feld statt 'Text' abfr.
Keine neuen Beiträge Access Tabellen & Abfragen: text import mit variabler dateiangabe 2 dicc 614 06. Feb 2005, 21:09
Gast text import mit variabler dateiangabe
Keine neuen Beiträge Access Tabellen & Abfragen: Text in einem Datumsfeld einer Tabelle??? 6 DoMe 584 02. Feb 2005, 00:05
Thunderbird Text in einem Datumsfeld einer Tabelle???
Keine neuen Beiträge Access Tabellen & Abfragen: Anzeigen der Daten einer vorhandenen Tabelle in einer Abfrag 6 brauzer 830 02. Dez 2004, 13:28
brauzer Anzeigen der Daten einer vorhandenen Tabelle in einer Abfrag
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage mit sum, max Wert und verhätnis summe/max anzeigen? 1 IV 2531 04. Nov 2004, 18:14
Skogafoss Abfrage mit sum, max Wert und verhätnis summe/max anzeigen?
Keine neuen Beiträge Access Tabellen & Abfragen: Anzahl der Datensätze anzeigen? 3 MichaelB 1122 19. Okt 2004, 12:45
lothi Anzahl der Datensätze anzeigen?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Frontpage Forum