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

 

 


Tema destacado: Sigue las noticias más importantes de seguridad informática en el Twitter! de elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Detectar copia en tabla access
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Detectar copia en tabla access  (Leído 2,335 veces)
PETTETE

Desconectado Desconectado

Mensajes: 127


Ver Perfil
Detectar copia en tabla access
« en: 8 Agosto 2017, 12:11 pm »

Hola buenas,
estoy intentando hacer un código peor no me sale..
Quiero hacer un código que detecte duplicidades en los códigos de centro de una tabla access.

He conseguido leer toda la columna de los códigos pero no se como hacer que detecte las duplicidades.

Os comparto el código par aque le echeis un vistazo y me orienteis en lo que teng que hacer.

Código:
Module Module1

 

    Sub Main()

        Dim stn As OleDb.OleDbConnection ' conector

        Dim cmd As OleDb.OleDbCommand ' escritor

        Dim lector As OleDb.OleDbDataReader ' lector

 

 

        stn = New OleDb.OleDbConnection ' nuevo conector

        stn.ConnectionString = ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\PEPE\Desktop\centros_correcciones.accdb") ' conexion

        stn.Open() ' abrir conexion

 

        cmd = New OleDb.OleDbCommand ' nuevo escritor

        cmd.Connection = stn ' escritor conectado con conector

 

 

        cmd.CommandText = "select Código_centro FROM Hoja1"

 

 

        lector = cmd.ExecuteReader ' lector conectado con lector del escritor

        Do While lector.Read

 

            Console.WriteLine("{0}   ", lector("Código_centro"))

 

        Loop

        Console.ReadLine()

 

        lector.Close()

        Console.WriteLine("{0} filas modificadas", cmd.ExecuteNonQuery)

        Console.ReadLine()

 

 

 

        stn.Close()

    End Sub

 

End Module


En línea

UN SALUDO DE VUESTRO AMIGO Y VECINO,
PETETE;)
PETTETE

Desconectado Desconectado

Mensajes: 127


Ver Perfil
Re: Detectar copia en tabla access
« Respuesta #1 en: 17 Agosto 2017, 12:42 pm »

Hola buenas,
He conseguido seleccionar la fila duplicada con un datagridview.
La cosa es que solo selecciono la fila con la fecha actual.. y me gustaía eliminar la fila con la fecha antigua..

¿algún consejo de como puedo hacerlo?

Aquí os dejo el código para que le echeis un vistazo..

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

        Dim cnn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\PEPE\Desktop\centrosNavarra_correcciones.accdb")

        ' CREADA CONEXION CNN

        ' Dim da As New OleDbDataAdapter("select Código_centro, count(Código_Centro) from Hoja1  group by Código_Centro having(count(Código_Centro) >1) ", cnn)

        '  Dim da As New OleDbDataAdapter("select Código_centro from Hoja1", cnn)

        Dim da As New OleDbDataAdapter("select * from Hoja1", cnn)

 

        'CREADO ADAPTER DA, RECUPERA DATOS DEL SELECT DE LA CONEXION CNN

 

        ' EN CASO DE NO FUNCIONAR ESTE SELECT UTILIZAR EL SIMPLE CON EL FILTRO WHERE

        Dim ds As New DataSet

 

        da.Fill(ds)

 

        DataGridView1.DataSource = ds.Tables(0)

 

 

        Dim buscar As Integer = 19500101

 

        Dim numero As Integer = 1

        For Each fila As DataGridViewRow In DataGridView1.Rows

            numero += 1

            If fila.Cells("F-EFECT").Value > buscar Then

 

                fila.Selected = True

            End If

 

        Next

 

 

    End Sub

End Class


En línea

UN SALUDO DE VUESTRO AMIGO Y VECINO,
PETETE;)
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Elemento de un ListBox a tabla en Access
Programación Visual Basic
InGuS 6 11,886 Último mensaje 12 Mayo 2005, 21:05 pm
por InGuS
Desplegar Una Tabla De Access 2003 en un combobox
Programación Visual Basic
gabrielk 4 3,133 Último mensaje 30 Marzo 2006, 03:35 am
por NightZpy
VB .Net y Access, Ordenar columnas de tabla.
.NET (C#, VB.NET, ASP)
1mpuls0 0 3,268 Último mensaje 21 Marzo 2014, 20:32 pm
por 1mpuls0
Extraer Tabla de particiones de una copia de seguridad
Seguridad
cixert 3 2,412 Último mensaje 19 Enero 2015, 15:07 pm
por cixert
Manejar una tabla Access en C sharp
.NET (C#, VB.NET, ASP)
tetano 1 1,860 Último mensaje 21 Julio 2015, 03:47 am
por sqln00b
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines