Hola buenos dias
tengo un problema necesito validar un rango de fechas de la siquiente manera:
en la base de datos guardo hora inicial y hora Final , y que esta se pueda listar en las fechas respectivas cada una debe aparecer al lado la actividad a desarrollar
Dim Tabla As New Table
Tabla.CssClass = "Table"
Dim tr As TableRow
Dim td As TableCell
For i As Integer = 0 To 49
Dim Hora= Inicio.AddMinutes(30 * i).TimeOfDay
tr = New TableRow
td = New TableCell
If i > 0 Then
ColumnaH = Today.Add(Hora).AddMinutes(-30)
td.Controls.Add(New LiteralControl(String.Format("<strong>{0}</strong> ", Format(ColumnaH, "hh:mm tt"))))
td.Width = 100
End If
Dim query = (From f In Lis Where Hora >= CType(f.HORACALINI, TimeSpan) And CType(f.HORACALFIN, TimeSpan) <=
Hora Select f).ToList
If Lis.Count > 0 Then
Dim Control As New HyperLink
Control.ID = "Datosd" & CType(f.FECHACALINI, Date).Year & CType(f.FECHACALINI_FLUJOTRABAJO, Date).Month & CType(f.FECHACALINI,
Date).Day & f.FLUJOTRABAJOID
Control.NavigateUrl = "../../Formularios/Actividades.aspx?Formulario=Actividades&ID=" & f.FLUJOTRABAJOID
Control.Text = f.NOMACTIV & "-" & f.ASUNTO
td.Controls.Add(New LiteralControl(String.Format("<strong>{0} - {1}</strong> ", f.HORACALINI, f.HORACALFIN)))
td.Controls.Add(Control)
td.Controls.Add(New LiteralControl("<br>"))
else
td = New TableCell
td.Text = String.Empty
End If
Next
esta validacion esta mal
Dim query = (From f In Lis Where Hora >= CType(f.HORACALINI, TimeSpan) And CType(f.HORACALFIN, TimeSpan) <=Hora Select
f).ToList
he probado muchas otras maneras y no se como solucionarlo
