Vor 200 Textdateien ( Wörterbuch ) bestimmtes Zeichen Automatisch setzen lassen.

BurningRain · 17. April 2012

Hallo Leute
Ich hab hier ein Deutsches Wörterbuch welches aus ungefähr 200 Textdateien besteht.
Die wörter sind ganz normal in Textdateien angeordnet natürlich alphabetisch.

Bsp.
Fisch
Fuhrpark
Finte
fliegen

etc.

Nun möchte ich vor allen wörten <string></string> setzen lassen.

Ich weiß wie dies mit Excel funktioniert nur hab ich kein bock das bei 200 Textdateien zu machen.
Einfach Zelle formatieren Benutzerdefini. "<string>"@"</string>
Kann ich das nicht einfach bei allen irgendwie automatisch machen lassen?
MFG

kuhkuh · 17. April 2012

1. Alle Textdateien in einen Ordner packen.
2. Ausführen-> "cmd" eingeben.
3. "cd PFAD ZUM ORDNER" eingeben + enter.
4. "copy *.txt kompakt.txt" enter.

Nun werden alle Textdateien in eine Textdatei gepackt.

Kuh :>

BurningRain · 17. April 2012

Danke Jedoch sollen die TxT's schon einzelnd bleiben -.-... xD
Ich will halt nur vor jedem Wort <string></string> stehen haben.
MFG

kuhkuh · 17. April 2012

Hmm okay. Man könnte für dein Problem ein Tool programmieren, aber ich geh sofort pennen Hat das noch bis morgen zeit ?

BurningRain · 17. April 2012

Sicher doch
Hast du zufällig MSN SKype oder ähnliches :)?

kuhkuh · 17. April 2012

Jo hab Skype. Schick mir mal dein Addy via PM und einen Ausschnitt von der Datei und was du genau ersetzen möchtest.

**AOL** · 17. April 2012

Mir fällt momentan dazu nur ein ein eigenes kleines Programm zu schreiben, das Folgendes macht:

1.) Lese alle Dateinamen in einem bestimmtem Pfad aus und speichere diese in einem Array
2.) Arbeite jeden Eintrag des Arrays ab, indem du die Datei öffnest und dann eben in jeder Zeile deine Tags einfügst

Edit: Zu langsam für die kuh

MfG AOL

BurningRain · 17. April 2012

URPSRUNG : http://pastebin.com/Kk7HVVYW

SO MÖCHT ICHS HABEN: http://pastebin.com/YEH9K2zK

So nochmal an alle

kuhkuh · 17. April 2012

Jo so'n Programm kann ich morgen schreiben

BurningRain · 17. April 2012

Ich liebe dich (l) XD

dongdong · 17. April 2012

[cs]
public static void main()
{
string[] files = System.IO.Directory.GetFiles("C:\\mydir\\");
foreach (string file in files)
handleFile(file);
}

public static void handleFile(string file)
{
StreamReader sr = new StreamReader(file);
StreamWriter sw = new StreamWriter(pfadzumeinerneuendatei);

try
{
sw.WriteLine(meinAnfangContent);

while (!sr.EndOfFile)
{
string line = sr.ReadLine();
sw.WriteLine("<string>" + line + "</string>");
}
}
finally
{
sw.Flush();
sw.Close();
sr.Close();
}
}
[/cs]

In der Schnelle "pseudocode" artig geschrieben. Aber so in etwa geht das

Awesome · 17. April 2012

Einfach in deinen Ordner entpacken wo alle textdatei drin sind.
Danach wird eine erstellt namens new.txt wo alle wörter mit <string>wort</string> drin sind.

DL: http://www66.zippyshare.com/v/25548598/file.html

Source:

C

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <File.au3>
$FilesFolders = _FileListToArray(@ScriptDir, "*.txt")
For $i = 1 To $FilesFolders[0] Step +1
If StringRight(StringTrimRight($FilesFolders[$i], 3), 1) == "." Then $FilesFolders[$i] = StringTrimRight($FilesFolders[$i], 4)
Next
ConsoleWrite(@CRLF & "Datei/Ordneranzahl total: " & $FilesFolders[0])
For $i = 1 To $FilesFolders[0] Step +1
ConsoleWrite(@CRLF & $FilesFolders[$i] & ".txt")
$h = FileOpen($FilesFolders[$i] & ".txt")
While 1
Local $line = FileReadLine($h)
If @error = -1 Then ExitLoop
FileWriteLine("new.txt", "<string>" & $line & "</string>")
WEnd
Next
MsgBox(0, "", "Erfolg")
FileClose($h)
Exit

Alles anzeigen

Akeshihiro · 17. April 2012

In Groovy wäre es das:

Code

def ext = '.txt'
def targetDir = 'generated/'
def list = new File('.').listFiles(new FileFilter() { boolean accept(File f) { return f.name.endsWith(ext) } })
new File(targetDir).mkdirs()
list.each { f ->
def newFile = new File(targetDir + f.name)
newFile.write '''<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<array>
'''
f.eachLine { line ->
newFile.append " <string>${line}</string>\n"
}
newFile.append ''' </array>
</plist>'''
}

Alles anzeigen

Awesome · 17. April 2012

Jetzt fehlt noch C# und am besten onlinegenerator in php

Ich war leider zu slow^^

Akeshihiro · 17. April 2012

C# gibt's schon Man könnte noch einige Sprachen rein tun, C, C++, phyton, perl, ruby, php, Java, Scala, Go, VB jeglicher Art, Pascal, Delphi und was weiß ich ... Aber muss das sein? xD

BurningRain · 18. April 2012

Awesome schrieb:

Einfach in deinen Ordner entpacken wo alle textdatei drin sind.
Danach wird eine erstellt namens new.txt wo alle wörter mit <string>wort</string> drin sind.

DL: http://www66.zippyshare.com/v/25548598/file.html

Source:

C

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_Compile_Both=y

#AutoIt3Wrapper_UseX64=y

#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <File.au3>

$FilesFolders = _FileListToArray(@ScriptDir, "*.txt")

For $i = 1 To $FilesFolders[0] Step +1

If StringRight(StringTrimRight($FilesFolders[$i], 3), 1) == "." Then $FilesFolders[$i] = StringTrimRight($FilesFolders[$i], 4)

Next

ConsoleWrite(@CRLF & "Datei/Ordneranzahl total: " & $FilesFolders[0])

For $i = 1 To $FilesFolders[0] Step +1

ConsoleWrite(@CRLF & $FilesFolders[$i] & ".txt")

$h = FileOpen($FilesFolders[$i] & ".txt")

While 1

Local $line = FileReadLine($h)

If @error = -1 Then ExitLoop

FileWriteLine("new.txt", "<string>" & $line & "</string>")

WEnd

Next

MsgBox(0, "", "Erfolg")

FileClose($h)

Exit

Alles anzeigen

Danke..
Nur das Problem ist die Textfiles dürfen nicht in eine einzelne Textdatei gepackt werden.
Es sind halt
0-0 für Anfangsbuchstabe A Endbuchstabe A
0-1 für Anfangsbuchstabe A Endbuchstabe B
0-2 für Anfangsbuchstabe A Endbuchstabe C
etc.

Und ich will einfach das alle wörter mit <string>Fisch</string> enden.
geringfügig sollte die Textdatei noch mit

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<array>

anfangen.

MFG

kuhkuh · 18. April 2012

Ich schreib das Programm jetzt.

Kuh :>

E: Fertig. Sollte klappen
Link

Akeshihiro · 18. April 2012

Hättest du die 15MB Groovy runtergeladen, wäre das schon längst erledigt gewesen, denn mein Generator hat das alles schon gemacht ...

Bzw. eigentlich ist das ja ein Konverter

kuhkuh · 18. April 2012

Hab das in 5min gemacht :o

BurningRain · 18. April 2012

Jetzt muss ich die Kacke nur noch ins plist format konventieren wie krieg ich das denn hin -__?

EDIT: LOL.. Hab einfach mal txt. in plist umbenannt und es klappt

Danke an ALLE Especially Kuhh

Teilen