elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  validar si un registro existe en una BD
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: validar si un registro existe en una BD  (Leído 2,216 veces)
gregarr

Desconectado Desconectado

Mensajes: 1


Ver Perfil
validar si un registro existe en una BD
« en: 16 Noviembre 2022, 03:11 am »

Buenas estoy haciendo un sistema en visual basic.net 2019 con acces 2019.
el puto es que quiero momento deingresar un codigo en este caso de un cliente el sistema me indique si esta resistrado o no. el codigo es el siguiente;

Private Sub btguar_Click(sender As Object, e As EventArgs) Handles btguar.Click
        Dim conn As New OleDbConnection
        Dim instruccion As New OleDbCommand

        Try

            If Me.textnombre.Text = "" Then
                MsgBox("EL campo Nombre, no pueden estar en blanco", vbCritical, "ATENCION")
                Me.textnombre.Select()
            ElseIf Me.txtidentidad.Text = "" Then
                MsgBox("Los campos Cedula o RIF, no pueden estar en blanco", vbCritical, "ATENCION")
                Me.txtidentidad.Select()
            End If
       
        Catch ex As Exception
            'estableciendo conexion
            conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Goyo\source\repos\VEPROLIM\deter.accdb"
            conn.Open()
            'parametros a guardar
            instruccion = New OleDbCommand("insert into clientes(cedula,cliente,direccion,telefono)" &
                "values(txtidentidad,textnombre,textdirec,maxtelf)", conn)

            instruccion.Parameters.AddWithValue("@cedula", txtidentidad.Text)
            instruccion.Parameters.AddWithValue("@cliente", textnombre.Text)
            instruccion.Parameters.AddWithValue("@direcion", textdirec.Text)
            instruccion.Parameters.AddWithValue("@telefono", maxtelf.Text)

            instruccion.ExecuteNonQuery()
            MsgBox("Registro Guardado Correctamente", vbInformation, "Aviso")

            'MsgBox("Registro No se guardo", vbCritical, "Aviso")
        End Try
    End Sub

la idea es que realice la consulta y de no existir el registro se pueda guardar el mismo


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
validar si existe check
Desarrollo Web
kakashi20 0 1,662 Último mensaje 7 Marzo 2013, 16:33 pm
por kakashi20
validar si existe un registro
Java
ancestro 5 10,981 Último mensaje 28 Enero 2015, 01:46 am
por Usuario Invitado
MOVIDO: validar si existe un registro
Programación General
Eleкtro 0 2,066 Último mensaje 26 Enero 2015, 22:28 pm
por Eleкtro
Ayuda para validar si un dato existe o no
Programación C/C++
HarleyX9000 1 2,235 Último mensaje 19 Marzo 2015, 04:57 am
por milx86
validar registro de datagrid
.NET (C#, VB.NET, ASP)
SAGA-gl 2 2,834 Último mensaje 2 Junio 2015, 03:40 am
por nolasco281
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines