AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cambio en foramto de excel

Browse Source
This commit is contained in:
HECTOR RODRIGUEZ
2021-07-12 17:29:33 -07:00
parent 321644b829
commit 6635f845bb
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Contabilidad/RepGastosCC.aspx.vb
View File

@@ -145,7 +145,10 @@ Partial Class RepGastosCC
End Sub
Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
GvDatos.ExportToExcelG("ReporteGastos" & Now.ToShortDateString & ".xlsx")
Dim StrFiltro As New StringBuilder
If txtFechaI.Text <> "" Then StrFiltro.AppendFormat(" Fecha Inicio: {0}", txtFechaI.Text)
If txtFechaF.Text <> "" Then StrFiltro.AppendFormat(" Fecha Fin: {0}", txtFechaF.Text)
GvDatos.ExportToExcelG("ReporteGastos" & Now.ToShortDateString, "Gastos Acumulados", UsuarioActual, StrFiltro.ToString, 100, 200)
End Sub
' Note, it is important to override the form verification in order to successfully call a GridView1.RenderControl method.
Public Overrides Sub VerifyRenderingInServerForm(control As Control)