Visual Basic.NET - No guardar datos repetidos

   
Vista:
Imágen de perfil de Maick

No guardar datos repetidos

Publicado por Maick (33 intervenciones) el 22/03/2017 17:37:13
Muy buen día a todos, estoy elaborando un programa con un botón Guardar y Abrir, ya los termine, el problema es que cuando guarde el contenido de 4 textbox en un txt, pero no quiero que se repita el contenido, ni que lo sobre escriba .

Adjunto el Código
1
2
3
4
5
6
7
8
9
10
11
12
13
'Boton Guardar
        If TextBox1.Text <> "" And TextBox2.Text <> "" And TextBox3.Text <> "" And TextBox4.Text <> "" Then
 
            Dim Lineadetexto As String = TextBox1.Text & ";" & TextBox2.Text & ";" & TextBox3.Text & ";" & TextBox4.Text & ";" & TextBox4.Text & vbCrLf
            My.Computer.FileSystem.WriteAllText(ruta, Lineadetexto, True)
            MessageBox.Show("datos almacenados")
            TextBox1.Text = ""
            TextBox2.Text = ""
            TextBox3.Text = ""
            TextBox4.Text = ""
        Else
            MsgBox("Es Ebligatorio llenar los campos")
        End If


1
2
3
4
5
6
7
8
9
10
11
12
13
Botón Abrir
        Dim FileReader As System.IO.StreamReader
        FileReader = My.Computer.FileSystem.OpenTextFileReader(ruta)
        Dim linea As String
        While (Not FileReader.EndOfStream)
            linea = FileReader.ReadLine()
            Dim Registro As String() = linea.Split(";")
            If Registro(0) = TextBox1.Text Then
                TextBox2.Text = Registro(1)
                TextBox3.Text = Registro(2)
                TextBox4.Text = Registro(3)
            End If
        End While

Espero me puedan alludar
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder