diff --git a/Ventas/RepComisionesSMS.aspx.vb b/Ventas/RepComisionesSMS.aspx.vb
index fcf4f8de3..c7d758c1b 100644
--- a/Ventas/RepComisionesSMS.aspx.vb
+++ b/Ventas/RepComisionesSMS.aspx.vb
@@ -24,8 +24,8 @@ Partial Class Ventas_RepComisionesSMS
 
             Dim FechaInicial As Date = New Date(10)
 
-            txtFechaI.Text = Now.FirstDayOfMonth.ToString("dd/MM/yyyy")
-            txtFechaF.Text = Now.ToString("dd/MM/yyyy")
+            txtFechaI.Text = NowADS().FirstDayOfMonth.ToString("dd/MM/yyyy")
+            txtFechaF.Text = NowADS().AddDays(2).ToShortDateString
             CargaCombos()
             CargaDatos()
         End If