SoloCodigo

Solo lo eh utuilizado con Acces espero y te sirva.

Hola , ya no funciona la web? quiero verla

El mismo codigo pero en este se pide ademas de usuario y contraseña El nombre de base de datos el nombre de la tabla.

Puedes utilizar el siguiente codigo:



Lo que se utiliza es la propiedad SelectionFormula y el evento RefreshReport
pero esto no quita la necedidad de crear un reporte para que funcione tienes que crear un reporte con el asistente ya sea uno que seleccione todos los datoa de la tabla y en base a los campos hacer tus filtros.


En el codigo anterior lo que hago es sacar la utilidad que va del mes actual.

{Utilidad.fecha} <----Es la tabla y el nombre del campo con el cual trabajar el filtro.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ds As New DataSet()
        Me.SqlDataAdapter1.Fill(ds, "Tabla")
        Me.DataGrid1.DataSource = ds
        Me.DataGrid1.DataMember = ds.Tables("Tabla").TableName
    End Sub

    Private Sub DataGrid1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGrid1.DoubleClick
        MsgBox("Gola")
    End Sub

Yo hice eso y si responde bien al evento, pero solo cuando se hace doble click en los margenes del datagrid no en las celdas.

DateInterval<---- Es que es lo que quieres sumar o restar dias, meses años, minutos segunfos etc.


DateInterval.Hour cambia day por hourss,

Es una Excepción que se inicia cuando se produce un error al intentar tener acceso a un archivo que no existe en el disco.
Es un problema con la ruta.

Lo puedes hacer en  IconMenu.VB

Private _TipoLetra As Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Donde declaras el tipo de letra de las opciones del menu.

Hay una forma de hacerlo en otra parte del codigo

 men = New IconMenuItem(Herramientas, "Arbol", ImageList1.Images(6), AddressOf Buscar)
        With men
            .ColorItemSeleccionado = Color.Aqua
            .ColorTextoSeleccionado = Color.Red
            .ColorGradiente1 = Color.Yellow
            .TipoLetra = New Font("Courier New", Form.DefaultFont.Size, FontStyle.Underline)
            .Add()
        End With

.TipoLetra es una propiedad que te ayuda a asignarle el tipo de letra al menu, lo que hace es asignar y/u obtener el valor de la variable _TipoLetra.

La diferencia es que en la primer forma que te doy lo toma como el default de tipo de letra que habra en el menu y en la segunda se asigna a una parte del menu expecxifica.

Prueba con este ortro codigo

        Dim ds1 As New DataSet
        Me.SqlDataAdapter1.Fill(ds1)
        Me.DataGrid1.DataSource = ds1.Tables("Products")
        Dim fecha As New DateTime
        fecha = ds1.Tables("Products").Rows(4).Item("LastUpdate")
        MsgBox(fecha)

El DataAdapter fue hecho con el asistente.

Cualquier duda ya sabes.

Puedes poner un par de ImputBox en el evento load del form principal y con esos hacer una consulta a la tabla donde estan las contraseñas y nombres de usuarios.

Si te regresa resultados le permites el acceso a la segunda parte del sistema y si no le mandas un mensaje de que no esta registrado o algo asi.

Falta algo de informacion,por ejemplo que tipo de campos insertas, donde y como los modificas para posteriormente actualizarlos?? y cosas como esas. Que tengas buen dia.