Añadir un label con el ID lblcount y en el load del formulario poner:

Dim conexion As System.Data.SqlClient.SqlConnection
Dim StrSql As System.Data.SqlClient.SqlCommand

conexion = New System.Data.SqlClient.SqlConnection("Server=nombreServidor;uid=USUARIO;pwd=PASSWORD;Database=baseDeDatos")

conexion.Open()
StrSql = New System.Data.SqlClient.SqlCommand("Select Count(*) from nombreTabla", conexion)
Me.lblcount.Text = "Hay " & StrSql.ExecuteScalar & " registros"
conexion.Close()

Regístrate y recibe un email semanal con los últimos trucos informáticos. Pulsa aquí!!

Este truco ha recibido 4 votaciones| Nota media: 6Selecciona tu Puntuación: