cambio en log

App_Code/ClsPaginas.vb

@@ -986,13 +986,6 @@ Public Class ClsPaginas
                 Dim P As New ClsSubProyectos
                 If P.GetSubProyectos(CveEmpresa:=CveEmpresa) Then Application(AppNombre) = P.DtResultados
                 P.Dispose()
-
-                Dim msg As String = "aqui no se carga subproyectos"
-                If Request IsNot Nothing Then
-                    msg = msg & Request.ServerVariables("URL")
-                End If
-                msg.GuardaLog()
-
             End If
 
             If CveProyecto <> -1 OrElse CveSubProyecto <> -1 OrElse CveEmpresa <> -1 OrElse Estatus <> -1 Then