Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
Autor
Nachricht
aMphetaMin
Tutorial Leser
Tutorial Leser

Anmeldedatum: 29.06.2008
Beiträge: 33

Textdatei erstellen?
Verfasst am: 30.06.2008, 18:11

Hallo und Guten abend Smile

Ich habe eine Textbox in meiner Form und möchte das der Inhalt der Textbox in eine neue txt. datei geschrieben wird und diese txt datei dann immer einen zufälligen namen hat.

Wie kann ich das in vb.net verwirklichen? Gogle habe ich benutzt aber ich wurde daraus nicht schlau da meine Englischkenntnisse nochn nicht so gut sind [img]/sad.gif[/img]

Naja ich hoffe hier kann mir einer helfen Wink
 
ZiG
Überflieger
Überflieger

Anmeldedatum: 16.04.2008
Beiträge: 421


Verfasst am: 30.06.2008, 18:29

Lass die Datei einfach immer mit Datum und Uhrzeit als Namen speichern.
Ergibt Sinn und führt auch nicht zu Problemen wegen doppelten Namen.

Und ich bin sicher ein VB.Netler wird dir noch die passenden Befehle dazu sagen.

mfg
 
noname
Poster
Poster

Anmeldedatum: 01.05.2008
Beiträge: 131


Verfasst am: 30.06.2008, 18:30

Das lässt sich alles über den Streamwriter erledigen:

Visual Basic: [code]
Using fw As New System.IO.StreamWriter("C:meinedatei.txt")
fw.WriteLine("Mein Text")
End Using
[/code]

Zum Thema "random string", ich hab mir da mal eine Funktion geschrieben:

Visual Basic: [code]
Function randomstring(ByVal inputstring As String) As String
Dim Random As System.Random = New System.Random()
Dim i As Integer = Random.Next(1, inputstring.Length)
Return inputstring.Chars(i)
End Function
[/code]

Der Inputstring muss deine Zeichen enthalten:

Visual Basic: [code]
Dim mystring As String = "abcdefghijklmnopqrstuvwxyz"
[/code]

Die Funktion gibt ein Zeichen aus dem String zurück, du musst den Vorgang nur oft genug wiederholen.
 
tr4st
Überflieger
Überflieger

Anmeldedatum: 16.04.2008
Beiträge: 486


Verfasst am: 30.06.2008, 18:55

Natürlich gibt es verschiedene Funktionen mit denen du einen Text in eine Datei schreiben kannst, diese hier ist eine relativ kurze.

Visual Basic: [code]System.IO.File.AppendAllText(SpeicherPfad, TextBox1.Text)
' Dort benötigst du zuerst die Pfad Angabe mit Dateiname und Endung
' Und die zweite Value ist der Text welcher in die Datei geschrieben werden soll.[/code]
 
aMphetaMin
Tutorial Leser
Tutorial Leser

Anmeldedatum: 29.06.2008
Beiträge: 33


Verfasst am: 30.06.2008, 19:29

@Daniel ja das funktioniert super.
Ich habe gerade noch den Code für die jetzige Zeit gefunden:

Visual Basic: [code]datetime.now[/code]

Ich möchte das das Datum im dateinnamne steht:

Visual Basic: [code]Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.IO.File.AppendAllText("C://test.txt", TextBox1.Text & DateTime.Now)



End Sub
End Class[/code]
Jedoch steht es hier in der Datei drinnen und nicht im Dateinamen.
 
tr4st
Überflieger
Überflieger

Anmeldedatum: 16.04.2008
Beiträge: 486


Verfasst am: 30.06.2008, 19:32

Visual Basic: [code]Public Class Form1

Private Sub Button1_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.IO.File.AppendAllText("C://" & DateTime.Now & "test.txt", TextBox1.Text)

End Sub

End Class[/code]

 
aMphetaMin
Tutorial Leser
Tutorial Leser

Anmeldedatum: 29.06.2008
Beiträge: 33


Verfasst am: 30.06.2008, 19:44

(Daniel Mohr;4762)
Visual Basic: [code]Public Class Form1

Private Sub Button1_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.IO.File.AppendAllText("C://" & DateTime.Now & "test.txt", TextBox1.Text)

End Sub

End Class[/code]



hmm... Danke aber wenn ich das teste dann kommt ein Popup mit " NotSupportedExecption"

oder wenn ich es direkt übernehme also C&P dann kommen 2 Fehler :

"Fehler 1 Alle Parameter müssen explizit typisiert sein, wenn einer von ihnen explizit typisiert ist. C:Dokumente und EinstellungenAdministratorLokale EinstellungenAnwendungsdatenTemporary ProjectsWindowsApplication2Form1.vb 3 37 WindowsApplication2"

"Fehler 2 Komma oder ")" erwartet. C:Dokumente und EinstellungenAdministratorLokale EinstellungenAnwendungsdatenTemporary ProjectsWindowsApplication2Form1.vb 3 44 WindowsApplication2
"
 
sollniss
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 699


Verfasst am: 30.06.2008, 19:46

Das wird daran liegen, das bestimmte Zeichen in einem Dateinamen verboten sind.
 
tr4st
Überflieger
Überflieger

Anmeldedatum: 16.04.2008
Beiträge: 486


Verfasst am: 30.06.2008, 19:52

Jop, die Datums Formatierung beinhaltet ungültige Zeichen.

Visual Basic: [code]Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

System.IO.File.AppendAllText("C:" & DateTime.Now.ToShortDateString() & "Test.txt", TextBox1.Text)

End Sub

End Class[/code]

So funktionierts.
 
aMphetaMin
Tutorial Leser
Tutorial Leser

Anmeldedatum: 29.06.2008
Beiträge: 33


Verfasst am: 30.06.2008, 19:53

(sollniss;4766)
Das wird daran liegen, das bestimmte Zeichen in einem Dateinamen verboten sind.

hast recht Smile
man man man^^
Habe jetzt einfach den Computernamen auslesen lassen:

Visual Basic: [code]Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.IO.File.AppendAllText("C://" & System.Environment.MachineName & "test.txt", TextBox1.Text)
End Sub

End Class[/code]

So soweit so gut Smile
Falls ich fragen hab schreibe ich hier rein^^
 
^^kev####
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 476
Wohnort: Haan


Verfasst am: 30.06.2008, 20:35

Ich hatte das bei meinem Musik-Sortiersystem mit den nicht erlaubten Zeichen mit Regex gelöst

System.Text.RegularExpressions.Regex.Replace(STRING, "[\/Confused*^""<>|]", "_")
 
tr4st
Überflieger
Überflieger

Anmeldedatum: 16.04.2008
Beiträge: 486


Verfasst am: 30.06.2008, 20:45


Er ist noch ein Anfänger Wink
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten

Tags: txt datei, neue txt, erstellen, textdatei, textbox

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge [Probleme]Hoffe Auf schnelle Antwort 472 16.07.2009, 22:08
Keine neuen Beiträge txt speicherort 578 19.09.2007, 02:35
Keine neuen Beiträge Immer ander TXT Datei uploaden, wie? 629 23.07.2007, 18:36
Keine neuen Beiträge TxT erstellen + variable 618 19.06.2007, 12:56
Keine neuen Beiträge Txt aus URL in txtfeld ausgebn 722 16.02.2007, 16:44
 


[ Time: 0.1965s ][ Queries: 113 (0.1313s) ][ GZIP on - Debug on ]