Line 1: #ExternalChecksum("C:\WWW\tcr\wwwroot\visitsbook.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","A4F4DC524A18B16DC205014CBFF658D3B0BCCF94")
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 ASP
Line 16: Imports Microsoft.VisualBasic
Line 17: Imports System
Line 18: Imports System.Collections
Line 19: Imports System.Collections.Generic
Line 20: Imports System.Collections.Specialized
Line 21: Imports System.ComponentModel.DataAnnotations
Line 22: Imports System.Configuration
Line 23: Imports System.Linq
Line 24: Imports System.Text
Line 25: Imports System.Text.RegularExpressions
Line 26: Imports System.Web
Line 27: Imports System.Web.Caching
Line 28: Imports System.Web.DynamicData
Line 29: Imports System.Web.Profile
Line 30: Imports System.Web.Security
Line 31: Imports System.Web.SessionState
Line 32: Imports System.Web.UI
Line 33: Imports System.Web.UI.HtmlControls
Line 34: Imports System.Web.UI.WebControls
Line 35: Imports System.Web.UI.WebControls.Expressions
Line 36: Imports System.Web.UI.WebControls.WebParts
Line 37: Imports System.Xml.Linq
Line 38:
Line 39:
Line 40: Partial Public Class visitsbook
Line 41: Implements System.Web.SessionState.IRequiresSessionState
Line 42:
Line 43:
Line 44: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 45: Protected WithEvents Panel2 As Global.System.Web.UI.WebControls.Panel
Line 46:
Line 47: #End ExternalSource
Line 48:
Line 49:
Line 50: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 51: Protected WithEvents pnlMessage As Global.System.Web.UI.WebControls.Panel
Line 52:
Line 53: #End ExternalSource
Line 54:
Line 55:
Line 56: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 57: Protected WithEvents txtComment As Global.System.Web.UI.WebControls.TextBox
Line 58:
Line 59: #End ExternalSource
Line 60:
Line 61:
Line 62: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",16)
Line 63: Protected WithEvents txbName As Global.System.Web.UI.WebControls.TextBox
Line 64:
Line 65: #End ExternalSource
Line 66:
Line 67:
Line 68: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",17)
Line 69: Protected WithEvents ddlPais As Global.System.Web.UI.WebControls.DropDownList
Line 70:
Line 71: #End ExternalSource
Line 72:
Line 73:
Line 74: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 75: Protected WithEvents Panel1 As Global.System.Web.UI.WebControls.Panel
Line 76:
Line 77: #End ExternalSource
Line 78:
Line 79:
Line 80: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 81: Protected WithEvents rptVisits As Global.System.Web.UI.WebControls.Repeater
Line 82:
Line 83: #End ExternalSource
Line 84:
Line 85:
Line 86: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 87: Protected WithEvents Panel3 As Global.System.Web.UI.WebControls.Panel
Line 88:
Line 89: #End ExternalSource
Line 90:
Line 91: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 92: Get
Line 93: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 94: End Get
Line 95: End Property
Line 96:
Line 97: Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Line 98: Get
Line 99: Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Line 100: End Get
Line 101: End Property
Line 102: End Class
Line 103:
Line 104: Namespace ASP
Line 105:
Line 106: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 107: Public Class visitsbook_aspx
Line 108: Inherits Global.visitsbook
Line 109: Implements System.Web.IHttpHandler
Line 110:
Line 111: Private Shared __initialized As Boolean
Line 112:
Line 113: Private Shared __fileDependencies As Object
Line 114:
Line 115: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 116: Public Sub New()
Line 117: MyBase.New
Line 118: Dim dependencies() As String
Line 119:
Line 120: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx.vb",912304)
Line 121: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/visitsbook.aspx"
Line 122:
Line 123: #End ExternalSource
Line 124: If (Global.ASP.visitsbook_aspx.__initialized = false) Then
Line 125: dependencies = New String(13) {}
Line 126: dependencies(0) = "~/visitsbook.aspx.vb"
Line 127: dependencies(1) = "~/usercontrols/ucHeader.ascx"
Line 128: dependencies(2) = "~/usercontrols/ucCollector.ascx"
Line 129: dependencies(3) = "~/usercontrols/ucThumbs.ascx"
Line 130: dependencies(4) = "~/usercontrols/ucSearch.ascx"
Line 131: dependencies(5) = "~/visitsbook.aspx"
Line 132: dependencies(6) = "~/usercontrols/ucFooter.ascx"
Line 133: dependencies(7) = "~/MasterBlank.master"
Line 134: dependencies(8) = "~/usercontrols/ucThumbs.ascx.cs"
Line 135: dependencies(9) = "~/MasterBlank.master.cs"
Line 136: dependencies(10) = "~/usercontrols/ucHeader.ascx.cs"
Line 137: dependencies(11) = "~/usercontrols/ucFooter.ascx.cs"
Line 138: dependencies(12) = "~/usercontrols/ucSearch.ascx.cs"
Line 139: dependencies(13) = "~/usercontrols/ucCollector.ascx.cs"
Line 140: Global.ASP.visitsbook_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 141: Global.ASP.visitsbook_aspx.__initialized = true
Line 142: End If
Line 143: Me.Server.ScriptTimeout = 30000000
Line 144: End Sub
Line 145:
Line 146: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 147: Get
Line 148: Return false
Line 149: End Get
Line 150: End Property
Line 151:
Line 152: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 153: Private Function __BuildControlPanel2() As Global.System.Web.UI.WebControls.Panel
Line 154: Dim __ctrl As Global.System.Web.UI.WebControls.Panel
Line 155:
Line 156: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 157: __ctrl = New Global.System.Web.UI.WebControls.Panel()
Line 158:
Line 159: #End ExternalSource
Line 160: Me.Panel2 = __ctrl
Line 161: __ctrl.TemplateControl = Me
Line 162: __ctrl.ApplyStyleSheetSkin(Me)
Line 163:
Line 164: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 165: __ctrl.ID = "Panel2"
Line 166:
Line 167: #End ExternalSource
Line 168:
Line 169: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 170: __ctrl.Width = New System.Web.UI.WebControls.Unit(480R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 171:
Line 172: #End ExternalSource
Line 173:
Line 174: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 175: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("style", "margin-left:200px;margin-right:200px")
Line 176:
Line 177: #End ExternalSource
Line 178: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 179:
Line 180: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",3)
Line 181: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br /><br /><br /><br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""font-size:36pt;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 182: " "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Visits book"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div><br /><br /><br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 183:
Line 184: #End ExternalSource
Line 185: Return __ctrl
Line 186: End Function
Line 187:
Line 188: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 189: Private Function __BuildControlpnlMessage() As Global.System.Web.UI.WebControls.Panel
Line 190: Dim __ctrl As Global.System.Web.UI.WebControls.Panel
Line 191:
Line 192: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 193: __ctrl = New Global.System.Web.UI.WebControls.Panel()
Line 194:
Line 195: #End ExternalSource
Line 196: Me.pnlMessage = __ctrl
Line 197: __ctrl.TemplateControl = Me
Line 198: __ctrl.ApplyStyleSheetSkin(Me)
Line 199:
Line 200: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 201: __ctrl.ID = "pnlMessage"
Line 202:
Line 203: #End ExternalSource
Line 204:
Line 205: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 206: __ctrl.Width = New System.Web.UI.WebControls.Unit(480R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 207:
Line 208: #End ExternalSource
Line 209:
Line 210: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 211: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("style", "margin-left:200px;margin-right:200px")
Line 212:
Line 213: #End ExternalSource
Line 214: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 215:
Line 216: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",10)
Line 217: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""font-size:13px;color:green; font-weight:bold; text-align:ce"& _
Line 218: "nter "">Thank you!</div><br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 219:
Line 220: #End ExternalSource
Line 221: Return __ctrl
Line 222: End Function
Line 223:
Line 224: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 225: Private Function __BuildControltxtComment() As Global.System.Web.UI.WebControls.TextBox
Line 226: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 227:
Line 228: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 229: __ctrl = New Global.System.Web.UI.WebControls.TextBox()
Line 230:
Line 231: #End ExternalSource
Line 232: Me.txtComment = __ctrl
Line 233: __ctrl.ApplyStyleSheetSkin(Me)
Line 234:
Line 235: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 236: __ctrl.ID = "txtComment"
Line 237:
Line 238: #End ExternalSource
Line 239:
Line 240: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 241: __ctrl.Rows = 3
Line 242:
Line 243: #End ExternalSource
Line 244:
Line 245: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 246: __ctrl.TextMode = Global.System.Web.UI.WebControls.TextBoxMode.MultiLine
Line 247:
Line 248: #End ExternalSource
Line 249:
Line 250: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 251: __ctrl.Width = New System.Web.UI.WebControls.Unit(450R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 252:
Line 253: #End ExternalSource
Line 254:
Line 255: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 256: __ctrl.ValidationGroup = "vgt"
Line 257:
Line 258: #End ExternalSource
Line 259:
Line 260: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",15)
Line 261: __ctrl.CausesValidation = true
Line 262:
Line 263: #End ExternalSource
Line 264: Return __ctrl
Line 265: End Function
Line 266:
Line 267: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 268: Private Function __BuildControltxbName() As Global.System.Web.UI.WebControls.TextBox
Line 269: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 270:
Line 271: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",16)
Line 272: __ctrl = New Global.System.Web.UI.WebControls.TextBox()
Line 273:
Line 274: #End ExternalSource
Line 275: Me.txbName = __ctrl
Line 276: __ctrl.ApplyStyleSheetSkin(Me)
Line 277:
Line 278: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",16)
Line 279: __ctrl.ID = "txbName"
Line 280:
Line 281: #End ExternalSource
Line 282:
Line 283: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",16)
Line 284: __ctrl.Width = New System.Web.UI.WebControls.Unit(195R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 285:
Line 286: #End ExternalSource
Line 287: Return __ctrl
Line 288: End Function
Line 289:
Line 290: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 291: Private Function __BuildControlddlPais() As Global.System.Web.UI.WebControls.DropDownList
Line 292: Dim __ctrl As Global.System.Web.UI.WebControls.DropDownList
Line 293:
Line 294: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",17)
Line 295: __ctrl = New Global.System.Web.UI.WebControls.DropDownList()
Line 296:
Line 297: #End ExternalSource
Line 298: Me.ddlPais = __ctrl
Line 299: __ctrl.ApplyStyleSheetSkin(Me)
Line 300:
Line 301: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",17)
Line 302: __ctrl.ID = "ddlPais"
Line 303:
Line 304: #End ExternalSource
Line 305:
Line 306: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",17)
Line 307: __ctrl.EnableViewState = true
Line 308:
Line 309: #End ExternalSource
Line 310:
Line 311: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",17)
Line 312: __ctrl.Width = New System.Web.UI.WebControls.Unit(200R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 313:
Line 314: #End ExternalSource
Line 315: Return __ctrl
Line 316: End Function
Line 317:
Line 318: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 319: Private Function __BuildControlPanel1() As Global.System.Web.UI.WebControls.Panel
Line 320: Dim __ctrl As Global.System.Web.UI.WebControls.Panel
Line 321:
Line 322: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 323: __ctrl = New Global.System.Web.UI.WebControls.Panel()
Line 324:
Line 325: #End ExternalSource
Line 326: Me.Panel1 = __ctrl
Line 327: __ctrl.TemplateControl = Me
Line 328: __ctrl.ApplyStyleSheetSkin(Me)
Line 329:
Line 330: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 331: __ctrl.ID = "Panel1"
Line 332:
Line 333: #End ExternalSource
Line 334:
Line 335: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 336: __ctrl.BackColor = Global.System.Drawing.Color.LightGray
Line 337:
Line 338: #End ExternalSource
Line 339:
Line 340: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 341: __ctrl.Width = New System.Web.UI.WebControls.Unit(480R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 342:
Line 343: #End ExternalSource
Line 344:
Line 345: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 346: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("style", "margin-left:200px;margin-right:200px")
Line 347:
Line 348: #End ExternalSource
Line 349: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 350:
Line 351: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 352: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<p style=""margin-top: 6px;margin-left: 6px"">Post your comments:"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 353:
Line 354: #End ExternalSource
Line 355: Dim __ctrl1 As Global.System.Web.UI.WebControls.TextBox
Line 356:
Line 357: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 358: __ctrl1 = Me.__BuildControltxtComment
Line 359:
Line 360: #End ExternalSource
Line 361:
Line 362: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 363: __parser.AddParsedSubObject(__ctrl1)
Line 364:
Line 365: #End ExternalSource
Line 366:
Line 367: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 368: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Your name (optional):<br />"))
Line 369:
Line 370: #End ExternalSource
Line 371: Dim __ctrl2 As Global.System.Web.UI.WebControls.TextBox
Line 372:
Line 373: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 374: __ctrl2 = Me.__BuildControltxbName
Line 375:
Line 376: #End ExternalSource
Line 377:
Line 378: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 379: __parser.AddParsedSubObject(__ctrl2)
Line 380:
Line 381: #End ExternalSource
Line 382:
Line 383: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 384: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("<br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Your country:<br />"))
Line 385:
Line 386: #End ExternalSource
Line 387: Dim __ctrl3 As Global.System.Web.UI.WebControls.DropDownList
Line 388:
Line 389: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 390: __ctrl3 = Me.__BuildControlddlPais
Line 391:
Line 392: #End ExternalSource
Line 393:
Line 394: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 395: __parser.AddParsedSubObject(__ctrl3)
Line 396:
Line 397: #End ExternalSource
Line 398:
Line 399: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",13)
Line 400: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</p>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <p style=""margin-top: 6px; margin-left: 6px"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </p>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 401:
Line 402: #End ExternalSource
Line 403: Return __ctrl
Line 404: End Function
Line 405:
Line 406: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 407: Private Function __BuildControl__control3() As Global.System.Web.UI.WebControls.Label
Line 408: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 409:
Line 410: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",29)
Line 411: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 412:
Line 413: #End ExternalSource
Line 414: __ctrl.TemplateControl = Me
Line 415: __ctrl.ApplyStyleSheetSkin(Me)
Line 416:
Line 417: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",29)
Line 418: __ctrl.ID = "rptName"
Line 419:
Line 420: #End ExternalSource
Line 421: Return __ctrl
Line 422: End Function
Line 423:
Line 424: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 425: Private Function __BuildControl__control4() As Global.System.Web.UI.WebControls.Label
Line 426: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 427:
Line 428: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",29)
Line 429: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 430:
Line 431: #End ExternalSource
Line 432: __ctrl.TemplateControl = Me
Line 433: __ctrl.ApplyStyleSheetSkin(Me)
Line 434:
Line 435: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",29)
Line 436: __ctrl.ID = "rptCountry"
Line 437:
Line 438: #End ExternalSource
Line 439: Return __ctrl
Line 440: End Function
Line 441:
Line 442: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 443: Private Function __BuildControl__control5() As Global.System.Web.UI.WebControls.Label
Line 444: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 445:
Line 446: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",30)
Line 447: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 448:
Line 449: #End ExternalSource
Line 450: __ctrl.TemplateControl = Me
Line 451: __ctrl.ApplyStyleSheetSkin(Me)
Line 452:
Line 453: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",30)
Line 454: __ctrl.ID = "rptDate"
Line 455:
Line 456: #End ExternalSource
Line 457: Return __ctrl
Line 458: End Function
Line 459:
Line 460: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 461: Private Function __BuildControl__control6() As Global.System.Web.UI.WebControls.Label
Line 462: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 463:
Line 464: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",33)
Line 465: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 466:
Line 467: #End ExternalSource
Line 468: __ctrl.TemplateControl = Me
Line 469: __ctrl.ApplyStyleSheetSkin(Me)
Line 470:
Line 471: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",33)
Line 472: __ctrl.ID = "rptComments"
Line 473:
Line 474: #End ExternalSource
Line 475: Return __ctrl
Line 476: End Function
Line 477:
Line 478: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 479: Private Function __BuildControl__control7() As Global.System.Web.UI.WebControls.Label
Line 480: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 481:
Line 482: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",36)
Line 483: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 484:
Line 485: #End ExternalSource
Line 486: __ctrl.TemplateControl = Me
Line 487: __ctrl.ApplyStyleSheetSkin(Me)
Line 488:
Line 489: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",36)
Line 490: __ctrl.ID = "visitCommentsReply"
Line 491:
Line 492: #End ExternalSource
Line 493: Return __ctrl
Line 494: End Function
Line 495:
Line 496: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 497: Private Sub __BuildControl__control2(ByVal __ctrl As System.Web.UI.Control)
Line 498: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 499:
Line 500: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 501: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td><strong>"))
Line 502:
Line 503: #End ExternalSource
Line 504: Dim __ctrl1 As Global.System.Web.UI.WebControls.Label
Line 505:
Line 506: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 507: __ctrl1 = Me.__BuildControl__control3
Line 508:
Line 509: #End ExternalSource
Line 510:
Line 511: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 512: __parser.AddParsedSubObject(__ctrl1)
Line 513:
Line 514: #End ExternalSource
Line 515:
Line 516: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 517: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(" "))
Line 518:
Line 519: #End ExternalSource
Line 520: Dim __ctrl2 As Global.System.Web.UI.WebControls.Label
Line 521:
Line 522: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 523: __ctrl2 = Me.__BuildControl__control4
Line 524:
Line 525: #End ExternalSource
Line 526:
Line 527: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 528: __parser.AddParsedSubObject(__ctrl2)
Line 529:
Line 530: #End ExternalSource
Line 531:
Line 532: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 533: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</strong></td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td align=""right""><div style=""color:gray"""& _
Line 534: ">"))
Line 535:
Line 536: #End ExternalSource
Line 537: Dim __ctrl3 As Global.System.Web.UI.WebControls.Label
Line 538:
Line 539: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 540: __ctrl3 = Me.__BuildControl__control5
Line 541:
Line 542: #End ExternalSource
Line 543:
Line 544: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 545: __parser.AddParsedSubObject(__ctrl3)
Line 546:
Line 547: #End ExternalSource
Line 548:
Line 549: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 550: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</div></td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr> "& _
Line 551: ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td colspan=""2"">"))
Line 552:
Line 553: #End ExternalSource
Line 554: Dim __ctrl4 As Global.System.Web.UI.WebControls.Label
Line 555:
Line 556: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 557: __ctrl4 = Me.__BuildControl__control6
Line 558:
Line 559: #End ExternalSource
Line 560:
Line 561: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 562: __parser.AddParsedSubObject(__ctrl4)
Line 563:
Line 564: #End ExternalSource
Line 565:
Line 566: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 567: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 568: " <td colspan=""2"">"))
Line 569:
Line 570: #End ExternalSource
Line 571: Dim __ctrl5 As Global.System.Web.UI.WebControls.Label
Line 572:
Line 573: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 574: __ctrl5 = Me.__BuildControl__control7
Line 575:
Line 576: #End ExternalSource
Line 577:
Line 578: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 579: __parser.AddParsedSubObject(__ctrl5)
Line 580:
Line 581: #End ExternalSource
Line 582:
Line 583: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 584: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr><td colspan=""2""> <"& _
Line 585: "/td></tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 586:
Line 587: #End ExternalSource
Line 588: End Sub
Line 589:
Line 590: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 591: Private Function __BuildControlrptVisits() As Global.System.Web.UI.WebControls.Repeater
Line 592: Dim __ctrl As Global.System.Web.UI.WebControls.Repeater
Line 593:
Line 594: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 595: __ctrl = New Global.System.Web.UI.WebControls.Repeater()
Line 596:
Line 597: #End ExternalSource
Line 598: Me.rptVisits = __ctrl
Line 599:
Line 600: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 601: __ctrl.ItemTemplate = New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControl__control2)
Line 602:
Line 603: #End ExternalSource
Line 604:
Line 605: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",26)
Line 606: __ctrl.ID = "rptVisits"
Line 607:
Line 608: #End ExternalSource
Line 609: Return __ctrl
Line 610: End Function
Line 611:
Line 612: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 613: Private Function __BuildControlPanel3() As Global.System.Web.UI.WebControls.Panel
Line 614: Dim __ctrl As Global.System.Web.UI.WebControls.Panel
Line 615:
Line 616: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 617: __ctrl = New Global.System.Web.UI.WebControls.Panel()
Line 618:
Line 619: #End ExternalSource
Line 620: Me.Panel3 = __ctrl
Line 621: __ctrl.TemplateControl = Me
Line 622: __ctrl.ApplyStyleSheetSkin(Me)
Line 623:
Line 624: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 625: __ctrl.ID = "Panel3"
Line 626:
Line 627: #End ExternalSource
Line 628:
Line 629: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 630: __ctrl.Width = New System.Web.UI.WebControls.Unit(480R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 631:
Line 632: #End ExternalSource
Line 633:
Line 634: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 635: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("style", "margin-left:200px;margin-right:200px")
Line 636:
Line 637: #End ExternalSource
Line 638: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 639:
Line 640: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 641: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table border=""0"" width=""480px"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 642:
Line 643: #End ExternalSource
Line 644: Dim __ctrl1 As Global.System.Web.UI.WebControls.Repeater
Line 645:
Line 646: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 647: __ctrl1 = Me.__BuildControlrptVisits
Line 648:
Line 649: #End ExternalSource
Line 650:
Line 651: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 652: __parser.AddParsedSubObject(__ctrl1)
Line 653:
Line 654: #End ExternalSource
Line 655:
Line 656: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",24)
Line 657: __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)&" </table> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 658:
Line 659: #End ExternalSource
Line 660: Return __ctrl
Line 661: End Function
Line 662:
Line 663: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 664: Private Sub __BuildControlContent1(ByVal __ctrl As System.Web.UI.Control)
Line 665: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 666:
Line 667: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 668: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 669:
Line 670: #End ExternalSource
Line 671: Dim __ctrl1 As Global.System.Web.UI.WebControls.Panel
Line 672:
Line 673: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 674: __ctrl1 = Me.__BuildControlPanel2
Line 675:
Line 676: #End ExternalSource
Line 677:
Line 678: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 679: __parser.AddParsedSubObject(__ctrl1)
Line 680:
Line 681: #End ExternalSource
Line 682:
Line 683: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 684: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 685:
Line 686: #End ExternalSource
Line 687: Dim __ctrl2 As Global.System.Web.UI.WebControls.Panel
Line 688:
Line 689: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 690: __ctrl2 = Me.__BuildControlpnlMessage
Line 691:
Line 692: #End ExternalSource
Line 693:
Line 694: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 695: __parser.AddParsedSubObject(__ctrl2)
Line 696:
Line 697: #End ExternalSource
Line 698:
Line 699: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 700: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 701:
Line 702: #End ExternalSource
Line 703: Dim __ctrl3 As Global.System.Web.UI.WebControls.Panel
Line 704:
Line 705: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 706: __ctrl3 = Me.__BuildControlPanel1
Line 707:
Line 708: #End ExternalSource
Line 709:
Line 710: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 711: __parser.AddParsedSubObject(__ctrl3)
Line 712:
Line 713: #End ExternalSource
Line 714:
Line 715: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 716: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<br /><br /> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 717:
Line 718: #End ExternalSource
Line 719: Dim __ctrl4 As Global.System.Web.UI.WebControls.Panel
Line 720:
Line 721: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 722: __ctrl4 = Me.__BuildControlPanel3
Line 723:
Line 724: #End ExternalSource
Line 725:
Line 726: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 727: __parser.AddParsedSubObject(__ctrl4)
Line 728:
Line 729: #End ExternalSource
Line 730:
Line 731: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 732: __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)))
Line 733:
Line 734: #End ExternalSource
Line 735: End Sub
Line 736:
Line 737: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 738: Private Sub __BuildControlTree(ByVal __ctrl As visitsbook_aspx)
Line 739:
Line 740: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 741: __ctrl.MasterPageFile = "~/MasterBlank.master"
Line 742:
Line 743: #End ExternalSource
Line 744:
Line 745: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 746: __ctrl.Title = "thecurerecords.com: Visits book"
Line 747:
Line 748: #End ExternalSource
Line 749:
Line 750: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 751: __ctrl.EnableEventValidation = false
Line 752:
Line 753: #End ExternalSource
Line 754:
Line 755: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 756: __ctrl.ViewStateEncryptionMode = Global.System.Web.UI.ViewStateEncryptionMode.Never
Line 757:
Line 758: #End ExternalSource
Line 759:
Line 760: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 761: Me.InitializeCulture
Line 762:
Line 763: #End ExternalSource
Line 764:
Line 765: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",2)
Line 766: Me.AddContentTemplate("ContentPlaceHolder1", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent1))
Line 767:
Line 768: #End ExternalSource
Line 769: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 770:
Line 771: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx",1)
Line 772: __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)))
Line 773:
Line 774: #End ExternalSource
Line 775: End Sub
Line 776:
Line 777:
Line 778: #ExternalSource("C:\WWW\tcr\wwwroot\visitsbook.aspx.vb",912304)
Line 779: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 780: Protected Overrides Sub FrameworkInitialize()
Line 781: MyBase.FrameworkInitialize
Line 782: Me.__BuildControlTree(Me)
Line 783: Me.AddWrappedFileDependencies(Global.ASP.visitsbook_aspx.__fileDependencies)
Line 784: End Sub
Line 785:
Line 786: #End ExternalSource
Line 787:
Line 788: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 789: Public Overrides Function GetTypeHashCode() As Integer
Line 790: Return 1729652439
Line 791: End Function
Line 792:
Line 793: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 794: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 795: MyBase.ProcessRequest(context)
Line 796: End Sub
Line 797: End Class
Line 798: End Namespace
Line 799:
|