Line 1: #ExternalChecksum("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","49F65855604E9514A5986EAC66D4971A")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:2.0.50727.3662
Line 6: '
Line 7: ' Changes to this file may cause incorrect behavior and will be lost if
Line 8: ' the code is regenerated.
Line 9: ' </auto-generated>
Line 10: '------------------------------------------------------------------------------
Line 11:
Line 12: Option Strict Off
Line 13: Option Explicit On
Line 14:
Line 15: Imports Microsoft.VisualBasic
Line 16: Imports System
Line 17: Imports System.Collections
Line 18: Imports System.Collections.Specialized
Line 19: Imports System.Configuration
Line 20: Imports System.Text
Line 21: Imports System.Text.RegularExpressions
Line 22: Imports System.Web
Line 23: Imports System.Web.Caching
Line 24: Imports System.Web.Profile
Line 25: Imports System.Web.Security
Line 26: Imports System.Web.SessionState
Line 27: Imports System.Web.UI
Line 28: Imports System.Web.UI.HtmlControls
Line 29: Imports System.Web.UI.WebControls
Line 30: Imports System.Web.UI.WebControls.WebParts
Line 31:
Line 32: Namespace ASP
Line 33:
Line 34: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 35: Public Class noacceso_mail_aspx
Line 36: Inherits Global.Paginas_NoAcceso_Mail
Line 37: Implements System.Web.SessionState.IRequiresSessionState, System.Web.IHttpHandler
Line 38:
Line 39: Private Shared __initialized As Boolean
Line 40:
Line 41: Private Shared __stringResource As Object
Line 42:
Line 43: Private Shared __fileDependencies As Object
Line 44:
Line 45: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 46: Public Sub New()
Line 47: MyBase.New
Line 48: Dim dependencies() As String
Line 49: CType(Me,Global.Paginas_NoAcceso_Mail).AppRelativeVirtualPath = "~/NoAcceso_Mail.aspx"
Line 50: If (Global.ASP.noacceso_mail_aspx.__initialized = false) Then
Line 51: Global.ASP.noacceso_mail_aspx.__stringResource = Me.ReadStringResource
Line 52: dependencies = New String(0) {}
Line 53: dependencies(0) = "~/NoAcceso_Mail.aspx"
Line 54: Global.ASP.noacceso_mail_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 55: Global.ASP.noacceso_mail_aspx.__initialized = true
Line 56: End If
Line 57: Me.Server.ScriptTimeout = 30000000
Line 58: End Sub
Line 59:
Line 60: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 61: Get
Line 62: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 63: End Get
Line 64: End Property
Line 65:
Line 66: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 67: Get
Line 68: Return false
Line 69: End Get
Line 70: End Property
Line 71:
Line 72: Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Line 73: Get
Line 74: Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Line 75: End Get
Line 76: End Property
Line 77:
Line 78: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 79: Private Function __BuildControl__control3() As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 80: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 81:
Line 82: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",9)
Line 83: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlTitle
Line 84:
Line 85: #End ExternalSource
Line 86: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 87:
Line 88: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",9)
Line 89: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("ERROR"))
Line 90:
Line 91: #End ExternalSource
Line 92: Return __ctrl
Line 93: End Function
Line 94:
Line 95: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 96: Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlHead
Line 97: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlHead
Line 98:
Line 99: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",8)
Line 100: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlHead("head")
Line 101:
Line 102: #End ExternalSource
Line 103: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 104:
Line 105: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",8)
Line 106: __ctrl1 = Me.__BuildControl__control3
Line 107:
Line 108: #End ExternalSource
Line 109: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 110:
Line 111: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",8)
Line 112: __parser.AddParsedSubObject(__ctrl1)
Line 113:
Line 114: #End ExternalSource
Line 115:
Line 116: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",8)
Line 117: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <script type=""text/javascript"" language=""javascript"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" function noLeft"& _
Line 118: "Click() {"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" if (event.button==2) {"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" alert('You can NOT Right-Click on thi"& _
Line 119: "s page.')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" }"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" }"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" document.onmousedown=noLeftClick"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </script>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 120:
Line 121: #End ExternalSource
Line 122: Return __ctrl
Line 123: End Function
Line 124:
Line 125: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 126: Private Function __BuildControlImage1() As Global.System.Web.UI.WebControls.Image
Line 127: Dim __ctrl As Global.System.Web.UI.WebControls.Image
Line 128:
Line 129: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",25)
Line 130: __ctrl = New Global.System.Web.UI.WebControls.Image
Line 131:
Line 132: #End ExternalSource
Line 133: Me.Image1 = __ctrl
Line 134: __ctrl.ApplyStyleSheetSkin(Me)
Line 135:
Line 136: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",25)
Line 137: __ctrl.ID = "Image1"
Line 138:
Line 139: #End ExternalSource
Line 140:
Line 141: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",25)
Line 142: __ctrl.ImageUrl = "~/Paginas/Imagenes/Denegado.png"
Line 143:
Line 144: #End ExternalSource
Line 145: Return __ctrl
Line 146: End Function
Line 147:
Line 148: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 149: Private Function __BuildControlLabel3() As Global.System.Web.UI.WebControls.Label
Line 150: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 151:
Line 152: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 153: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 154:
Line 155: #End ExternalSource
Line 156: Me.Label3 = __ctrl
Line 157: __ctrl.ApplyStyleSheetSkin(Me)
Line 158:
Line 159: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 160: __ctrl.ID = "Label3"
Line 161:
Line 162: #End ExternalSource
Line 163:
Line 164: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 165: __ctrl.Font.Bold = true
Line 166:
Line 167: #End ExternalSource
Line 168:
Line 169: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 170: __ctrl.Font.Names = New String() {"Arial"}
Line 171:
Line 172: #End ExternalSource
Line 173:
Line 174: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 175: __ctrl.Font.Size = System.Web.UI.WebControls.FontUnit.Small
Line 176:
Line 177: #End ExternalSource
Line 178:
Line 179: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 180: __ctrl.ForeColor = CType(System.Drawing.Color.FromArgb(192, 0, 0),System.Drawing.Color)
Line 181:
Line 182: #End ExternalSource
Line 183:
Line 184: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 185: __ctrl.Text = "Acceso Restringido. Usted no tiene los permisos para ver esta página."
Line 186:
Line 187: #End ExternalSource
Line 188:
Line 189: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",28)
Line 190: __ctrl.Width = New System.Web.UI.WebControls.Unit(224, System.Web.UI.WebControls.UnitType.Pixel)
Line 191:
Line 192: #End ExternalSource
Line 193: Return __ctrl
Line 194: End Function
Line 195:
Line 196: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 197: Private Function __BuildControlform1() As Global.System.Web.UI.HtmlControls.HtmlForm
Line 198: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
Line 199:
Line 200: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 201: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm
Line 202:
Line 203: #End ExternalSource
Line 204: Me.form1 = __ctrl
Line 205:
Line 206: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 207: __ctrl.ID = "form1"
Line 208:
Line 209: #End ExternalSource
Line 210: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 211:
Line 212: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 213: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table style=""width: 181px"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 214: "<td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 215:
Line 216: #End ExternalSource
Line 217: Dim __ctrl1 As Global.System.Web.UI.WebControls.Image
Line 218:
Line 219: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 220: __ctrl1 = Me.__BuildControlImage1
Line 221:
Line 222: #End ExternalSource
Line 223:
Line 224: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 225: __parser.AddParsedSubObject(__ctrl1)
Line 226:
Line 227: #End ExternalSource
Line 228:
Line 229: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 230: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td style=""width: 218px"" align=""Center"">"& _
Line 231: ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 232:
Line 233: #End ExternalSource
Line 234: Dim __ctrl2 As Global.System.Web.UI.WebControls.Label
Line 235:
Line 236: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 237: __ctrl2 = Me.__BuildControlLabel3
Line 238:
Line 239: #End ExternalSource
Line 240:
Line 241: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 242: __parser.AddParsedSubObject(__ctrl2)
Line 243:
Line 244: #End ExternalSource
Line 245:
Line 246: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",20)
Line 247: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("<br /><br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a href=""http://www.biccorner.com.mx/portal"& _
Line 248: "/hgxpp001.aspx?2,8,108"" target=""_top""><img src=""Paginas/Imagenes/Login.gif"" bord"& _
Line 249: "er=""0""/></a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </"& _
Line 250: "div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 251:
Line 252: #End ExternalSource
Line 253: Return __ctrl
Line 254: End Function
Line 255:
Line 256: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 257: Private Sub __BuildControlTree(ByVal __ctrl As noacceso_mail_aspx)
Line 258:
Line 259: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 260: Me.InitializeCulture
Line 261:
Line 262: #End ExternalSource
Line 263: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 264:
Line 265: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 266: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<!DOCTYPE html PUBLIC ""-//W3C//DTD XHTML 1.0 Transitional//EN"" ""http://www.w3"& _
Line 267: ".org/TR/xhtml1/DTD/xhtml1-transitional.dtd"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<html xmlns=""http://www.w3.o"& _
Line 268: "rg/1999/xhtml"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 269:
Line 270: #End ExternalSource
Line 271: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlHead
Line 272:
Line 273: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 274: __ctrl1 = Me.__BuildControl__control2
Line 275:
Line 276: #End ExternalSource
Line 277:
Line 278: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 279: __parser.AddParsedSubObject(__ctrl1)
Line 280:
Line 281: #End ExternalSource
Line 282:
Line 283: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 284: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 285:
Line 286: #End ExternalSource
Line 287: Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 288:
Line 289: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 290: __ctrl2 = Me.__BuildControlform1
Line 291:
Line 292: #End ExternalSource
Line 293:
Line 294: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 295: __parser.AddParsedSubObject(__ctrl2)
Line 296:
Line 297: #End ExternalSource
Line 298:
Line 299: #ExternalSource("D:\HTTP\GXportal\webapp\biccorner_com_mx\www\SRM\NoAcceso_Mail.aspx",1)
Line 300: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</html>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 301:
Line 302: #End ExternalSource
Line 303: End Sub
Line 304:
Line 305: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 306: Protected Overrides Sub FrameworkInitialize()
Line 307: MyBase.FrameworkInitialize
Line 308: Me.SetStringResourcePointer(Global.ASP.noacceso_mail_aspx.__stringResource, 0)
Line 309: Me.__BuildControlTree(Me)
Line 310: Me.AddWrappedFileDependencies(Global.ASP.noacceso_mail_aspx.__fileDependencies)
Line 311: Me.Request.ValidateInput
Line 312: End Sub
Line 313:
Line 314: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 315: Public Overrides Function GetTypeHashCode() As Integer
Line 316: Return -1363815012
Line 317: End Function
Line 318:
Line 319: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 320: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 321: MyBase.ProcessRequest(context)
Line 322: End Sub
Line 323: End Class
Line 324: End Namespace
Line 325:
|