txt file

Status
Niet open voor verdere reacties.

jeffreyvis

Gebruiker
Lid geworden
18 nov 2011
Berichten
8
hallo,
ik heb nu een code dat ik meerdere textbocen naar een txt bestand kan schrijven dat is gelukt maar nu wil ik ook wat anders,
ik wil namelijk dat hij bij het schrijven van een textbox er iets voor zet.
zoals txt file:
Naam : en dan hier de textbox waarde.

dit is mijn code:
Code:
Dim FactuurID As String = FactuurIDTextBox1.Text
        Dim anaam As String = NaamTextBox1.Text()
        Dim geboorte As String = AchterNaamTextBox1.Text()
        Dim man As String = ManCheckBox1.Checked()
        Dim vrouw As String = VrouwCheckBox1.Checked()
        Dim telefoon As String = TelefoonTextBox1.Text()
        Dim email As String = EmailTextBox1.Text()
        Dim straat As String = StraatTextBox1.Text()
        Dim postcode As String = PostcodeTextBox1.Text()
        Dim plaats As String = PlaatsTextBox1.Text()
        Dim betaald As String = BetaaldCheckBox.Checked()
        Dim nregel As String = ControlChars.NewLine
        My.Computer.FileSystem.WriteAllText(path, FactuurID & nregel & anaam & nregel & geboorte & nregel & man & nregel & vrouw & nregel & telefoon & nregel & straat & nregel & postcode & nregel & plaats & nregel & betaald, True)
 
wOW

Waarom doe je niet:

[CPP] Try
Dim dir As String = Environment.GetEnvironmentVariable(Map waar ding heen moet)
If IO.Directory.Exists(dir) = False Then IO.Directory.CreateDirectory(dir)
Dim Writer As New IO.StreamWriter(dir & "\" & "Filename"
Writer.WriteLine("First Name: " & Naam.Text)
Writer.WriteLine("Last Name: " & LastName.Text)
Writer.WriteLine("Address: " & Address.Text)
Writer.WriteLine("ZIP Code: " & ZIP.Text)
Writer.WriteLine("Telephone: " & Telephone.Text)
Writer.Close()[/CPP]

Dit dan maakt ie file in map

En dan doet ie eerste lijjn First Name: Naam.Text

Dit is veel handiger.

Zo is makkelijker :)


CopyRights by Joz1
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan