Estoy creando un formulario en cual genera un reporte de las horas realizadas dentro de un rango de fechas... cosa que ya hice, pero no con el formato deseado...
Este es el codigo que uso para la sumatoria de horas
Sub horas_realizadas()
Try
Dim consulta As String
Dim Fi As String = Reporte.DtpInicio.Value.ToString("yyyy-MM-dd")
Dim Ff As String = Reporte.DtpFinal.Value.ToString("yyyy-MM-dd")
consulta = "SELECT DATE_FORMAT(fecha, '%d/%m/%Y'),DATE_FORMAT(hora_entrada,'%r'),DATE_FORMAT(hora_salida,'%r'), IF(DATE_FORMAT(fecha,'%W')='Sunday',SEC_TO_TIME(SUM(TIMESTAMPDIFF(MINUTE , asistencia.hora_entrada, asistencia.hora_salida ))*120),SEC_TO_TIME(SUM(TIMESTAMPDIFF(MINUTE , asistencia.hora_entrada, asistencia.hora_salida ))*60)) AS horas_realizadas FROM asistencia where matricula = '" & Reporte.matricula.Text & "' AND fecha BETWEEN '" & Fi & "' AND '" & Ff & "' GROUP BY fecha asc"
adaptador = New MySqlDataAdapter(consulta, Con2)
datos = New DataSet
adaptador.Fill(datos, "asistencia")
Dim horas As TimeSpan
For Each row As DataRow In datos.Tables("asistencia").Rows
horas += (row.Item("horas_realizadas"))
Next
datos.Tables("asistencia").Rows.Add("Total de horas:", " ", " ", horas)
Reporte.txtTotal.Text = Convert.ToString(horas)
Reporte.DataGridView1.DataSource = datos
Reporte.DataGridView1.DataMember = "asistencia"
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Y como resultado sale esto:
No esta mal el resultado, solo que no es el formato buscado ya traté de cambiar el formato del tiempo de la consulta como lo hice en esta Pregunta anterior pero no me funciona.
El formato deseado es 45
De antemano gracias