Line 1: #ExternalChecksum("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","0F527BEE5B7FE26038C4183220930C2CC05B1282")
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 emailer_emailer
Line 40: Implements System.Web.SessionState.IRequiresSessionState
Line 41:
Line 42:
Line 43: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",34)
Line 44: Protected WithEvents TDATED As Global.System.Web.UI.HtmlControls.HtmlGenericControl
Line 45:
Line 46: #End ExternalSource
Line 47:
Line 48:
Line 49: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 50: Protected WithEvents Repeater1 As Global.System.Web.UI.WebControls.Repeater
Line 51:
Line 52: #End ExternalSource
Line 53:
Line 54:
Line 55: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",47)
Line 56: Protected WithEvents XmlEmailer1 As Global.System.Web.UI.WebControls.XmlDataSource
Line 57:
Line 58: #End ExternalSource
Line 59:
Line 60:
Line 61: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 62: Protected WithEvents Repeater2 As Global.System.Web.UI.WebControls.Repeater
Line 63:
Line 64: #End ExternalSource
Line 65:
Line 66:
Line 67: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",57)
Line 68: Protected WithEvents XmlEmailer2 As Global.System.Web.UI.WebControls.XmlDataSource
Line 69:
Line 70: #End ExternalSource
Line 71:
Line 72:
Line 73: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 74: Protected WithEvents form1 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 75:
Line 76: #End ExternalSource
Line 77:
Line 78: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 79: Get
Line 80: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 81: End Get
Line 82: End Property
Line 83:
Line 84: Protected ReadOnly Property ApplicationInstance() As ASP.global_asax
Line 85: Get
Line 86: Return CType(Me.Context.ApplicationInstance,ASP.global_asax)
Line 87: End Get
Line 88: End Property
Line 89: End Class
Line 90:
Line 91: Namespace ASP
Line 92:
Line 93: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 94: Public Class emailer_emailer_aspx
Line 95: Inherits Global.emailer_emailer
Line 96: Implements System.Web.IHttpHandler
Line 97:
Line 98: Private Shared __initialized As Boolean
Line 99:
Line 100: Private Shared __stringResource As Object
Line 101:
Line 102: Private Shared __fileDependencies As Object
Line 103:
Line 104: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 105: Public Sub New()
Line 106: MyBase.New
Line 107: Dim dependencies() As String
Line 108:
Line 109: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx.vb",912304)
Line 110: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/emailer/emailer.aspx"
Line 111:
Line 112: #End ExternalSource
Line 113: If (Global.ASP.emailer_emailer_aspx.__initialized = false) Then
Line 114: Global.ASP.emailer_emailer_aspx.__stringResource = Me.ReadStringResource
Line 115: dependencies = New String(1) {}
Line 116: dependencies(0) = "~/emailer/emailer.aspx"
Line 117: dependencies(1) = "~/emailer/emailer.aspx.vb"
Line 118: Global.ASP.emailer_emailer_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 119: Global.ASP.emailer_emailer_aspx.__initialized = true
Line 120: End If
Line 121: Me.Server.ScriptTimeout = 30000000
Line 122: End Sub
Line 123:
Line 124: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 125: Get
Line 126: Return false
Line 127: End Get
Line 128: End Property
Line 129:
Line 130: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 131: Private Function __BuildControl__control3() As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 132: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 133:
Line 134: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",7)
Line 135: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlTitle()
Line 136:
Line 137: #End ExternalSource
Line 138: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 139:
Line 140: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",7)
Line 141: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("Himalayan Update"))
Line 142:
Line 143: #End ExternalSource
Line 144: Return __ctrl
Line 145: End Function
Line 146:
Line 147: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 148: Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlHead
Line 149: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlHead
Line 150:
Line 151: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",6)
Line 152: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlHead("head")
Line 153:
Line 154: #End ExternalSource
Line 155: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlTitle
Line 156:
Line 157: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",6)
Line 158: __ctrl1 = Me.__BuildControl__control3
Line 159:
Line 160: #End ExternalSource
Line 161: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 162:
Line 163: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",6)
Line 164: __parser.AddParsedSubObject(__ctrl1)
Line 165:
Line 166: #End ExternalSource
Line 167:
Line 168: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",6)
Line 169: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(0, 1503, true))
Line 170:
Line 171: #End ExternalSource
Line 172: Return __ctrl
Line 173: End Function
Line 174:
Line 175: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 176: Private Function __BuildControlTDATED() As Global.System.Web.UI.HtmlControls.HtmlGenericControl
Line 177: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlGenericControl
Line 178:
Line 179: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",34)
Line 180: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlGenericControl("p")
Line 181:
Line 182: #End ExternalSource
Line 183: Me.TDATED = __ctrl
Line 184:
Line 185: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",34)
Line 186: CType(__ctrl,System.Web.UI.IAttributeAccessor).SetAttribute("style", "float:right;")
Line 187:
Line 188: #End ExternalSource
Line 189:
Line 190: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",34)
Line 191: __ctrl.ID = "TDATED"
Line 192:
Line 193: #End ExternalSource
Line 194: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 195:
Line 196: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",34)
Line 197: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("-"))
Line 198:
Line 199: #End ExternalSource
Line 200: Return __ctrl
Line 201: End Function
Line 202:
Line 203: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 204: Private Function __BuildControl__control5() As Global.System.Web.UI.DataBoundLiteralControl
Line 205: Dim __ctrl As Global.System.Web.UI.DataBoundLiteralControl
Line 206:
Line 207: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",41)
Line 208: __ctrl = New Global.System.Web.UI.DataBoundLiteralControl(5, 4)
Line 209:
Line 210: #End ExternalSource
Line 211: __ctrl.TemplateControl = Me
Line 212: __ctrl.SetStaticString(0, ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a class=""LeadLink"" href='https://www.himalayanupda"& _
Line 213: "te.com")
Line 214: __ctrl.SetStaticString(1, "' target=""_blank"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""Leadheading"">")
Line 215: __ctrl.SetStaticString(2, "</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <img class=""LeadPhoto"" src='https://www.h"& _
Line 216: "imalayanupdate.com/images/news/full")
Line 217: __ctrl.SetStaticString(3, ".jpg' height=""120px"" style=""height:120px !important;"" />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 218: " <div class=""LeadDesc"">")
Line 219: __ctrl.SetStaticString(4, "</div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 220:
Line 221: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",41)
Line 222: AddHandler __ctrl.DataBinding, AddressOf Me.__DataBind__control5
Line 223:
Line 224: #End ExternalSource
Line 225: Return __ctrl
Line 226: End Function
Line 227:
Line 228: Public Sub __DataBind__control5(ByVal sender As Object, ByVal e As System.EventArgs)
Line 229: Dim Container As System.Web.UI.WebControls.RepeaterItem
Line 230: Dim target As System.Web.UI.DataBoundLiteralControl
Line 231:
Line 232: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",41)
Line 233: target = CType(sender,System.Web.UI.DataBoundLiteralControl)
Line 234:
Line 235: #End ExternalSource
Line 236:
Line 237: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",41)
Line 238: Container = CType(target.BindingContainer,System.Web.UI.WebControls.RepeaterItem)
Line 239:
Line 240: #End ExternalSource
Line 241:
Line 242: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",41)
Line 243: target.SetDataBoundString(0, Global.System.Convert.ToString(XPath("link"), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 244:
Line 245: #End ExternalSource
Line 246:
Line 247: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",42)
Line 248: target.SetDataBoundString(1, Global.System.Convert.ToString(XPath("title"), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 249:
Line 250: #End ExternalSource
Line 251:
Line 252: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",43)
Line 253: target.SetDataBoundString(2, Global.System.Convert.ToString(XPath("code"), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 254:
Line 255: #End ExternalSource
Line 256:
Line 257: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",44)
Line 258: target.SetDataBoundString(3, Global.System.Convert.ToString(GETPARA(XPath("description")), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 259:
Line 260: #End ExternalSource
Line 261: End Sub
Line 262:
Line 263: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 264: Private Sub __BuildControl__control4(ByVal __ctrl As System.Web.UI.Control)
Line 265: Dim __ctrl1 As Global.System.Web.UI.DataBoundLiteralControl
Line 266:
Line 267: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 268: __ctrl1 = Me.__BuildControl__control5
Line 269:
Line 270: #End ExternalSource
Line 271: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 272:
Line 273: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 274: __parser.AddParsedSubObject(__ctrl1)
Line 275:
Line 276: #End ExternalSource
Line 277: End Sub
Line 278:
Line 279: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 280: Private Function __BuildControlRepeater1() As Global.System.Web.UI.WebControls.Repeater
Line 281: Dim __ctrl As Global.System.Web.UI.WebControls.Repeater
Line 282:
Line 283: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 284: __ctrl = New Global.System.Web.UI.WebControls.Repeater()
Line 285:
Line 286: #End ExternalSource
Line 287: Me.Repeater1 = __ctrl
Line 288:
Line 289: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 290: __ctrl.ItemTemplate = New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControl__control4)
Line 291:
Line 292: #End ExternalSource
Line 293:
Line 294: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 295: __ctrl.ID = "Repeater1"
Line 296:
Line 297: #End ExternalSource
Line 298:
Line 299: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",39)
Line 300: __ctrl.DataSourceID = "XmlEmailer1"
Line 301:
Line 302: #End ExternalSource
Line 303: Return __ctrl
Line 304: End Function
Line 305:
Line 306: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 307: Private Function __BuildControlXmlEmailer1() As Global.System.Web.UI.WebControls.XmlDataSource
Line 308: Dim __ctrl As Global.System.Web.UI.WebControls.XmlDataSource
Line 309:
Line 310: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",47)
Line 311: __ctrl = New Global.System.Web.UI.WebControls.XmlDataSource()
Line 312:
Line 313: #End ExternalSource
Line 314: Me.XmlEmailer1 = __ctrl
Line 315:
Line 316: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",47)
Line 317: __ctrl.ID = "XmlEmailer1"
Line 318:
Line 319: #End ExternalSource
Line 320:
Line 321: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",47)
Line 322: __ctrl.DataFile = "../rssfeed/topnews.xml"
Line 323:
Line 324: #End ExternalSource
Line 325:
Line 326: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",47)
Line 327: __ctrl.XPath = "rss/channel/item"
Line 328:
Line 329: #End ExternalSource
Line 330: Return __ctrl
Line 331: End Function
Line 332:
Line 333: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 334: Private Function __BuildControl__control7() As Global.System.Web.UI.DataBoundLiteralControl
Line 335: Dim __ctrl As Global.System.Web.UI.DataBoundLiteralControl
Line 336:
Line 337: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",52)
Line 338: __ctrl = New Global.System.Web.UI.DataBoundLiteralControl(3, 2)
Line 339:
Line 340: #End ExternalSource
Line 341: __ctrl.TemplateControl = Me
Line 342: __ctrl.SetStaticString(0, ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a class=""LeadLink2"" href='https://www.himalayanupd"& _
Line 343: "ate.com")
Line 344: __ctrl.SetStaticString(1, "' target=""_blank"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <img src=""https://www.himalay"& _
Line 345: "anupdate.com/images/basic/bullet-red.png"" />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <s"& _
Line 346: "pan>")
Line 347: __ctrl.SetStaticString(2, "</span>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 348:
Line 349: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",52)
Line 350: AddHandler __ctrl.DataBinding, AddressOf Me.__DataBind__control7
Line 351:
Line 352: #End ExternalSource
Line 353: Return __ctrl
Line 354: End Function
Line 355:
Line 356: Public Sub __DataBind__control7(ByVal sender As Object, ByVal e As System.EventArgs)
Line 357: Dim Container As System.Web.UI.WebControls.RepeaterItem
Line 358: Dim target As System.Web.UI.DataBoundLiteralControl
Line 359:
Line 360: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",52)
Line 361: target = CType(sender,System.Web.UI.DataBoundLiteralControl)
Line 362:
Line 363: #End ExternalSource
Line 364:
Line 365: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",52)
Line 366: Container = CType(target.BindingContainer,System.Web.UI.WebControls.RepeaterItem)
Line 367:
Line 368: #End ExternalSource
Line 369:
Line 370: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",52)
Line 371: target.SetDataBoundString(0, Global.System.Convert.ToString(XPath("link"), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 372:
Line 373: #End ExternalSource
Line 374:
Line 375: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",54)
Line 376: target.SetDataBoundString(1, Global.System.Convert.ToString(XPath("title"), Global.System.Globalization.CultureInfo.CurrentCulture))
Line 377:
Line 378: #End ExternalSource
Line 379: End Sub
Line 380:
Line 381: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 382: Private Sub __BuildControl__control6(ByVal __ctrl As System.Web.UI.Control)
Line 383: Dim __ctrl1 As Global.System.Web.UI.DataBoundLiteralControl
Line 384:
Line 385: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 386: __ctrl1 = Me.__BuildControl__control7
Line 387:
Line 388: #End ExternalSource
Line 389: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 390:
Line 391: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 392: __parser.AddParsedSubObject(__ctrl1)
Line 393:
Line 394: #End ExternalSource
Line 395: End Sub
Line 396:
Line 397: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 398: Private Function __BuildControlRepeater2() As Global.System.Web.UI.WebControls.Repeater
Line 399: Dim __ctrl As Global.System.Web.UI.WebControls.Repeater
Line 400:
Line 401: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 402: __ctrl = New Global.System.Web.UI.WebControls.Repeater()
Line 403:
Line 404: #End ExternalSource
Line 405: Me.Repeater2 = __ctrl
Line 406:
Line 407: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 408: __ctrl.ItemTemplate = New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControl__control6)
Line 409:
Line 410: #End ExternalSource
Line 411:
Line 412: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 413: __ctrl.ID = "Repeater2"
Line 414:
Line 415: #End ExternalSource
Line 416:
Line 417: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",50)
Line 418: __ctrl.DataSourceID = "XmlEmailer2"
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 __BuildControlXmlEmailer2() As Global.System.Web.UI.WebControls.XmlDataSource
Line 426: Dim __ctrl As Global.System.Web.UI.WebControls.XmlDataSource
Line 427:
Line 428: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",57)
Line 429: __ctrl = New Global.System.Web.UI.WebControls.XmlDataSource()
Line 430:
Line 431: #End ExternalSource
Line 432: Me.XmlEmailer2 = __ctrl
Line 433:
Line 434: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",57)
Line 435: __ctrl.ID = "XmlEmailer2"
Line 436:
Line 437: #End ExternalSource
Line 438:
Line 439: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",57)
Line 440: __ctrl.DataFile = "../rssfeed/latest.xml"
Line 441:
Line 442: #End ExternalSource
Line 443:
Line 444: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",57)
Line 445: __ctrl.XPath = "rss/channel/item"
Line 446:
Line 447: #End ExternalSource
Line 448: Return __ctrl
Line 449: End Function
Line 450:
Line 451: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 452: Private Function __BuildControlform1() As Global.System.Web.UI.HtmlControls.HtmlForm
Line 453: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
Line 454:
Line 455: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 456: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm()
Line 457:
Line 458: #End ExternalSource
Line 459: Me.form1 = __ctrl
Line 460:
Line 461: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 462: __ctrl.ID = "form1"
Line 463:
Line 464: #End ExternalSource
Line 465: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 466:
Line 467: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 468: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(1503, 395, true))
Line 469:
Line 470: #End ExternalSource
Line 471: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlGenericControl
Line 472:
Line 473: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 474: __ctrl1 = Me.__BuildControlTDATED
Line 475:
Line 476: #End ExternalSource
Line 477:
Line 478: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 479: __parser.AddParsedSubObject(__ctrl1)
Line 480:
Line 481: #End ExternalSource
Line 482:
Line 483: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 484: __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)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td "& _
Line 485: "class=""NewsBox"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 486:
Line 487: #End ExternalSource
Line 488: Dim __ctrl2 As Global.System.Web.UI.WebControls.Repeater
Line 489:
Line 490: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 491: __ctrl2 = Me.__BuildControlRepeater1
Line 492:
Line 493: #End ExternalSource
Line 494:
Line 495: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 496: __parser.AddParsedSubObject(__ctrl2)
Line 497:
Line 498: #End ExternalSource
Line 499: Dim __ctrl3 As Global.System.Web.UI.WebControls.XmlDataSource
Line 500:
Line 501: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 502: __ctrl3 = Me.__BuildControlXmlEmailer1
Line 503:
Line 504: #End ExternalSource
Line 505:
Line 506: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 507: __parser.AddParsedSubObject(__ctrl3)
Line 508:
Line 509: #End ExternalSource
Line 510:
Line 511: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 512: __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 class=""NewsBox"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 513: " "))
Line 514:
Line 515: #End ExternalSource
Line 516: Dim __ctrl4 As Global.System.Web.UI.WebControls.Repeater
Line 517:
Line 518: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 519: __ctrl4 = Me.__BuildControlRepeater2
Line 520:
Line 521: #End ExternalSource
Line 522:
Line 523: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 524: __parser.AddParsedSubObject(__ctrl4)
Line 525:
Line 526: #End ExternalSource
Line 527: Dim __ctrl5 As Global.System.Web.UI.WebControls.XmlDataSource
Line 528:
Line 529: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 530: __ctrl5 = Me.__BuildControlXmlEmailer2
Line 531:
Line 532: #End ExternalSource
Line 533:
Line 534: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 535: __parser.AddParsedSubObject(__ctrl5)
Line 536:
Line 537: #End ExternalSource
Line 538:
Line 539: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",26)
Line 540: __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)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 541:
Line 542: #End ExternalSource
Line 543: Return __ctrl
Line 544: End Function
Line 545:
Line 546: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 547: Private Sub __BuildControlTree(ByVal __ctrl As emailer_emailer_aspx)
Line 548:
Line 549: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 550: Me.InitializeCulture
Line 551:
Line 552: #End ExternalSource
Line 553: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 554:
Line 555: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 556: __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>"&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.org/1999/xhtml"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 557:
Line 558: #End ExternalSource
Line 559: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlHead
Line 560:
Line 561: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 562: __ctrl1 = Me.__BuildControl__control2
Line 563:
Line 564: #End ExternalSource
Line 565:
Line 566: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 567: __parser.AddParsedSubObject(__ctrl1)
Line 568:
Line 569: #End ExternalSource
Line 570:
Line 571: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 572: __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 573:
Line 574: #End ExternalSource
Line 575: Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 576:
Line 577: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 578: __ctrl2 = Me.__BuildControlform1
Line 579:
Line 580: #End ExternalSource
Line 581:
Line 582: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 583: __parser.AddParsedSubObject(__ctrl2)
Line 584:
Line 585: #End ExternalSource
Line 586:
Line 587: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx",1)
Line 588: __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 589:
Line 590: #End ExternalSource
Line 591: End Sub
Line 592:
Line 593:
Line 594: #ExternalSource("G:\PleskVhosts\sampanvivah.com\himalayanupdate\emailer\emailer.aspx.vb",912304)
Line 595: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 596: Protected Overrides Sub FrameworkInitialize()
Line 597: MyBase.FrameworkInitialize
Line 598: Me.SetStringResourcePointer(Global.ASP.emailer_emailer_aspx.__stringResource, 0)
Line 599: Me.__BuildControlTree(Me)
Line 600: Me.AddWrappedFileDependencies(Global.ASP.emailer_emailer_aspx.__fileDependencies)
Line 601: Me.Request.ValidateInput
Line 602: End Sub
Line 603:
Line 604: #End ExternalSource
Line 605:
Line 606: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 607: Public Overrides Function GetTypeHashCode() As Integer
Line 608: Return 1876561830
Line 609: End Function
Line 610:
Line 611: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 612: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 613: MyBase.ProcessRequest(context)
Line 614: End Sub
Line 615: End Class
Line 616: End Namespace
Line 617:
|