Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Visual Basic.NET » Msgbox si en mi base de datos (Acces) Esta vacio

Visual Basic.NET - Msgbox si en mi base de datos (Acces) Esta vacio

Volver
Nuevo Tema
<<>>
 
Vista:
Imágen de perfil de Gerber
Val: 38
Ha disminuido 1 puesto en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Msgbox si en mi base de datos (Acces) Esta vacio

Publicado por Gerber (19 intervenciones) el 07/02/2017 07:59:15
Buena noche.

Necesito de su apoyo, como hago para mostrar un msgbox si mi base de datos (acces) no contiene nada (Esta vacia),

Gracias por su apoyo.

Saludos.
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
Imágen de perfil de Diego
Val: 605
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Msgbox si en mi base de datos (Acces) Esta vacio

Publicado por Diego (190 intervenciones) el 07/02/2017 18:06:04
Hola Gerber, suponiendo que recuperas los datos en una consulta contra tu base, en principio no sería la base de datos vacia, sino una tabla o un conjunto de registros, asi que con el miembro COUNT del objeto ROWS de tu datatable y un condicional podrías lograr tu cometido. Te paso un ejemplo:

1
2
3
4
5
6
7
8
9
10
11
private conexion as new oledbconnection([parametros de conexion])
private da as new oledbdataadapter("SELECT * from tabla_datos", conexion)
private datos as new datatable
 
 
da.fill(datos)
 
if datos.rows.count = 0
    msgbox("La tabla de datos está vacía!!!!", vbexclamation, "Epa!!!")
    exit sub
endif

Bueno, muy burdamente, eso debería funcionarte.
Saludos y +bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Diego
Val: 605
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Msgbox si en mi base de datos (Acces) Esta vacio

Publicado por Diego (190 intervenciones) el 07/02/2017 18:13:52
Otra opción que tenés es utilizar el ExcecuteScalar del objeto oledbcommand. Con una consulta del tipo COUNT(*) en SQL y eso devolvería el conteo de registros que cumplen con la instruccion SELECT.

1
2
3
4
5
6
7
8
dim conexion as new oledbconection([parametros de conexion])
dim cmd as new oledbcommand("SELECT COUNT(*) from tabla_datos", conexion)
 
conexion.open
if cmd.ExcecuteScalar = 0 then
    msgbox ("Sin registros", vbexclamation, "Nada que mostrar")
endif
conexion.close

Eso debería funcionar tambien.
Saludos y +bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar