From bfc72d2c50b4717a01a1689a1a85513f615b05ae Mon Sep 17 00:00:00 2001
From: JORGE LUIS CAUDILLO ESPARZA <caudillo_90@hotmail.com>
Date: Wed, 1 Apr 2020 13:46:54 -0700
Subject: [PATCH]

---
 App_Code/ClsPaginas.vb |   6 ++++--
 Bin/ADSReportLib.dll   | Bin 7168 -> 7168 bytes
 Bin/ADSReportLib.pdb   | Bin 13824 -> 15872 bytes
 Inicio.aspx.vb         |   2 +-
 vwd.webinfo            |   2 ++
 5 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 2c4321a39..1a93bab94 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -5148,7 +5148,7 @@ Public Class ClsPaginas
         End With
         setup.SetCompatibilitySwitches({"NetFx40_LegacySecurityPolicy"})
         Dim _casPolicyEnabledDomain As AppDomain = AppDomain.CreateDomain("Full Trust", Nothing, setup)
-
+        Dim fllreport As ADSReportLib.FullTrustReportviewer = Nothing
         Try
             'Dim rvNextgenReport2 As WebReportviewer.FullTrustReportviewer = CType(_casPolicyEnabledDomain.CreateInstanceFromAndUnwrap(GetType(WebReportviewer.FullTrustReportviewer).Assembly.CodeBase, GetType(WebReportviewer.FullTrustReportviewer).FullName), WebReportviewer.FullTrustReportviewer)
             'rvNextgenReport2.Initialize(DisplayName, ReportPath, Visible, reportParam, reportRenderFormat, DeviceInfo, repMainContent, repSubContent)
@@ -5158,7 +5158,8 @@ Public Class ClsPaginas
             'Next
 
             'Return rvNextgenReport2.Render(reportRenderFormat, DeviceInfo)
-            Dim fllreport As ADSReportLib.FullTrustReportviewer = CType(_casPolicyEnabledDomain.CreateInstanceFromAndUnwrap(GetType(ADSReportLib.FullTrustReportviewer).Assembly.CodeBase, GetType(ADSReportLib.FullTrustReportviewer).FullName), ADSReportLib.FullTrustReportviewer)
+            fllreport = CType(_casPolicyEnabledDomain.CreateInstanceFromAndUnwrap(GetType(ADSReportLib.FullTrustReportviewer).Assembly.CodeBase, GetType(ADSReportLib.FullTrustReportviewer).FullName), ADSReportLib.FullTrustReportviewer)
+
             Dim bdir As String = AppDomain.CurrentDomain.BaseDirectory
             RutaReporte.Replace("/", "\")
             If Not RutaReporte.ToUpper().StartsWith(bdir.ToUpper()) Then
@@ -5186,6 +5187,7 @@ Public Class ClsPaginas
         Finally
             AppDomain.Unload(_casPolicyEnabledDomain)
         End Try
+        If fllreport IsNot Nothing Then fllreport.liberarecursos()
 
         sw.Stop()
         If sw.Elapsed.TotalSeconds > 10 Then
diff --git a/Bin/ADSReportLib.dll b/Bin/ADSReportLib.dll
index dc5473fe4b05279fe64764e6af16935627712ac5..3431176b1cadc49e9e7ee38c80977a5902b8d484 100644
GIT binary patch
delta 1435
zcmYjRZERCj7=GS!?>V<C+g*FRF8e6ZtwStZ;s(U6%A&}OTOe^T3t0@xAPbohryEOH
zrdx+d#0W|b8X1xd2^dK5BPAG#{^}1iVh9qaF~P+kL`gJ4;zu9`e9!5A*rv~Y-sgSp
zd%oVDTwAW~?bpTP^uae434g`G(;MjvO|(?*X#o<tPBiIWS}H1HdN++%-&_v+>0}g;
za8p3e2S|S!Yt`N2dkX9OohEuvXPs8xD{Vw*8Bp6ySPuP-h^-lH0K&kWypO>Y86&_Q
zT=IXF-=KsUh7hlWtTqG*M4F0Rf9$M_#F|}9*-0P@v2&3wbswf0-RVwe&bmNq97sx_
z*<;?bb7<g&?Zc*GcPY@s&s4StFEfuA{zSH`gP(8eI@wspgY(LYzp(C=ndpdAI3f&g
zp*6A`XZ3N}GO>~44P<bZ{&W<+R0SuD8rh~4TFJPR>{i&x7{(RX=oL7?i~ra1jO9NH
zqi=Exj*p+w$Jxs;%8ae{3s(!{j%rgrBA&_KW3Et-!b%=Y*+PwY&IxeR>4L&_VJ1<>
zdKgnS+s4BvoO3rZ7WAZwPb`(Y(9Sz*zRJ7Hcm{&Hle}i^t!n2f6TU7+m=THy-E}sH
zi*7Y39GZ{Dc_O8_IUk*nV;n{5i_Q}=O+J<tqtI{S0V>DxVpJJ&os}G}vf;Z(I1f<-
zSM@?KHE~ISd+IAbH^OP=0&lqj4$4Wu#kazA+*L>LQkpqS_=rzh;4dDt$O#2u_^j10
zTVCyzpj{GoiCJ1TV;E`12wE&=EUq><fi4@Yx7cg3k1>t`%U`m%k5S<;V+}?vpPa{P
z6~`pTT!T}N!8xncdWQE|-L=Z!DhZ-{+<v$4v}3Tqqf8LJua@vOw#!!Tl~qm$C*F}y
za_@iQ^080{_ZiVecRTABnAcGiAIJ~vA7jrc?8Xi2zkzkmA*5+Uy@x2BcaE~>b8#HE
z+4&)R_Ny~!VLguwU6JR}fb-4;q^szhy2PeZ-kjU`9p9mg%tqbPv!Q3pe!?)Wanl%l
zRIe_HdmbMRA*45#tf6fFSjk>jKE7*P|BLy0zh0C*Kd`lbsBfr$+sM%HpnfcJQs0O)
zM&=gCE00{i+i_%z{PiECQo149kQpsW62*fo1-)K8$h}4jeVG)Ls8aD@GY4UtW<3U(
zM3CEOT>B~5p(mpaTL&bkV_4wHU^Lhvf`Q-_Ckfw8lHfAz@;OWxQ@~b!{jg#+chnCh
z!F7(2&%>ApTVe=F2;Wb*Y#i`-5`K_7rM+NnY=@E7+cN7F|6>xti0%(QYg(M%^Ni_w
z?lvU&qMGJ=b2<iW=;`SBU`gf7u2&DOJ(WH1RCjGlN4_%_qOxoAm#BH`uHIZxOE>eQ
W6=}-*m3JHwS&@&{{6Pnsz5f6Q+5Qdy

delta 1391
zcmX|Be@I<*6#ty>z4!ZmWY_oZQ}L~5yf?M&HL*DbbrmHEQ*xwpI!4)MAj6D?&B2zi
z_gp%(B6Qyxxgp4AR%@e;7noKM%pg`#N~=GHpshuVq>M(mMs>d5N%!(T-_JScbI<qt
z&N=s{tI}1&gW_uO$jkSN(_2Q)wo;=a+Ti4u0Wp;jC2BWq5bt>EC>@FRZ-Ke$7zG^6
zt_OCy0I5VyrD_!4Q$TIBN~l@2Se1pMmjHWz6bSAwV!)cCSaV<2Ciw4HzgrDqL^j(v
zX;LB#(Nmxr><1~T2JP|caT_Q+0%SQrzK?lx&kLQ;?>nH6QIrLg@LJf?j7H`m&9}AG
z*YdhowL6>cPBIf~zknKbs>5B5#3`Y1FI79)IIFHXWvK?XcaX*_^rs~;Aum}$gq%_-
zQAt`IXSGBRV-WMU_UGU={u_T7UTye-D3va*p`HEn(3%S-&jRNOVoB=gUs6YZVlJ^B
zdKYPzKEuW)JZpKFwCW*oUFbl9QwK3@HmKqaB+l8p7^fNa^{7Dt-|-L%oI`k6bH115
zKaA%gs4=cZ$MVb7-}0XAvv!mu-cJ}GPC32E!q@*>Npf-Hj^+PVJV4o4S+i`bg00)e
zI)RwAl|neJx_yPIDG45fPq;aR5#|B|wt$6f60q^D&_nWrCHU0$ag;E@?G(7l2e`ut
zm$*NKFN}ZQaQFf!cZf%!oJ$^M3?j)GLYcv8gEbmcs5eHF!QBSi8FSHTc(=hJMu}0z
zbvSHz-x_AiT=b#a)_Bs=_?httpXR%a{}yNK!-9-s760;#-N2KU#%cDaR`HT7<|>vu
zl{^p+S+yK^#d!iTOxltksO4c=#jL%L{g;_XDW5wq$NFB@yo;k)GWsPnSg#{NUGhx?
zXvP|2&9pd!6;{5@njU!`N%m(@M)S@LiZEkcMk1fa<Tor5T$~jw<2%%lF4PT`4D3mM
ziUatO77fNp^EM1}`H9QF(b~o>lH4kSPhAW=MvrH129DX80k=S?i=hd%Gh7my4K05D
z^DnpSCVOf>T$($PP{ZM(>VtteQLfiQ-fmy6m+qqi*NF>?<;z^Jjg6oQvp)hS4lg~R
zRYT-;s^xG|s>9)M1b6uy@1WNyybkZM6^CobNpKogxopO?$YUu#{)S|4dersD!Fk5W
z<!$uBk_h|`gzLs^7Iygf5U!Vg%RlwvQ?1d8#UcMtf7@5-^p_+43y<tcg|7s+T2c*r
zrIAjpZ!&u{Nq$RWUbmX_rb@0B_dl)Q4IV?pxJniL4XlU&JDO{okB3`pKF+J#{?U8m
zuco?&&t*P{_{lr8_CeH79oIZQlE|a}%=Mfksm(dhW!$`5mYCR*39tK&MmGEY1NSio
AY5)KL

diff --git a/Bin/ADSReportLib.pdb b/Bin/ADSReportLib.pdb
index c7ff8b159b66081b09aaffef1b652234dda956ca..be65cba7149cc7f3ec73eae7b190d1df9c384c5a 100644
GIT binary patch
delta 1782
zcmZ{lUufG^6vxj^()5qSEo+x1{pC-S{z>DKG_9q!G<Gf4&Y4bwYjJZhoBk1{#bHNr
z1+kI!K^K%|XAf@3oIW|Mur@w86q&-r;a>J4^Us4qK?kB;8T#VC?@8{j|6sR0zt6qr
zoO|y5o%=gC+3D;nr&}BWB03F`W)y<<Z`88IYEi2NW%*kz+if;?AhK{&!TNra>-ve4
zXH%C(-WpCDZ36{wRn%V7v*sTB?47SqrGL2Z`&W;Q|F-<+*lSDui>fkZDaNE!!MW=%
zYelHMZ|#@zZx#QXNN}I4-sYPB{B~i&^_W$4@<*OMcz)-3x4FGEsra-J+3T>fEKbue
zj7`pDW+umHXO17^3w47|*}2)u;5x)_)E)GEU@hr9rU|s;e+t$V_ZbzQRqau}$pd}+
z0%wd?PZw5|R#Af4x99j0tj}X1Y3EBQJ}WVo`Hs=*NMf!R9%5yVd3zkML*s_#C1^h7
zSucBT=?MN!5vmX&RtWlDR-RF)S0D<1o!SN4r(s_5?<wm*Zy(?B@1FNkB~{TH#y23P
zEGaUxw*$JX5NZ2~vXa5aK{*m(wWdq6R@1F%fWQCoZ`KQ@;P2CnXhtV=C#D(KYy*cd
zK{n^4T~tkv&;UJ3gY+~VqQmqI9f1dFTbNoXLJv?6CFx=6rM>Gfm6SN_3mB0n5KXrK
zBq%vc>*x+dG*cknQ=ADH&Zo5ZK~P?1nBNT4#ukbnks|ZNC7xKNjlgpdNs&}GLUMc)
zaYUQKnxg#}!u(Ib$Q;tq4}<c3;9asc;8Cy%l$5oA&tfd88U+Wy42Z1I7&r%xgE<gc
z%)Sjyg6F{Jc&>i0it&~DluC11ur*kZt#(01AtxXgA)i2gg%D1&5yf><oe5R!zX(Md
z8XPx?QPvUWHKi}ITeAtiGL{n*2JsMPxIa|eJ*P+An(t{UJ?pkP*1WExT;Y7Eoo5>3
z{8PgYi?ZeWy#;^6m&zeYyb8GmSy}40sx!?O99wJp!{(7HKQ%ewL48&}-|Xi^*sT`1
zG930TqG%N*Iup_!B5Kx-cSX;a4TCR-E9#0P)2oXpuDy~rJ{6Adl=@r`(v2If#Znp4
zF4KH7+;IOis&m~VgX{1s#Vf5|j@0yWZ?vtDi{_Q`vM;``>PKD3X&b*7ADFMcCi^}n
zk77H3OqH6V>T9B(H5IhgwgSCb>a@)!g>4q~cH0na>v!P%wuw_PdhW5Hl!I9c+k@s{
z+qn9+Zj@o$xcIi(Vllk$#+|ldwBR#!V4~#pKQ!s3_>0yC@7Z{py7zBO;;vFTcD5VA
zEUrhwF-L(URzbJ;YH}^QA+>y<{XvIZY4UALJ-U|qkE^AQ8>+CgV|CLbpPu+1Vb2hw

delta 1419
zcmZ`(T}YEr7=F(-*Cws{vUH!{mu|V`Ryya3S@gF-)XJnx8bS77P!z3*vLJLp7exl@
z+l6+~FNBeS_H_}|MRZe<fmcRU7lJ_-{SiS0VLfO2CR@;v=RBV0Ip@6ReCK_aKAk?)
z6>w=p)CtH|Zg}l4#664EB7Pde@>|@q+idPP{<GT!+#V$ve^i=idU)qrXUD;=0YfjY
zvCrBOnCM^8b-(R!?CIc*n~_(o{he2b;se4NwPg0BsG-dKVRckYefH=5lu^NBkub+f
zJvO2C));$B6IRi}chv>xU#nM@%Iu;{ZzHld@Gh;9W155CmOB(R&n<$RgxjK?wPxih
zd9EF9ieGAVRl}z1$a68%egb!r*P>(lcqHiNFIo{V(;ez>gq7`bmNGro+S_@XUgsLY
zZiAR1-FEKNm%4O}27sebZt<AT>LDCWwu&redM9>p8yDxa3D-#o<AA_l3wKwPu&>g$
zHV$PCQMw7705^lzf}K=ME~*A<f!n}xzzgUky>FPe3~0z)M^GhqdrFi>tdy5q50=Mh
z;-j82k>v9pEx5t-HiF&o5Xp=Zo!rp}9iPvmDVyM~rgfP(Qa!=HJX(iT8)-vEy$`kB
zjGp^wE@=ILY@0Dxo+SyEkFW(i3%nKV2Y>!Dkq&@cF%E*afmeaIgK>V^0X_xZ3BCZ{
zMKmqli+^@Q=mYQJ>)w^Z&12q1k>J|7b!q_dV!(bt#vTNo0UwclMvu>-bYWQn35qXF
z(CHL=ePv3mISN9O>H%){l`V;zBVqE8$<IyxlpC9?yG=gB*L@KlkA(QEe>wtJ7$N@?
zQS=!0@K9V6J%KAc8Yt%nfrN7&`4#9C<9M)|13|Yq$7h1o<>!!Yg2K_TYz;&qbKZ!R
zp9Djy%*IK3G0|MpCU(|TO(o=E&b=|;VhJxXM07&19!ha4yxbTF9l@P=PIyi65i?~k
zS^02yRfjwZ5+F;mM>%C1?wZk$=Y)Senb<A=@nnkT)px<3NqCdhjrav-3T9q$7kILa
zWmcK3z>`^-%SiYIo*S>9SD=%gg)GFw^)p12-_=+3gmnE<s9ya4H!$*Dh!iV}H19^#
o_y_D-gHSdw-iBm-$*s$PQf^wb&?z&&1eiS(Zxceri~JFP0V=@XH~;_u

diff --git a/Inicio.aspx.vb b/Inicio.aspx.vb
index 5154c9604..a8cc8ee2e 100644
--- a/Inicio.aspx.vb
+++ b/Inicio.aspx.vb
@@ -55,7 +55,7 @@ Partial Class Inicio
 
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         If Not IsPostBack Then
-            'Dim obj As Object = GetType(HttpRuntime).GetProperty("CacheInternal", Reflection.BindingFlags.NonPublic Or Reflection.BindingFlags.[Static]).GetValue(Nothing, Nothing)
+            'Hola caudillo
             'Dim obj2 As Object() = CType(obj.[GetType]().GetField("_caches", Reflection.BindingFlags.NonPublic Or Reflection.BindingFlags.Instance).GetValue(obj), Object())
             If Not IsNothing(Request("logout")) AndAlso Request("logout").ToString() = "1" Then
                 Usuario.CerrarSession()
diff --git a/vwd.webinfo b/vwd.webinfo
index 6f1eb2f43..40d1fe36c 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -42,6 +42,8 @@
     
   
     
+  
+