none
Formato de Fecha Dataset RRS feed

  • Pregunta

  • Saludos, estoy trabajando en un reporte que genera el listado de los asuetos por año, la consulta se genera en sql (unicamente la fecha sin horas), se traslada a un dataset en visual basic, que al hacer una "preview data" lo muestra sin las horas, pero al convertirlo a excel muestra el formato de la fecha con horas, y no necesito que muestre las horas. 

    Gracias por su atención y apoyo


    Jeanifer Taracena

    miércoles, 18 de diciembre de 2019 17:59

Todas las respuestas

  • Hola   JeanyTC

     

    Gracias por levantar tu consulta en los foros de MSDN. Con respecto a la misma,  te  sugiero realizar lo siguiente:

     

    •  Necesitamos que nos compartas el código o fragmento de código que estas desarrollando ya que es muy importante para que la comunidad de foros de MSDN pueda asesorarte de manera correcta. 

     

     

    Gracias por usar los foros de MSDN.

     

    Pablo Rubio

     

     ____

     

    Por favor recuerde "Marcar como respuesta" las respuestas que hayan resuelto su problema, es una forma común de reconocer a aquellos que han ayudado, y hace que sea más fácil para los otros visitantes encontrar la solución más tarde. 

     

    Microsoft ofrece este servicio de forma gratuita, con la finalidad de ayudar a los usuarios y la ampliación de la base de datos de conocimientos relacionados con los productos y tecnologías de Microsoft.  

     

    Este contenido es proporcionado "tal cual" y no implica ninguna responsabilidad de parte de Microsoft.

     

     

    miércoles, 18 de diciembre de 2019 18:51
  • Muchas gracias....

    El script que genera los datos es este:

    SELECT CONVERT(DATE,FECHA,1) as Fecha,
    DESCRIPCION AS [Feriado y/o Asueto]
    FROM RHTC_FERIADO_OFICIAL
    WHERE YEAR(FECHA) = 2011
    AND COD_ESTATUS='AC'
    ORDER BY Fecha

    Y en la aplicación es este:

    Protected Sub btnGenerar_Click(sender As Object, e As EventArgs) Handles btnGenerar.Click
            Dim taasuetos As New DS_RH_GA_REPORTETableAdapters.taAsuetosTableAdapter
            Dim dtasuetos As DS_RH_GA_REPORTE.taAsuetosDataTable
            Dim Titulo As String = "Listado de Feriados y/o Asuetos"
            Dim subTitulo As String = "Correspondientes al Año" + ddlAnios.SelectedValue

            Try
                dtasuetos = taasuetos.ObtieneAsuetos(ddlAnios.SelectedValue, "AsuetosFeriados.aspx", Me.Usuario)

                If dtasuetos.Rows.Count > 0 Then
                    convert_to_Excel.export(dtasuetos, Titulo, subTitulo)
                Else
                    wucCuadroMensaje.mostrar("No existen registros para el año seleccionado.")
                    mvAsuetosFeriados.SetActiveView(vMensaje)
                End If
            Catch ex As Exception
                If ex.Message <> "Subproceso anulado." Then
                    ErrorBLL.reportaError(Me.CodPersona, Me.Pagina, ex, "btnGenerar_Click")
                End If
            End Try

        End Sub

    Gracias por tu ayuda


    Jeanifer Taracena

    • Propuesto como respuesta Pablo Rubio miércoles, 18 de diciembre de 2019 21:51
    miércoles, 18 de diciembre de 2019 20:33