Page 1 of 1

Text nach verschiedenen Wörtern durchsuchen

Posted: 03 Sep 2019, 13:42
by vltier
Guten Abend hilfreiche Gemeinde!

ich möchte Texte nach verschiedenen Wörtern gleichzeitig durchsuchen und gefundene Wörter (wie auch immer) markieren. Kennt jemand ein derartiges Skript? Oder kann mir für den Start auf die Sprünge geholfen werden?

Re: Text nach verschiedenen Wörtern durchsuchen

Posted: 04 Sep 2019, 02:11
by garry
wie man gefundene Wörter markiert weiss ich nicht
nur eine Idee : falls die gesuchten Wörter ( oder Wort) in der Text-Datei gefunden > die Zeile in neue Text-Datei speichern (z.B. mit Zeilennummern )

Re: Text nach verschiedenen Wörtern durchsuchen

Posted: 04 Sep 2019, 04:07
by Ahk_fan
Guckst du:

Code: Select all

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
Gui, new
Gui, Add, Text, , Pfad+Dateiname
Gui, Add, Edit, w700 vpfad , test.txt
Gui, Add, Button, gDatenLaden, Laden

Gui, Add, Text, , Suchen nach (ab 3 Zeichen)
Gui, Add, Edit, w700 vSuchtext gSuchenStarten

HTML =
Gui, Add, ActiveX, w600 h450 vDisplay +0x800000 +0x4000000, HTMLFile
;Display.parentWindow.execScript("document.oncontextmenu = document.body.oncontextmenu = function() {return false;}")         ;https://www.autohotkey.com/boards/viewtopic.php?t=59299
ComObjConnect(Display, "Doc_")
Display.body.innerHTML := Html
Gui, Add, Button, x+10 w140 gNeuladen, NEU Laden
Gui, show, , Search
return


GuiClose:
Exitapp

NeuLaden:
reload
return

DatenLaden:
Gui, Submit, nohide
FileRead, SuchDaten, %pfad%
return

SuchenStarten:
Gui, submit, nohide
if SuchDaten =
{
	msgbox, nix Daten
	return
}
laengeSuchText := StrLen(Suchtext)
if laengeSuchText > 3
{
			Html = <font size="5" color="black"><b>%SuchDaten%</font></b><br><br>`n
			StringReplace, VersTextHtml, Html, %Suchtext%, <span style=`"background-color: `#FFFF00`">%Suchtext%</span>, all
			Html = <font size="5" color="black">%VersTextHtml%</font><br><br>`n
			ComObjConnect(Display, "Doc_")
			Display.body.innerHTML := Html		
}
return
- die durchsuchbare Datei sollte ne textdatei sein...
- Groß/Kleinschreibung wird nicht beachtet
- es wird nach enem Begriff gesucht, kann man aber per StrSplit usw. erweitern...

Re: Text nach verschiedenen Wörtern durchsuchen

Posted: 09 Sep 2019, 09:38
by vltier
Vielen Dank! Das überfordert meinen eher rudimentären Kenntnisse dann aber doch. Ich habe mir zunächst mal mit Word, Excel und einem Makro geholfen :-)

Re: Text nach verschiedenen Wörtern durchsuchen

Posted: 10 Sep 2019, 10:28
by LuckyJoe
Falls es keine formatierten Texte sind, kannst du auch einen Editor verwenden. So markiert dir Notepad++ z.B. alle gleichen Wörter im Text, wenn du ein einzelnes Wort markiert hast.