Line 1: #ExternalChecksum("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","30ADBEEB77EA99E61E654627574F91C5FCB18199")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:4.0.30319.42000
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.Generic
Line 19: Imports System.Collections.Specialized
Line 20: Imports System.ComponentModel.DataAnnotations
Line 21: Imports System.Configuration
Line 22: Imports System.Linq
Line 23: Imports System.Text
Line 24: Imports System.Text.RegularExpressions
Line 25: Imports System.Web
Line 26: Imports System.Web.Caching
Line 27: Imports System.Web.DynamicData
Line 28: Imports System.Web.Profile
Line 29: Imports System.Web.Security
Line 30: Imports System.Web.SessionState
Line 31: Imports System.Web.UI
Line 32: Imports System.Web.UI.HtmlControls
Line 33: Imports System.Web.UI.WebControls
Line 34: Imports System.Web.UI.WebControls.Expressions
Line 35: Imports System.Web.UI.WebControls.WebParts
Line 36: Imports System.Xml.Linq
Line 37:
Line 38:
Line 39: Partial Public Class _Default
Line 40: Implements System.Web.SessionState.IRequiresSessionState
Line 41:
Line 42:
Line 43: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",49)
Line 44: Protected WithEvents LabelAliasuser As Global.System.Web.UI.WebControls.Label
Line 45:
Line 46: #End ExternalSource
Line 47:
Line 48:
Line 49: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",54)
Line 50: Protected WithEvents Label1 As Global.System.Web.UI.WebControls.Label
Line 51:
Line 52: #End ExternalSource
Line 53:
Line 54:
Line 55: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",56)
Line 56: Protected WithEvents HyperNuevaGaleria As Global.System.Web.UI.WebControls.HyperLink
Line 57:
Line 58: #End ExternalSource
Line 59:
Line 60:
Line 61: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 62: Protected WithEvents DropDownGalerias As Global.System.Web.UI.WebControls.DropDownList
Line 63:
Line 64: #End ExternalSource
Line 65:
Line 66:
Line 67: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",65)
Line 68: Protected WithEvents FileUpload1 As Global.System.Web.UI.WebControls.FileUpload
Line 69:
Line 70: #End ExternalSource
Line 71:
Line 72:
Line 73: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 74: Protected WithEvents UploadButton As Global.System.Web.UI.WebControls.Button
Line 75:
Line 76: #End ExternalSource
Line 77:
Line 78:
Line 79: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",83)
Line 80: Protected WithEvents UploadStatusLabel As Global.System.Web.UI.WebControls.Label
Line 81:
Line 82: #End ExternalSource
Line 83:
Line 84:
Line 85: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",88)
Line 86: Protected WithEvents ImageSubida As Global.System.Web.UI.WebControls.Image
Line 87:
Line 88: #End ExternalSource
Line 89:
Line 90:
Line 91: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",94)
Line 92: Protected WithEvents TextBoxFileName As Global.System.Web.UI.WebControls.TextBox
Line 93:
Line 94: #End ExternalSource
Line 95:
Line 96:
Line 97: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",101)
Line 98: Protected WithEvents BtnGuardar As Global.System.Web.UI.WebControls.Button
Line 99:
Line 100: #End ExternalSource
Line 101:
Line 102:
Line 103: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",106)
Line 104: Protected WithEvents HyperLink1 As Global.System.Web.UI.WebControls.HyperLink
Line 105:
Line 106: #End ExternalSource
Line 107:
Line 108:
Line 109: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 110: Protected WithEvents form1 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 111:
Line 112: #End ExternalSource
Line 113:
Line 114: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 115: Get
Line 116: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 117: End Get
Line 118: End Property
Line 119:
Line 120: Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Line 121: Get
Line 122: Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Line 123: End Get
Line 124: End Property
Line 125: End Class
Line 126:
Line 127: Namespace ASP
Line 128:
Line 129: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 130: Public Class fotosup_default_aspx
Line 131: Inherits Global._Default
Line 132: Implements System.Web.IHttpHandler
Line 133:
Line 134: Private Shared __initialized As Boolean
Line 135:
Line 136: Private Shared __stringResource As Object
Line 137:
Line 138: Private Shared __fileDependencies As Object
Line 139:
Line 140: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 141: Public Sub New()
Line 142: MyBase.New
Line 143: Dim dependencies() As String
Line 144:
Line 145: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx.vb",912304)
Line 146: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/fotosup/Default.aspx"
Line 147:
Line 148: #End ExternalSource
Line 149: If (Global.ASP.fotosup_default_aspx.__initialized = false) Then
Line 150: Global.ASP.fotosup_default_aspx.__stringResource = Me.ReadStringResource
Line 151: dependencies = New String(1) {}
Line 152: dependencies(0) = "~/fotosup/Default.aspx"
Line 153: dependencies(1) = "~/fotosup/Default.aspx.vb"
Line 154: Global.ASP.fotosup_default_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 155: Global.ASP.fotosup_default_aspx.__initialized = true
Line 156: End If
Line 157: Me.Server.ScriptTimeout = 30000000
Line 158: End Sub
Line 159:
Line 160: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 161: Get
Line 162: Return false
Line 163: End Get
Line 164: End Property
Line 165:
Line 166: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 167: Private Function __BuildControl__control3() As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 168: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 169:
Line 170: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",6)
Line 171: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Line 172:
Line 173: #End ExternalSource
Line 174:
Line 175: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",6)
Line 176: __ctrl.Name = "viewport"
Line 177:
Line 178: #End ExternalSource
Line 179:
Line 180: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",6)
Line 181: __ctrl.Content = "width=device-width, initial-scale=1.0"
Line 182:
Line 183: #End ExternalSource
Line 184: Return __ctrl
Line 185: End Function
Line 186:
Line 187: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 188: Private Function __BuildControl__control4() As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 189: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 190:
Line 191: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",7)
Line 192: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Line 193:
Line 194: #End ExternalSource
Line 195:
Line 196: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",7)
Line 197: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "Content-Language")
Line 198:
Line 199: #End ExternalSource
Line 200:
Line 201: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",7)
Line 202: __ctrl.Content = "es"
Line 203:
Line 204: #End ExternalSource
Line 205: Return __ctrl
Line 206: End Function
Line 207:
Line 208: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 209: Private Function __BuildControl__control5() As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 210: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 211:
Line 212: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",8)
Line 213: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlMeta()
Line 214:
Line 215: #End ExternalSource
Line 216:
Line 217: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",8)
Line 218: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("http-equiv", "Content-Type")
Line 219:
Line 220: #End ExternalSource
Line 221:
Line 222: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",8)
Line 223: __ctrl.Content = "text/html; charset=utf-8"
Line 224:
Line 225: #End ExternalSource
Line 226: Return __ctrl
Line 227: End Function
Line 228:
Line 229: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 230: Private Function __BuildControl__control6() As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 231: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 232:
Line 233: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",9)
Line 234: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlTitle()
Line 235:
Line 236: #End ExternalSource
Line 237: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 238:
Line 239: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",9)
Line 240: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("Subir fotos a manbos.com"))
Line 241:
Line 242: #End ExternalSource
Line 243: Return __ctrl
Line 244: End Function
Line 245:
Line 246: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 247: Private Function __BuildControl__control7() As Global.System.Web.UI.HtmlControls.HtmlLink
Line 248: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlLink
Line 249:
Line 250: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",10)
Line 251: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlLink()
Line 252:
Line 253: #End ExternalSource
Line 254:
Line 255: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",10)
Line 256: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("rel", "stylesheet")
Line 257:
Line 258: #End ExternalSource
Line 259:
Line 260: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",10)
Line 261: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("type", "text/css")
Line 262:
Line 263: #End ExternalSource
Line 264:
Line 265: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",10)
Line 266: __ctrl.Href = "css/menucfa.css"
Line 267:
Line 268: #End ExternalSource
Line 269: Return __ctrl
Line 270: End Function
Line 271:
Line 272: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 273: Private Function __BuildControl__control8() As Global.System.Web.UI.HtmlControls.HtmlLink
Line 274: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlLink
Line 275:
Line 276: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",11)
Line 277: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlLink()
Line 278:
Line 279: #End ExternalSource
Line 280:
Line 281: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",11)
Line 282: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("rel", "stylesheet")
Line 283:
Line 284: #End ExternalSource
Line 285:
Line 286: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",11)
Line 287: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("type", "text/css")
Line 288:
Line 289: #End ExternalSource
Line 290:
Line 291: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",11)
Line 292: __ctrl.Href = "css/cssnuevo.css"
Line 293:
Line 294: #End ExternalSource
Line 295: Return __ctrl
Line 296: End Function
Line 297:
Line 298: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 299: Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlHead
Line 300: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlHead
Line 301:
Line 302: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 303: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlHead("head")
Line 304:
Line 305: #End ExternalSource
Line 306: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 307:
Line 308: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 309: __ctrl1 = Me.__BuildControl__control3
Line 310:
Line 311: #End ExternalSource
Line 312: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 313:
Line 314: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 315: __parser.AddParsedSubObject(__ctrl1)
Line 316:
Line 317: #End ExternalSource
Line 318: Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 319:
Line 320: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 321: __ctrl2 = Me.__BuildControl__control4
Line 322:
Line 323: #End ExternalSource
Line 324:
Line 325: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 326: __parser.AddParsedSubObject(__ctrl2)
Line 327:
Line 328: #End ExternalSource
Line 329: Dim __ctrl3 As Global.System.Web.UI.HtmlControls.HtmlMeta
Line 330:
Line 331: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 332: __ctrl3 = Me.__BuildControl__control5
Line 333:
Line 334: #End ExternalSource
Line 335:
Line 336: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 337: __parser.AddParsedSubObject(__ctrl3)
Line 338:
Line 339: #End ExternalSource
Line 340: Dim __ctrl4 As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 341:
Line 342: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 343: __ctrl4 = Me.__BuildControl__control6
Line 344:
Line 345: #End ExternalSource
Line 346:
Line 347: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 348: __parser.AddParsedSubObject(__ctrl4)
Line 349:
Line 350: #End ExternalSource
Line 351: Dim __ctrl5 As Global.System.Web.UI.HtmlControls.HtmlLink
Line 352:
Line 353: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 354: __ctrl5 = Me.__BuildControl__control7
Line 355:
Line 356: #End ExternalSource
Line 357:
Line 358: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 359: __parser.AddParsedSubObject(__ctrl5)
Line 360:
Line 361: #End ExternalSource
Line 362: Dim __ctrl6 As Global.System.Web.UI.HtmlControls.HtmlLink
Line 363:
Line 364: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 365: __ctrl6 = Me.__BuildControl__control8
Line 366:
Line 367: #End ExternalSource
Line 368:
Line 369: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 370: __parser.AddParsedSubObject(__ctrl6)
Line 371:
Line 372: #End ExternalSource
Line 373:
Line 374: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",5)
Line 375: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(22703, 615, true))
Line 376:
Line 377: #End ExternalSource
Line 378: Return __ctrl
Line 379: End Function
Line 380:
Line 381: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 382: Private Function __BuildControlLabelAliasuser() As Global.System.Web.UI.WebControls.Label
Line 383: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 384:
Line 385: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",49)
Line 386: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 387:
Line 388: #End ExternalSource
Line 389: Me.LabelAliasuser = __ctrl
Line 390: __ctrl.ApplyStyleSheetSkin(Me)
Line 391:
Line 392: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",49)
Line 393: __ctrl.ID = "LabelAliasuser"
Line 394:
Line 395: #End ExternalSource
Line 396:
Line 397: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",49)
Line 398: __ctrl.Text = ""
Line 399:
Line 400: #End ExternalSource
Line 401: Return __ctrl
Line 402: End Function
Line 403:
Line 404: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 405: Private Function __BuildControlLabel1() As Global.System.Web.UI.WebControls.Label
Line 406: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 407:
Line 408: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",54)
Line 409: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 410:
Line 411: #End ExternalSource
Line 412: Me.Label1 = __ctrl
Line 413: __ctrl.ApplyStyleSheetSkin(Me)
Line 414:
Line 415: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",54)
Line 416: __ctrl.ID = "Label1"
Line 417:
Line 418: #End ExternalSource
Line 419:
Line 420: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",54)
Line 421: __ctrl.Font.Size = Global.System.Web.UI.WebControls.FontUnit.Large
Line 422:
Line 423: #End ExternalSource
Line 424:
Line 425: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",54)
Line 426: __ctrl.ForeColor = CType(Global.System.Drawing.Color.FromArgb(204, 51, 0),System.Drawing.Color)
Line 427:
Line 428: #End ExternalSource
Line 429: Return __ctrl
Line 430: End Function
Line 431:
Line 432: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 433: Private Function __BuildControlHyperNuevaGaleria() As Global.System.Web.UI.WebControls.HyperLink
Line 434: Dim __ctrl As Global.System.Web.UI.WebControls.HyperLink
Line 435:
Line 436: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",56)
Line 437: __ctrl = New Global.System.Web.UI.WebControls.HyperLink()
Line 438:
Line 439: #End ExternalSource
Line 440: Me.HyperNuevaGaleria = __ctrl
Line 441: __ctrl.ApplyStyleSheetSkin(Me)
Line 442:
Line 443: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",56)
Line 444: __ctrl.ID = "HyperNuevaGaleria"
Line 445:
Line 446: #End ExternalSource
Line 447:
Line 448: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",56)
Line 449: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("class", "MedioFont")
Line 450:
Line 451: #End ExternalSource
Line 452: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 453:
Line 454: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",56)
Line 455: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("Crear nueva galería"))
Line 456:
Line 457: #End ExternalSource
Line 458: Return __ctrl
Line 459: End Function
Line 460:
Line 461: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 462: Private Function __BuildControlDropDownGalerias() As Global.System.Web.UI.WebControls.DropDownList
Line 463: Dim __ctrl As Global.System.Web.UI.WebControls.DropDownList
Line 464:
Line 465: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 466: __ctrl = New Global.System.Web.UI.WebControls.DropDownList()
Line 467:
Line 468: #End ExternalSource
Line 469: Me.DropDownGalerias = __ctrl
Line 470: __ctrl.ApplyStyleSheetSkin(Me)
Line 471:
Line 472: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 473: __ctrl.ID = "DropDownGalerias"
Line 474:
Line 475: #End ExternalSource
Line 476:
Line 477: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 478: __ctrl.AutoPostBack = false
Line 479:
Line 480: #End ExternalSource
Line 481:
Line 482: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 483: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("class", "MedioFont")
Line 484:
Line 485: #End ExternalSource
Line 486:
Line 487: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",60)
Line 488: __ctrl.Width = New System.Web.UI.WebControls.Unit(300R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 489:
Line 490: #End ExternalSource
Line 491: Return __ctrl
Line 492: End Function
Line 493:
Line 494: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 495: Private Function __BuildControlFileUpload1() As Global.System.Web.UI.WebControls.FileUpload
Line 496: Dim __ctrl As Global.System.Web.UI.WebControls.FileUpload
Line 497:
Line 498: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",65)
Line 499: __ctrl = New Global.System.Web.UI.WebControls.FileUpload()
Line 500:
Line 501: #End ExternalSource
Line 502: Me.FileUpload1 = __ctrl
Line 503: __ctrl.ApplyStyleSheetSkin(Me)
Line 504:
Line 505: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",65)
Line 506: __ctrl.ID = "FileUpload1"
Line 507:
Line 508: #End ExternalSource
Line 509:
Line 510: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",65)
Line 511: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("class", "MedioFont")
Line 512:
Line 513: #End ExternalSource
Line 514: Return __ctrl
Line 515: End Function
Line 516:
Line 517: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 518: Private Function __BuildControlUploadButton() As Global.System.Web.UI.WebControls.Button
Line 519: Dim __ctrl As Global.System.Web.UI.WebControls.Button
Line 520:
Line 521: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 522: __ctrl = New Global.System.Web.UI.WebControls.Button()
Line 523:
Line 524: #End ExternalSource
Line 525: Me.UploadButton = __ctrl
Line 526: __ctrl.ApplyStyleSheetSkin(Me)
Line 527:
Line 528: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 529: __ctrl.ID = "UploadButton"
Line 530:
Line 531: #End ExternalSource
Line 532:
Line 533: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 534: __ctrl.Text = " Subir Fichero de Foto "
Line 535:
Line 536: #End ExternalSource
Line 537:
Line 538: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 539: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("class", "MedioFont")
Line 540:
Line 541: #End ExternalSource
Line 542:
Line 543: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",73)
Line 544: AddHandler __ctrl.Click, AddressOf Me.UploadButton_Click
Line 545:
Line 546: #End ExternalSource
Line 547: Return __ctrl
Line 548: End Function
Line 549:
Line 550: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 551: Private Function __BuildControlUploadStatusLabel() As Global.System.Web.UI.WebControls.Label
Line 552: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 553:
Line 554: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",83)
Line 555: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 556:
Line 557: #End ExternalSource
Line 558: Me.UploadStatusLabel = __ctrl
Line 559: __ctrl.ApplyStyleSheetSkin(Me)
Line 560:
Line 561: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",83)
Line 562: __ctrl.ID = "UploadStatusLabel"
Line 563:
Line 564: #End ExternalSource
Line 565:
Line 566: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",83)
Line 567: __ctrl.ForeColor = CType(Global.System.Drawing.Color.FromArgb(204, 51, 0),System.Drawing.Color)
Line 568:
Line 569: #End ExternalSource
Line 570: Return __ctrl
Line 571: End Function
Line 572:
Line 573: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 574: Private Function __BuildControlImageSubida() As Global.System.Web.UI.WebControls.Image
Line 575: Dim __ctrl As Global.System.Web.UI.WebControls.Image
Line 576:
Line 577: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",88)
Line 578: __ctrl = New Global.System.Web.UI.WebControls.Image()
Line 579:
Line 580: #End ExternalSource
Line 581: Me.ImageSubida = __ctrl
Line 582: __ctrl.ApplyStyleSheetSkin(Me)
Line 583:
Line 584: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",88)
Line 585: __ctrl.ID = "ImageSubida"
Line 586:
Line 587: #End ExternalSource
Line 588:
Line 589: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",88)
Line 590: __ctrl.Width = New System.Web.UI.WebControls.Unit(350R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 591:
Line 592: #End ExternalSource
Line 593: Return __ctrl
Line 594: End Function
Line 595:
Line 596: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 597: Private Function __BuildControlTextBoxFileName() As Global.System.Web.UI.WebControls.TextBox
Line 598: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 599:
Line 600: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",94)
Line 601: __ctrl = New Global.System.Web.UI.WebControls.TextBox()
Line 602:
Line 603: #End ExternalSource
Line 604: Me.TextBoxFileName = __ctrl
Line 605: __ctrl.ApplyStyleSheetSkin(Me)
Line 606:
Line 607: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",94)
Line 608: __ctrl.ID = "TextBoxFileName"
Line 609:
Line 610: #End ExternalSource
Line 611: Return __ctrl
Line 612: End Function
Line 613:
Line 614: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 615: Private Function __BuildControlBtnGuardar() As Global.System.Web.UI.WebControls.Button
Line 616: Dim __ctrl As Global.System.Web.UI.WebControls.Button
Line 617:
Line 618: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",101)
Line 619: __ctrl = New Global.System.Web.UI.WebControls.Button()
Line 620:
Line 621: #End ExternalSource
Line 622: Me.BtnGuardar = __ctrl
Line 623: __ctrl.ApplyStyleSheetSkin(Me)
Line 624:
Line 625: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",101)
Line 626: __ctrl.ID = "BtnGuardar"
Line 627:
Line 628: #End ExternalSource
Line 629:
Line 630: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",101)
Line 631: __ctrl.Text = "Guardar"
Line 632:
Line 633: #End ExternalSource
Line 634:
Line 635: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",101)
Line 636: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("class", "MedioFont ")
Line 637:
Line 638: #End ExternalSource
Line 639: Return __ctrl
Line 640: End Function
Line 641:
Line 642: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 643: Private Function __BuildControlHyperLink1() As Global.System.Web.UI.WebControls.HyperLink
Line 644: Dim __ctrl As Global.System.Web.UI.WebControls.HyperLink
Line 645:
Line 646: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",106)
Line 647: __ctrl = New Global.System.Web.UI.WebControls.HyperLink()
Line 648:
Line 649: #End ExternalSource
Line 650: Me.HyperLink1 = __ctrl
Line 651: __ctrl.ApplyStyleSheetSkin(Me)
Line 652:
Line 653: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",106)
Line 654: __ctrl.ID = "HyperLink1"
Line 655:
Line 656: #End ExternalSource
Line 657: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 658:
Line 659: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",106)
Line 660: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("Ver fotos subidas pendientes de publicar"))
Line 661:
Line 662: #End ExternalSource
Line 663: Return __ctrl
Line 664: End Function
Line 665:
Line 666: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 667: Private Function __BuildControlform1() As Global.System.Web.UI.HtmlControls.HtmlForm
Line 668: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
Line 669:
Line 670: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 671: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm()
Line 672:
Line 673: #End ExternalSource
Line 674: Me.form1 = __ctrl
Line 675:
Line 676: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 677: __ctrl.ID = "form1"
Line 678:
Line 679: #End ExternalSource
Line 680: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 681:
Line 682: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 683: __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)&" <div>"))
Line 684:
Line 685: #End ExternalSource
Line 686: Dim __ctrl1 As Global.System.Web.UI.WebControls.Label
Line 687:
Line 688: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 689: __ctrl1 = Me.__BuildControlLabel1
Line 690:
Line 691: #End ExternalSource
Line 692:
Line 693: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 694: __parser.AddParsedSubObject(__ctrl1)
Line 695:
Line 696: #End ExternalSource
Line 697:
Line 698: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 699: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br/> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 700:
Line 701: #End ExternalSource
Line 702: Dim __ctrl2 As Global.System.Web.UI.WebControls.HyperLink
Line 703:
Line 704: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 705: __ctrl2 = Me.__BuildControlHyperNuevaGaleria
Line 706:
Line 707: #End ExternalSource
Line 708:
Line 709: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 710: __parser.AddParsedSubObject(__ctrl2)
Line 711:
Line 712: #End ExternalSource
Line 713:
Line 714: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 715: __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)&" <br/><br/>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Selecciona galería:<br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 716:
Line 717: #End ExternalSource
Line 718: Dim __ctrl3 As Global.System.Web.UI.WebControls.DropDownList
Line 719:
Line 720: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 721: __ctrl3 = Me.__BuildControlDropDownGalerias
Line 722:
Line 723: #End ExternalSource
Line 724:
Line 725: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 726: __parser.AddParsedSubObject(__ctrl3)
Line 727:
Line 728: #End ExternalSource
Line 729:
Line 730: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 731: __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)&" <h3>Selecciona un fichero JPG para subir la foto a la web</h3>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 732: " <h4 class=""pError800"">Tamaño máximo admitido 10 MB</h4>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 733:
Line 734: #End ExternalSource
Line 735: Dim __ctrl4 As Global.System.Web.UI.WebControls.FileUpload
Line 736:
Line 737: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 738: __ctrl4 = Me.__BuildControlFileUpload1
Line 739:
Line 740: #End ExternalSource
Line 741:
Line 742: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 743: __parser.AddParsedSubObject(__ctrl4)
Line 744:
Line 745: #End ExternalSource
Line 746:
Line 747: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 748: __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)&" <br/><br/>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 749:
Line 750: #End ExternalSource
Line 751: Dim __ctrl5 As Global.System.Web.UI.WebControls.Button
Line 752:
Line 753: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 754: __ctrl5 = Me.__BuildControlUploadButton
Line 755:
Line 756: #End ExternalSource
Line 757:
Line 758: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 759: __parser.AddParsedSubObject(__ctrl5)
Line 760:
Line 761: #End ExternalSource
Line 762:
Line 763: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 764: __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)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br /><br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 765:
Line 766: #End ExternalSource
Line 767: Dim __ctrl6 As Global.System.Web.UI.WebControls.Label
Line 768:
Line 769: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 770: __ctrl6 = Me.__BuildControlUploadStatusLabel
Line 771:
Line 772: #End ExternalSource
Line 773:
Line 774: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 775: __parser.AddParsedSubObject(__ctrl6)
Line 776:
Line 777: #End ExternalSource
Line 778:
Line 779: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 780: __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)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 781:
Line 782: #End ExternalSource
Line 783: Dim __ctrl7 As Global.System.Web.UI.WebControls.Image
Line 784:
Line 785: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 786: __ctrl7 = Me.__BuildControlImageSubida
Line 787:
Line 788: #End ExternalSource
Line 789:
Line 790: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 791: __parser.AddParsedSubObject(__ctrl7)
Line 792:
Line 793: #End ExternalSource
Line 794:
Line 795: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 796: __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)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" File Name<br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 797: " "))
Line 798:
Line 799: #End ExternalSource
Line 800: Dim __ctrl8 As Global.System.Web.UI.WebControls.TextBox
Line 801:
Line 802: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 803: __ctrl8 = Me.__BuildControlTextBoxFileName
Line 804:
Line 805: #End ExternalSource
Line 806:
Line 807: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 808: __parser.AddParsedSubObject(__ctrl8)
Line 809:
Line 810: #End ExternalSource
Line 811:
Line 812: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 813: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 814: ""))
Line 815:
Line 816: #End ExternalSource
Line 817: Dim __ctrl9 As Global.System.Web.UI.WebControls.Button
Line 818:
Line 819: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 820: __ctrl9 = Me.__BuildControlBtnGuardar
Line 821:
Line 822: #End ExternalSource
Line 823:
Line 824: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 825: __parser.AddParsedSubObject(__ctrl9)
Line 826:
Line 827: #End ExternalSource
Line 828:
Line 829: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 830: __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)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 831:
Line 832: #End ExternalSource
Line 833: Dim __ctrl10 As Global.System.Web.UI.WebControls.HyperLink
Line 834:
Line 835: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 836: __ctrl10 = Me.__BuildControlHyperLink1
Line 837:
Line 838: #End ExternalSource
Line 839:
Line 840: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 841: __parser.AddParsedSubObject(__ctrl10)
Line 842:
Line 843: #End ExternalSource
Line 844:
Line 845: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",52)
Line 846: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(23318, 717, false))
Line 847:
Line 848: #End ExternalSource
Line 849: Return __ctrl
Line 850: End Function
Line 851:
Line 852: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 853: Private Sub __BuildControlTree(ByVal __ctrl As fotosup_default_aspx)
Line 854:
Line 855: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 856: Me.InitializeCulture
Line 857:
Line 858: #End ExternalSource
Line 859: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlHead
Line 860:
Line 861: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 862: __ctrl1 = Me.__BuildControl__control2
Line 863:
Line 864: #End ExternalSource
Line 865: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 866:
Line 867: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 868: __parser.AddParsedSubObject(__ctrl1)
Line 869:
Line 870: #End ExternalSource
Line 871: Dim __ctrl2 As Global.System.Web.UI.WebControls.Label
Line 872:
Line 873: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 874: __ctrl2 = Me.__BuildControlLabelAliasuser
Line 875:
Line 876: #End ExternalSource
Line 877:
Line 878: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 879: __parser.AddParsedSubObject(__ctrl2)
Line 880:
Line 881: #End ExternalSource
Line 882: Dim __ctrl3 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 883:
Line 884: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 885: __ctrl3 = Me.__BuildControlform1
Line 886:
Line 887: #End ExternalSource
Line 888:
Line 889: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",1)
Line 890: __parser.AddParsedSubObject(__ctrl3)
Line 891:
Line 892: #End ExternalSource
Line 893: __ctrl.SetRenderMethodDelegate(AddressOf Me.__Render__control1)
Line 894: End Sub
Line 895:
Line 896: Private Sub __Render__control1(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 897: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<!DOCTYPE html>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<html>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 898: parameterContainer.Controls(0).RenderControl(__w)
Line 899: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<div id=""contenedor"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 900:
Line 901: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",41)
Line 902:
Line 903: Response.WriteFile("topmenu.txt")
Line 904:
Line 905:
Line 906: #End ExternalSource
Line 907: __w.Write(""&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)&" <div id=""textobody"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <h2>")
Line 908: parameterContainer.Controls(1).RenderControl(__w)
Line 909: __w.Write("</h2>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 910: parameterContainer.Controls(2).RenderControl(__w)
Line 911: Me.WriteUTF8ResourceString(__w, 24035, 524, false)
Line 912:
Line 913: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx",150)
Line 914: __w.Write(Year(Now))
Line 915:
Line 916:
Line 917: #End ExternalSource
Line 918: __w.Write(" MANBOS</span>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<br/><br/>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</div>"&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)&" </div>"&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)&"</body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</html>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 919: End Sub
Line 920:
Line 921:
Line 922: #ExternalSource("C:\Inetpub\vhosts\39422693.servicio-online.net\manbos.com\fotosup\Default.aspx.vb",912304)
Line 923: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 924: Protected Overrides Sub FrameworkInitialize()
Line 925: MyBase.FrameworkInitialize
Line 926: Me.SetStringResourcePointer(Global.ASP.fotosup_default_aspx.__stringResource, 0)
Line 927: Me.__BuildControlTree(Me)
Line 928: Me.AddWrappedFileDependencies(Global.ASP.fotosup_default_aspx.__fileDependencies)
Line 929: Me.Request.ValidateInput
Line 930: End Sub
Line 931:
Line 932: #End ExternalSource
Line 933:
Line 934: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 935: Public Overrides Function GetTypeHashCode() As Integer
Line 936: Return -1963665870
Line 937: End Function
Line 938:
Line 939: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 940: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 941: MyBase.ProcessRequest(context)
Line 942: End Sub
Line 943: End Class
Line 944: End Namespace
Line 945:
|