heyho zusammen,
möchte ne permutation aus mehreren txt dateien machen, sprich die zeilen kombinieren. hat da jemand vielleicht nen beispielcode, weiss nicht genau wie ich vorgehen soll.
danke im vorraus..
heyho zusammen,
möchte ne permutation aus mehreren txt dateien machen, sprich die zeilen kombinieren. hat da jemand vielleicht nen beispielcode, weiss nicht genau wie ich vorgehen soll.
danke im vorraus..
Hab mal auf Basis dessen was ich aus der Frage interpretiert habe , mal eine kleine Funktion mit Aufrufbeispiel geschrieben , allerdings wusste ich nicht ob das ganze dynamisch sein soll , aber ich hoffe es ist das was du dir vorgestellt hast.Code:Sub Main() Dim Pfad As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) Dim Datei1 As String = Pfad & "\Text1.txt", Datei2 As String = Pfad & "\text2.txt" Dim sw As New System.IO.StreamWriter(Pfad & "\NeueDatei.txt") sw.Write(DateiLesen(Datei1)) sw.Write(ControlChars.CrLf) sw.Write(DateiLesen(Datei2)) sw.Flush() sw.Close() End Sub Private Function DateiLesen(ByVal DateiPfad As String) As String Dim sr As New System.IO.StreamReader(DateiPfad) Dim Daten As String = sr.ReadToEnd() sr.Close() Return Daten End Function
MfG
super klasse das hilft mir aber mal 100% weiter...
mein gedanke lag darin, ich habe 4 txt datein, jeweils mit 20 wörtern, jedes wort in einer eigenen zeile..dann möchte ich jegliche möglichkeit bestimmen und diese wiederrum in einer txt speichern...
also die 4 wörter aus den vier verschiedenen txtdatein ..zusammen als string speichern und dann wieder in eine txt schreiben...sprich alle möglichkeiten..
edit: naja nicht umbedingt 20 wörter, sagen wir unbegrenzt wörter..
Geändert von br00_pwn (22.06.2009 um 19:22 Uhr)
meinse so ?
dieser code liest 4 textdateien aus und packt ihre inhalte in eine.Code:Dim sreader = New StreamReader("C:\bla.txt").ReadToEnd Dim sreader2 = New StreamReader("C:\xxx.txt").ReadToEnd Dim sreader3 = New StreamReader("C:\LOL.txt").ReadToEnd Dim sreader4 = New StreamReader("C:\blubb.txt").ReadToEnd Dim swriter As New StreamWriter("C:\x.txt") swriter.Write(sreader & vbCrLf) swriter.Write(sreader2 & vbCrLf) swriter.Write(sreader3 & vbCrLf) swriter.Write(sreader4) swriter.Close()
iPott <3
nein...ok stell dir vor du hast 2 textdateien...in der einen stehen vornamen und in der anderen nachnamen, jetzt möchte du alle möglichkeiten herausfinden, wie man diese zusammenfügen kann...
txt1 ----------- txt2
susanne ------ wagner
peter----------- meier
werner--------- schneder
... ...
jetzt halt jegliche möglichkeit herausfinden
wernermeier,wernerschneider, wernerwagner, peterschneider, peterwagner...usw
Geändert von br00_pwn (22.06.2009 um 19:34 Uhr)
Und wie willst du deinem Programm bitte beibringen , Namen und vornahmen zu unterscheiden ?
Das ginge nur wenn Zeichen zwischen den Namen vorhanden wären , oder wenn du jedes Wort auslesen lässt , und Zeichen für Zeichen durchgehst , und prüfst ob sich daraus bereits ein Name oder vornahme bilden lässt
Dann müsste allerdings eine Datenbank mit möglichst vielen Namen und Vornahmen vorhanden sein
Zumindest fällt mir das gerade ein zur lösung dieses Problems
MfG
nein vornamen befinden sich in txt1 und nachnamen in txt2...also ich beziehe aus 2textdatein...also immer eine zeile ein "wort"
sprich... zeile1(txt1) + zeile1(txt2)
............zeile1(txt1) + zeile2(txt2)
............usw...
mom ich mach eben mal ein bild in ps..um es deutlich zu zeigen, was ich vorhab..
Geändert von br00_pwn (22.06.2009 um 19:46 Uhr)
Meinst du sowas?
[ungetestet und nur geeignet für eher kleine Dateien, da die Dateien komplett in den Speicher geschrieben werden. Ansonsten mit ReadLine() arbeiten.]Code:Dim sr1 As new streamreader("file1") Dim sr2 As New StreamReader("file2") Dim s() As String = split(sr1.ReadToEnd,vbcrlf) Dim t() As String = split(sr2.ReadToEnd,vbcrlf) sr1.Close() sr2.Close() For Each u As String In s For Each v As String In t Messagebox.Show(u+" "+v) Next Next
Die Ausgabe wieder in eine Datei zu schreiben bekommst du denke ich mal selber hin.
Geändert von inout (22.06.2009 um 20:02 Uhr)
Lade eine Datei und splitte sie in Arrays und dann mit der nächsten usw.
und dann musst sie ja nur mehr zusammen setzen.
am besten mit for each
Hoffe das is eine gute Idee^^
Geändert von IRET (22.06.2009 um 20:10 Uhr)
also hier mal ein bild wie ich es mir denke...
http://www.bilder-space.de/show.php?...kAar8oiNDl.jpg
also werden 4 txt dateien benötigt, in denen jeweils das passende steht..
nun sollen alle möglichkeiten aus den 4 txt herausgefunden werden, sprich kommt immer eine mail addy raus...diese wird dann anschliessend auf gültigkeit getestet und weiterverarbeitet also bedeutet es...wenn txt1 1000 vornamen hat, txt2 4 sonderzeichen , txt3 1000 nachnamen und txt4 10 mailanbieter...dann sollte das programm über 2 millionen email addy ausspucken so ist mein gedanke...diese werden sicherlich dann auf gültigkeit getestet, über smtp versand... und die kombination aus vorname .-_nachname@irgendwas.?? gibts fast alle
Geändert von br00_pwn (22.06.2009 um 20:16 Uhr)