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

Empresas Zona Horaria

Browse Source
This commit is contained in:
rakcsle
2023-10-09 11:54:42 -07:00
parent 2df7c3976c
commit f43b7759a8
649 changed files with 11445 additions and 11105 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Ventas/RepVentasMensuales.aspx.vb
View File

@@ -22,7 +22,7 @@ Partial Class RepVentasMensuales
End If
End Sub
Private Sub InicializarFiltros()
Dim dNow As Date = Now
Dim dNow As Date = NowADS()
TxtFechaF.Text = dNow.ToString("dd/MM/yyyy")
dNow = dNow.AddDays(-30)
TxtFechaI.Text = dNow.ToString("dd/MM/yyyy")
@@ -79,7 +79,7 @@ Partial Class RepVentasMensuales
End Sub
Public Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
GV.ExportToExcel("Evaluaciones de Proveedores" & Now.ToShortDateString & ".xls")
GV.ExportToExcel("Evaluaciones de Proveedores" & NowADS().ToShortDateString & ".xls")
End Sub
Protected Sub GV_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GV.RowDataBound