none
DUDA SOBRE TABLAS ACCES.mdb

    Pregunta

  • Buenas tardes y un cordial saludo, mi duda es sobre que código puedo utilizar para contar cuantos registros tengo en una tabla de access.mdb actualmente y posteriormente mostrar el numero de registros en un "Label1", pero si no se encuentra ninguno que se muestre solo "0" de antemano les agradeceria mucho..

    desde México un gran saludo..


    miércoles, 15 de marzo de 2017 18:59

Respuestas

  • Christian Medellin,

    Utiliza la función COUNT()

    SELECT COUNT(*) FROM NombreTabla

    En tu aplicación recuperas el valor de la consulta a través del método ExecuteScalar()

    Dim cmd As New OleDbCommand("Consulta sql", cn)
    
    cn.Open()
    
    Label1.Text = cmd.ExecuteScalar().ToString()

    La función COUNT() retorna 0 si no encuentra filas en la tabla.


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    miércoles, 15 de marzo de 2017 19:43
  • Christian Medellin,

    No entiendo la duda, ¿conoces ADO .Net?, si no tienes claro que es o para que sirve es bueno que te pongas al tanto -por lo menos en lo básico- porque será una restricción para realizar otras tarea de acceso a datos:

    Try
    	Using cn As New OleDbConnection("Cadena de conexión")
    		Dim ConsultaSQL As String = "SELECT COUNT(*) FROM NombreTabla"
    
    		Dim cmd As New OleDbCommand(ConsultaSQL, cn) 
    
    		cn.Open() 'Abre la conexión
    		Label1.Text cmd.ExecuteScalar().ToString() 'Ejecutar la query y asigna el resultado
    	End Using
    Catch ex As Exception
    	MessageBox.Show(ex.Message)
    End Try


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    jueves, 16 de marzo de 2017 15:47

Todas las respuestas

  • Christian Medellin,

    Utiliza la función COUNT()

    SELECT COUNT(*) FROM NombreTabla

    En tu aplicación recuperas el valor de la consulta a través del método ExecuteScalar()

    Dim cmd As New OleDbCommand("Consulta sql", cn)
    
    cn.Open()
    
    Label1.Text = cmd.ExecuteScalar().ToString()

    La función COUNT() retorna 0 si no encuentra filas en la tabla.


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    miércoles, 15 de marzo de 2017 19:43
  • Willams Morales

    hola gracias por contestar verifique el codigo pero como se puede realizar esa función 

    miércoles, 15 de marzo de 2017 20:05
  • Christian Medellin,

    No entiendo la duda, ¿conoces ADO .Net?, si no tienes claro que es o para que sirve es bueno que te pongas al tanto -por lo menos en lo básico- porque será una restricción para realizar otras tarea de acceso a datos:

    Try
    	Using cn As New OleDbConnection("Cadena de conexión")
    		Dim ConsultaSQL As String = "SELECT COUNT(*) FROM NombreTabla"
    
    		Dim cmd As New OleDbCommand(ConsultaSQL, cn) 
    
    		cn.Open() 'Abre la conexión
    		Label1.Text cmd.ExecuteScalar().ToString() 'Ejecutar la query y asigna el resultado
    	End Using
    Catch ex As Exception
    	MessageBox.Show(ex.Message)
    End Try


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    jueves, 16 de marzo de 2017 15:47
  • Willams Morales

    aaaa ok gracias de echo yo hace mucho que deje de usar ado pero si lo se manejar, pero como en vb.net 2015 ya no se usa ya no bi tanto al caso seguir estudiando pero muchas gracias probe el codigo y correctamente funciono.

    un gran saludo de mi parte 

     
    jueves, 16 de marzo de 2017 17:29