-- option strict on

2023-08-23 00:04:25 -07:00
parent 3bc4f72658
commit e5c000432f
28 changed files with 192 additions and 279 deletions
--- a/Ashx/E140.ashx
+++ b/Ashx/E140.ashx
@@ -132,9 +132,7 @@ Public Class E140 : Implements IHttpHandler, IRequiresSessionState
            Dim CorreoSupervisor As String = dRow("Correo").ToString()
            Dim Sucursal As String = dRow("Sucursal").ToString
            Dim Vendedor As String = dRow("Nombre").ToString()
-            Dim CveSubProyecto As Integer = dRow("CveSubProyecto").ToString()
-
-
+            Dim CveSubProyecto As Integer = dRow("CveSubProyecto").ToString.ToEntero
            CorreoSupervisor = "oscar.irigoyen@adssistemas.mx;rene.molina@adssistemas.mx"

            Dim ObjGen = New ClsVentas