Visual Basic.NET - AYUDA DB ACCESS...!!!!!

   
Vista:

AYUDA DB ACCESS...!!!!!

Publicado por Felix (23 intervenciones) el 08/02/2009 18:29:56
Una vez más heme aquí recurriendo a vosotros... Hermanos estoy desarrollando una aplicación donde debo llevar Control de pagos y mensualidades, No obstante he creado 3 tablas una que me muestra la fecha de pago, una que me muestra cuanto pago y una que me muestra la fecha de vencimiento... las tablas estan estructuradas así(ojo todas por igual)

Cedula_id
Enero
Febrero
Marzo
... (hasta diciembre)

Trato de crear un control de Control de acceso, donde me muestra si el usuario está al Día, entonces se me ocurrió agregar un Label que me diga el Mes en que estamos, en forma númerica, y es aquí donde se me enrreda el mecate... éste es el codigo que he desarrollado...

Try
If e.KeyChar = ControlChars.Cr Then

cn.Open()
If Label2.Text = 2 Then
Dim leer As New OleDb.OleDbCommand("Select Febrero FROM tb1 where Cedula = '" & txtcedula.Text & "'", cn)
Dim oleer As OleDb.OleDbDataReader
oleer = leer.ExecuteReader
oleer.Read()
If oleer.HasRows = True Then
mes = oleer("Febrero").ToString
txtm.Text = mes
End If
If mes = "" Then
Dim leer1 As New OleDb.OleDbCommand("Select Enero FROM tb1 where Cedula = '" & txtcedula.Text & "'", cn)
Dim oleer1 As OleDb.OleDbDataReader
oleer1 = leer1.ExecuteReader
oleer1.Read()
If oleer1.HasRows = True Then
mes = oleer1("Enero").ToString
txtm.Text = mes
End If
End If
e.Handled = True
End If
End If

Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "PRUEBA")
Finally
cn.Close()
End Try

Funcionamiento: El label le indica al sistema que estamos en el mes "2"(febrero) el sistema se dirige a buscar en febrero si no consigue nada, busca en enero... Mi problema está en que, si estamos en el mes 12 el Codigo será extremadamente largo... y siento que me ahogo en un vaso con agua... Que me Sugieren?? mi Logica esta errada? hay una forma de hacerlo más sencilla??? lo que necesito practicamente es que me lea por columnas los registros... Muchas Gracias Hermanos Míos...
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
información
Otras secciones de LWP con contenido de Visual Basic.NET
- Código fuente de Visual Basic.NET
- Cursos de Visual Basic.NET
- Temas de Visual Basic.NET
- Chat de Visual Basic.NET
información
Códigos de Visual Basic.NET
- Grid
- Comprimir
- Código Morse

RE:AYUDA DB ACCESS...!!!!!

Publicado por like (20 intervenciones) el 09/02/2009 16:33:08
El campo es Cedula o Cedula_iD?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:AYUDA DB ACCESS...!!!!!

Publicado por Felix (23 intervenciones) el 09/02/2009 18:17:46
El campo es Cedula hermano, pero para la pregunta le coloque el 'ID' para que uds me captaran sin mucha explicación que es la Clave Principal... me Explico? pero Realmente es el Campo es Cedula...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar