Buenas tardes recurro a uds. para que me puedan ayudar con el siguiente problema.
Tengo una tabla que se llama ASISTENCIA, dentro de una Base de datos BDASISTENCIA en SQL Server
Como pudo hacer para primero al cargar el formulario carguen todos los datos en el ReportViewer y por otro lado quiero agregarle un filtro de hora, por decir que me filtre quienes llegaron después de las 8:00
La tabla Asistencia contiene las siguientes columnas: id, Apynombres, DNI, horaingreso, horasalida
He intentado hacerlo editando consultas con el dataset, pero funciona bien solo en el equipo servidor y los otros equipos me sale que no se pudo conectar con el servidor.
Gracias de antemano
Imports System.Data
Imports System.Data.SqlClient
Public Class frmgradoyseccion
Public cm As SqlConnection
Public CadenaConexion As String
Private Sub frmgradoyseccion_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: esta línea de código carga datos en la tabla 'AsistenciaDataSet.ASISTENCIA' Puede moverla o quitarla según sea necesario.
Me.ASISTENCIATableAdapter.Fill(Me.AsistenciaDataSet.ASISTENCIA)
Dim CadenaConexion As String
Try
cm = New SqlConnection
CadenaConexion = ("Data Source=EDUSERVER2; initial catalog=Asistencia; user id=Ricardo;password=Nevermind44.;")
cm.ConnectionString = CadenaConexion
cm.Open()
Mostrar()
Catch ex As Exception
MsgBox("No se puedo conectar a la base de datos")
End Try
Me.ReportViewer1.RefreshReport
End Sub
Private Sub Mostrar()
''CADENA MOSTAR base de DATOS
Dim oda As New SqlDataAdapter
Dim ods As New DataSet
Dim consulta As String
consulta = "select *FROM ASISTENCIA"
oda = New SqlDataAdapter(consulta, cm)
ods.Tables.Add("ASISTENCIA")
oda.Fill(ods.Tables("ASISTENCIA"))
ASISTENCIADataGridView.DataSource = ods.Tables("ASISTENCIA")
End Sub
Por otra parte la carga de datos al informe la hago desde un dataset