otro commit para no errarle

Bancos/IE.aspx.vb

@@ -1103,6 +1103,7 @@ Partial Class Bancos_IE
                 If (Not VerificaComplementos(True)) And UsuarioActual.TienePermisoProceso(99) And ObjIE.CveEstatusIE <> 2 Then
                     BtnEditar.Visible = True
                     PermisoComplementoVigente = True
+
                 Else
                     BtnEditar.Visible = True
                 End If

General/SaldosIniciales.aspx.vb

@@ -27,12 +27,11 @@ Partial Class General_SaldosIniciales
 
     Private Sub CargarArchivo(Ruta As String, FileName As String, Tipo As String)
         Dim dt As New DataTable
-        Dim Conexion As Odbc.OdbcConnection = Nothing
+        ' Conexion As Odbc.OdbcConnection = Nothing
         Dim ErrorArchivo = False
         Dim ErrorExcel = False
 
         dt = ReadExcelFile(Ruta + FileName, True)
-
         'Dim strConnString As String = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" + Ruta + FileName + ";Extended Properties=""Excel 12.0 Xml;HDR=YES;IMEX=1;"""
         'Dim objDbFactory As Common.DbProviderFactory = Common.DbProviderFactories.GetFactory("System.Data.OleDb")
         'Dim objDbAdapter As Common.DbDataAdapter = objDbFactory.CreateDataAdapter()