Line 1: #ExternalChecksum("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","62992E99B6282ABC6C69144386E17A8B")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:2.0.50727.8000
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 AjaxControlToolkit
Line 16: Imports ASP
Line 17: Imports GoogleLanguage.WebControls
Line 18: Imports Microsoft.VisualBasic
Line 19: Imports System
Line 20: Imports System.Collections
Line 21: Imports System.Collections.Generic
Line 22: Imports System.Collections.Specialized
Line 23: Imports System.Configuration
Line 24: Imports System.Linq
Line 25: Imports System.Text
Line 26: Imports System.Text.RegularExpressions
Line 27: Imports System.Web
Line 28: Imports System.Web.Caching
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.WebParts
Line 36: Imports System.Xml.Linq
Line 37:
Line 38:
Line 39: Partial Public Class Pages_MoreLinks
Line 40: Implements System.Web.SessionState.IRequiresSessionState
Line 41:
Line 42:
Line 43: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",28)
Line 44: Protected WithEvents LanguageManager1 As Global.GoogleLanguage.WebControls.LanguageManager
Line 45:
Line 46: #End ExternalSource
Line 47:
Line 48:
Line 49: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 50: Protected WithEvents ToolkitScriptManager1 As Global.AjaxControlToolkit.ToolkitScriptManager
Line 51:
Line 52: #End ExternalSource
Line 53:
Line 54:
Line 55: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",44)
Line 56: Protected WithEvents cLabel1 As Global.System.Web.UI.WebControls.Label
Line 57:
Line 58: #End ExternalSource
Line 59:
Line 60:
Line 61: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",64)
Line 62: Protected WithEvents lblPSSearch As Global.System.Web.UI.WebControls.Label
Line 63:
Line 64: #End ExternalSource
Line 65:
Line 66:
Line 67: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",68)
Line 68: Protected WithEvents cLabel3 As Global.System.Web.UI.WebControls.Label
Line 69:
Line 70: #End ExternalSource
Line 71:
Line 72:
Line 73: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",100)
Line 74: Protected WithEvents LabelTopStories As Global.System.Web.UI.WebControls.Label
Line 75:
Line 76: #End ExternalSource
Line 77:
Line 78:
Line 79: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",104)
Line 80: Protected WithEvents PHLinks As Global.System.Web.UI.WebControls.PlaceHolder
Line 81:
Line 82: #End ExternalSource
Line 83:
Line 84:
Line 85: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 86: Protected WithEvents ADS_FeaturedService As Global.System.Web.UI.WebControls.AccessDataSource
Line 87:
Line 88: #End ExternalSource
Line 89:
Line 90:
Line 91: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 92: Protected WithEvents ADS_TopStories As Global.System.Web.UI.WebControls.AccessDataSource
Line 93:
Line 94: #End ExternalSource
Line 95:
Line 96: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 97: Get
Line 98: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 99: End Get
Line 100: End Property
Line 101:
Line 102: Protected ReadOnly Property ApplicationInstance() As ASP.global_asax
Line 103: Get
Line 104: Return CType(Me.Context.ApplicationInstance,ASP.global_asax)
Line 105: End Get
Line 106: End Property
Line 107:
Line 108: Public Shadows ReadOnly Property Master() As ASP.masterpages_lasdheadfooter_master
Line 109: Get
Line 110: Return CType(MyBase.Master,ASP.masterpages_lasdheadfooter_master)
Line 111: End Get
Line 112: End Property
Line 113: End Class
Line 114:
Line 115: Namespace ASP
Line 116:
Line 117: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 118: Public Class pages_morelinks_aspx
Line 119: Inherits Global.Pages_MoreLinks
Line 120: Implements System.Web.IHttpHandler
Line 121:
Line 122: Private Shared __initialized As Boolean
Line 123:
Line 124: Private Shared __stringResource As Object
Line 125:
Line 126: Private Shared __fileDependencies As Object
Line 127:
Line 128: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 129: Public Sub New()
Line 130: MyBase.New
Line 131: Dim dependencies() As String
Line 132:
Line 133: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx.vb",912304)
Line 134: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/pages/MoreLinks.aspx"
Line 135:
Line 136: #End ExternalSource
Line 137: If (Global.ASP.pages_morelinks_aspx.__initialized = false) Then
Line 138: Global.ASP.pages_morelinks_aspx.__stringResource = Me.ReadStringResource
Line 139: dependencies = New String(3) {}
Line 140: dependencies(0) = "~/pages/MoreLinks.aspx"
Line 141: dependencies(1) = "~/MasterPages/LASDHeadFooter.master"
Line 142: dependencies(2) = "~/MasterPages/LASDHeadFooter.master.cs"
Line 143: dependencies(3) = "~/pages/MoreLinks.aspx.vb"
Line 144: Global.ASP.pages_morelinks_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 145: Global.ASP.pages_morelinks_aspx.__initialized = true
Line 146: End If
Line 147: Me.Server.ScriptTimeout = 30000000
Line 148: End Sub
Line 149:
Line 150: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 151: Get
Line 152: Return false
Line 153: End Get
Line 154: End Property
Line 155:
Line 156: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 157: Private Sub __BuildControlContent1(ByVal __ctrl As System.Web.UI.Control)
Line 158: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 159:
Line 160: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",6)
Line 161: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(18953, 789, true))
Line 162:
Line 163: #End ExternalSource
Line 164: End Sub
Line 165:
Line 166: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 167: Private Function __BuildControlLanguageManager1() As Global.GoogleLanguage.WebControls.LanguageManager
Line 168: Dim __ctrl As Global.GoogleLanguage.WebControls.LanguageManager
Line 169:
Line 170: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",28)
Line 171: __ctrl = New Global.GoogleLanguage.WebControls.LanguageManager
Line 172:
Line 173: #End ExternalSource
Line 174: Me.LanguageManager1 = __ctrl
Line 175: __ctrl.TemplateControl = Me
Line 176: __ctrl.ApplyStyleSheetSkin(Me)
Line 177:
Line 178: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",28)
Line 179: __ctrl.ID = "LanguageManager1"
Line 180:
Line 181: #End ExternalSource
Line 182: Return __ctrl
Line 183: End Function
Line 184:
Line 185: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 186: Private Function __BuildControl__control3() As Global.System.Web.UI.ServiceReference
Line 187: Dim __ctrl As Global.System.Web.UI.ServiceReference
Line 188:
Line 189: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",31)
Line 190: __ctrl = New Global.System.Web.UI.ServiceReference
Line 191:
Line 192: #End ExternalSource
Line 193:
Line 194: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",31)
Line 195: __ctrl.Path = "~/PatrolStation.asmx"
Line 196:
Line 197: #End ExternalSource
Line 198: Return __ctrl
Line 199: End Function
Line 200:
Line 201: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 202: Private Sub __BuildControl__control2(ByVal __ctrl As System.Web.UI.ServiceReferenceCollection)
Line 203: Dim __ctrl1 As Global.System.Web.UI.ServiceReference
Line 204:
Line 205: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 206: __ctrl1 = Me.__BuildControl__control3
Line 207:
Line 208: #End ExternalSource
Line 209:
Line 210: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 211: __ctrl.Add(__ctrl1)
Line 212:
Line 213: #End ExternalSource
Line 214: End Sub
Line 215:
Line 216: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 217: Private Function __BuildControlToolkitScriptManager1() As Global.AjaxControlToolkit.ToolkitScriptManager
Line 218: Dim __ctrl As Global.AjaxControlToolkit.ToolkitScriptManager
Line 219:
Line 220: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 221: __ctrl = New Global.AjaxControlToolkit.ToolkitScriptManager
Line 222:
Line 223: #End ExternalSource
Line 224: Me.ToolkitScriptManager1 = __ctrl
Line 225: __ctrl.TemplateControl = Me
Line 226: __ctrl.ApplyStyleSheetSkin(Me)
Line 227:
Line 228: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 229: __ctrl.ID = "ToolkitScriptManager1"
Line 230:
Line 231: #End ExternalSource
Line 232:
Line 233: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",29)
Line 234: Me.__BuildControl__control2(__ctrl.Services)
Line 235:
Line 236: #End ExternalSource
Line 237: Return __ctrl
Line 238: End Function
Line 239:
Line 240: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 241: Private Function __BuildControlcLabel1() As Global.System.Web.UI.WebControls.Label
Line 242: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 243:
Line 244: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",44)
Line 245: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 246:
Line 247: #End ExternalSource
Line 248: Me.cLabel1 = __ctrl
Line 249: __ctrl.TemplateControl = Me
Line 250: __ctrl.ApplyStyleSheetSkin(Me)
Line 251:
Line 252: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",44)
Line 253: __ctrl.ID = "cLabel1"
Line 254:
Line 255: #End ExternalSource
Line 256:
Line 257: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",44)
Line 258: __ctrl.Text = "Search Sheriff's Website"
Line 259:
Line 260: #End ExternalSource
Line 261: Return __ctrl
Line 262: End Function
Line 263:
Line 264: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 265: Private Function __BuildControllblPSSearch() As Global.System.Web.UI.WebControls.Label
Line 266: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 267:
Line 268: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",64)
Line 269: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 270:
Line 271: #End ExternalSource
Line 272: Me.lblPSSearch = __ctrl
Line 273: __ctrl.TemplateControl = Me
Line 274: __ctrl.ApplyStyleSheetSkin(Me)
Line 275:
Line 276: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",64)
Line 277: __ctrl.ID = "lblPSSearch"
Line 278:
Line 279: #End ExternalSource
Line 280:
Line 281: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",64)
Line 282: __ctrl.Text = "Sheriff's Patrol Stations Search"
Line 283:
Line 284: #End ExternalSource
Line 285: Return __ctrl
Line 286: End Function
Line 287:
Line 288: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 289: Private Function __BuildControlcLabel3() As Global.System.Web.UI.WebControls.Label
Line 290: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 291:
Line 292: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",68)
Line 293: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 294:
Line 295: #End ExternalSource
Line 296: Me.cLabel3 = __ctrl
Line 297: __ctrl.TemplateControl = Me
Line 298: __ctrl.ApplyStyleSheetSkin(Me)
Line 299:
Line 300: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",68)
Line 301: __ctrl.ID = "cLabel3"
Line 302:
Line 303: #End ExternalSource
Line 304:
Line 305: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",68)
Line 306: __ctrl.Text = "Enter the full or partial name of your community or city"
Line 307:
Line 308: #End ExternalSource
Line 309: Return __ctrl
Line 310: End Function
Line 311:
Line 312: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 313: Private Function __BuildControlLabelTopStories() As Global.System.Web.UI.WebControls.Label
Line 314: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 315:
Line 316: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",100)
Line 317: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 318:
Line 319: #End ExternalSource
Line 320: Me.LabelTopStories = __ctrl
Line 321: __ctrl.TemplateControl = Me
Line 322: __ctrl.ApplyStyleSheetSkin(Me)
Line 323:
Line 324: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",100)
Line 325: __ctrl.ID = "LabelTopStories"
Line 326:
Line 327: #End ExternalSource
Line 328:
Line 329: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",100)
Line 330: __ctrl.Text = "More"
Line 331:
Line 332: #End ExternalSource
Line 333: Return __ctrl
Line 334: End Function
Line 335:
Line 336: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 337: Private Function __BuildControlPHLinks() As Global.System.Web.UI.WebControls.PlaceHolder
Line 338: Dim __ctrl As Global.System.Web.UI.WebControls.PlaceHolder
Line 339:
Line 340: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",104)
Line 341: __ctrl = New Global.System.Web.UI.WebControls.PlaceHolder
Line 342:
Line 343: #End ExternalSource
Line 344: Me.PHLinks = __ctrl
Line 345: __ctrl.TemplateControl = Me
Line 346:
Line 347: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",104)
Line 348: __ctrl.ID = "PHLinks"
Line 349:
Line 350: #End ExternalSource
Line 351: Return __ctrl
Line 352: End Function
Line 353:
Line 354: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 355: Private Function __BuildControl__control5() As Global.System.Web.UI.WebControls.QueryStringParameter
Line 356: Dim __ctrl As Global.System.Web.UI.WebControls.QueryStringParameter
Line 357:
Line 358: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",121)
Line 359: __ctrl = New Global.System.Web.UI.WebControls.QueryStringParameter
Line 360:
Line 361: #End ExternalSource
Line 362:
Line 363: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",121)
Line 364: __ctrl.DefaultValue = "SHQ"
Line 365:
Line 366: #End ExternalSource
Line 367:
Line 368: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",121)
Line 369: __ctrl.Name = "Station_Code"
Line 370:
Line 371: #End ExternalSource
Line 372:
Line 373: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",121)
Line 374: __ctrl.QueryStringField = "Id"
Line 375:
Line 376: #End ExternalSource
Line 377:
Line 378: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",121)
Line 379: __ctrl.Type = System.TypeCode.[String]
Line 380:
Line 381: #End ExternalSource
Line 382: Return __ctrl
Line 383: End Function
Line 384:
Line 385: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 386: Private Sub __BuildControl__control4(ByVal __ctrl As System.Web.UI.WebControls.ParameterCollection)
Line 387: Dim __ctrl1 As Global.System.Web.UI.WebControls.QueryStringParameter
Line 388:
Line 389: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 390: __ctrl1 = Me.__BuildControl__control5
Line 391:
Line 392: #End ExternalSource
Line 393:
Line 394: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 395: __ctrl.Add(__ctrl1)
Line 396:
Line 397: #End ExternalSource
Line 398: End Sub
Line 399:
Line 400: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 401: Private Function __BuildControlADS_FeaturedService() As Global.System.Web.UI.WebControls.AccessDataSource
Line 402: Dim __ctrl As Global.System.Web.UI.WebControls.AccessDataSource
Line 403:
Line 404: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 405: __ctrl = New Global.System.Web.UI.WebControls.AccessDataSource
Line 406:
Line 407: #End ExternalSource
Line 408: Me.ADS_FeaturedService = __ctrl
Line 409: __ctrl.TemplateControl = Me
Line 410:
Line 411: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 412: __ctrl.ID = "ADS_FeaturedService"
Line 413:
Line 414: #End ExternalSource
Line 415:
Line 416: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 417: __ctrl.DataFile = "~/App_Data/Patrol_Stations.mdb"
Line 418:
Line 419: #End ExternalSource
Line 420:
Line 421: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 422: __ctrl.SelectCommand = "SELECT [Id], [Station_Code], [Title], [Title_Link], [Abstract], [Icon_Link], [Seq"& _
Line 423: "] FROM [tbl_Services] WHERE (([Station_Code] = ?) OR ([Station_Code] = 'SHQ')) O"& _
Line 424: "RDER BY [Seq], [Id] DESC"
Line 425:
Line 426: #End ExternalSource
Line 427:
Line 428: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",117)
Line 429: Me.__BuildControl__control4(__ctrl.SelectParameters)
Line 430:
Line 431: #End ExternalSource
Line 432: Return __ctrl
Line 433: End Function
Line 434:
Line 435: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 436: Private Function __BuildControl__control7() As Global.System.Web.UI.WebControls.QueryStringParameter
Line 437: Dim __ctrl As Global.System.Web.UI.WebControls.QueryStringParameter
Line 438:
Line 439: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",128)
Line 440: __ctrl = New Global.System.Web.UI.WebControls.QueryStringParameter
Line 441:
Line 442: #End ExternalSource
Line 443:
Line 444: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",128)
Line 445: __ctrl.DefaultValue = "SHQ"
Line 446:
Line 447: #End ExternalSource
Line 448:
Line 449: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",128)
Line 450: __ctrl.Name = "Station_Code"
Line 451:
Line 452: #End ExternalSource
Line 453:
Line 454: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",128)
Line 455: __ctrl.QueryStringField = "Id"
Line 456:
Line 457: #End ExternalSource
Line 458:
Line 459: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",128)
Line 460: __ctrl.Type = System.TypeCode.[String]
Line 461:
Line 462: #End ExternalSource
Line 463: Return __ctrl
Line 464: End Function
Line 465:
Line 466: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 467: Private Sub __BuildControl__control6(ByVal __ctrl As System.Web.UI.WebControls.ParameterCollection)
Line 468: Dim __ctrl1 As Global.System.Web.UI.WebControls.QueryStringParameter
Line 469:
Line 470: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 471: __ctrl1 = Me.__BuildControl__control7
Line 472:
Line 473: #End ExternalSource
Line 474:
Line 475: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 476: __ctrl.Add(__ctrl1)
Line 477:
Line 478: #End ExternalSource
Line 479: End Sub
Line 480:
Line 481: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 482: Private Function __BuildControlADS_TopStories() As Global.System.Web.UI.WebControls.AccessDataSource
Line 483: Dim __ctrl As Global.System.Web.UI.WebControls.AccessDataSource
Line 484:
Line 485: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 486: __ctrl = New Global.System.Web.UI.WebControls.AccessDataSource
Line 487:
Line 488: #End ExternalSource
Line 489: Me.ADS_TopStories = __ctrl
Line 490: __ctrl.TemplateControl = Me
Line 491:
Line 492: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 493: __ctrl.ID = "ADS_TopStories"
Line 494:
Line 495: #End ExternalSource
Line 496:
Line 497: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 498: __ctrl.DataFile = "~/App_Data/Patrol_Stations.mdb"
Line 499:
Line 500: #End ExternalSource
Line 501:
Line 502: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 503: __ctrl.SelectCommand = "SELECT [Id], [Station_Code], [Title], [Title_Link], [Abstract], [Icon_Link], [Seq"& _
Line 504: "], [Date_Modified] FROM [tbl_Top_Stories] WHERE (([Station_Code] = ?) OR ([Stati"& _
Line 505: "on_Code] = 'SHQ')) ORDER BY [Seq], [Id] DESC"
Line 506:
Line 507: #End ExternalSource
Line 508:
Line 509: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",124)
Line 510: Me.__BuildControl__control6(__ctrl.SelectParameters)
Line 511:
Line 512: #End ExternalSource
Line 513: Return __ctrl
Line 514: End Function
Line 515:
Line 516: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 517: Private Sub __BuildControlContent2(ByVal __ctrl As System.Web.UI.Control)
Line 518: Dim __ctrl1 As Global.GoogleLanguage.WebControls.LanguageManager
Line 519:
Line 520: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 521: __ctrl1 = Me.__BuildControlLanguageManager1
Line 522:
Line 523: #End ExternalSource
Line 524: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 525:
Line 526: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 527: __parser.AddParsedSubObject(__ctrl1)
Line 528:
Line 529: #End ExternalSource
Line 530: Dim __ctrl2 As Global.AjaxControlToolkit.ToolkitScriptManager
Line 531:
Line 532: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 533: __ctrl2 = Me.__BuildControlToolkitScriptManager1
Line 534:
Line 535: #End ExternalSource
Line 536:
Line 537: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 538: __parser.AddParsedSubObject(__ctrl2)
Line 539:
Line 540: #End ExternalSource
Line 541: Dim __ctrl3 As Global.System.Web.UI.WebControls.Label
Line 542:
Line 543: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 544: __ctrl3 = Me.__BuildControlcLabel1
Line 545:
Line 546: #End ExternalSource
Line 547:
Line 548: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 549: __parser.AddParsedSubObject(__ctrl3)
Line 550:
Line 551: #End ExternalSource
Line 552: Dim __ctrl4 As Global.System.Web.UI.WebControls.Label
Line 553:
Line 554: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 555: __ctrl4 = Me.__BuildControllblPSSearch
Line 556:
Line 557: #End ExternalSource
Line 558:
Line 559: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 560: __parser.AddParsedSubObject(__ctrl4)
Line 561:
Line 562: #End ExternalSource
Line 563: Dim __ctrl5 As Global.System.Web.UI.WebControls.Label
Line 564:
Line 565: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 566: __ctrl5 = Me.__BuildControlcLabel3
Line 567:
Line 568: #End ExternalSource
Line 569:
Line 570: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 571: __parser.AddParsedSubObject(__ctrl5)
Line 572:
Line 573: #End ExternalSource
Line 574: Dim __ctrl6 As Global.System.Web.UI.WebControls.Label
Line 575:
Line 576: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 577: __ctrl6 = Me.__BuildControlLabelTopStories
Line 578:
Line 579: #End ExternalSource
Line 580:
Line 581: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 582: __parser.AddParsedSubObject(__ctrl6)
Line 583:
Line 584: #End ExternalSource
Line 585: Dim __ctrl7 As Global.System.Web.UI.WebControls.PlaceHolder
Line 586:
Line 587: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 588: __ctrl7 = Me.__BuildControlPHLinks
Line 589:
Line 590: #End ExternalSource
Line 591:
Line 592: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 593: __parser.AddParsedSubObject(__ctrl7)
Line 594:
Line 595: #End ExternalSource
Line 596: Dim __ctrl8 As Global.System.Web.UI.WebControls.AccessDataSource
Line 597:
Line 598: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 599: __ctrl8 = Me.__BuildControlADS_FeaturedService
Line 600:
Line 601: #End ExternalSource
Line 602:
Line 603: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 604: __parser.AddParsedSubObject(__ctrl8)
Line 605:
Line 606: #End ExternalSource
Line 607: Dim __ctrl9 As Global.System.Web.UI.WebControls.AccessDataSource
Line 608:
Line 609: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 610: __ctrl9 = Me.__BuildControlADS_TopStories
Line 611:
Line 612: #End ExternalSource
Line 613:
Line 614: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 615: __parser.AddParsedSubObject(__ctrl9)
Line 616:
Line 617: #End ExternalSource
Line 618: __ctrl.SetRenderMethodDelegate(AddressOf Me.__RenderContent2)
Line 619: End Sub
Line 620:
Line 621: Private Sub __RenderContent2(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 622: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 623: parameterContainer.Controls(0).RenderControl(__w)
Line 624: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 625: parameterContainer.Controls(1).RenderControl(__w)
Line 626: Me.WriteUTF8ResourceString(__w, 19742, 309, true)
Line 627: parameterContainer.Controls(2).RenderControl(__w)
Line 628: Me.WriteUTF8ResourceString(__w, 20051, 434, true)
Line 629: parameterContainer.Controls(3).RenderControl(__w)
Line 630: __w.Write(""&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)&" </div>"&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)&" <!-- End of Title Bar for portlet-->"&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)&" <div c"& _
Line 631: "lass=""wpsPortletBody"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 632: parameterContainer.Controls(4).RenderControl(__w)
Line 633: Me.WriteUTF8ResourceString(__w, 20485, 523, true)
Line 634: parameterContainer.Controls(5).RenderControl(__w)
Line 635: __w.Write(""&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(9)&"</div>"&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(9)&"<!-- End of Title Bar for portlet -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <d"& _
Line 636: "iv class=""wpsPortletBody3"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 637: parameterContainer.Controls(6).RenderControl(__w)
Line 638: __w.Write(""&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(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</div>"&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)&"</div>"&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)&"<!--End portlet: Top Stor"& _
Line 639: "y-->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 640:
Line 641: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",110)
Line 642: langClient()
Line 643:
Line 644: #End ExternalSource
Line 645: __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(9)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&" <!--End cell for main co"& _
Line 646: "ntent area -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- Database Queries -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""display:b"& _
Line 647: "lock; text-align:left;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 648: parameterContainer.Controls(7).RenderControl(__w)
Line 649: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 650: parameterContainer.Controls(8).RenderControl(__w)
Line 651: __w.Write(""&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)&" </div> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 652: End Sub
Line 653:
Line 654: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 655: Private Sub __BuildControlTree(ByVal __ctrl As pages_morelinks_aspx)
Line 656:
Line 657: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",1)
Line 658: __ctrl.MasterPageFile = "~/MasterPages/lasdheadfooter.master"
Line 659:
Line 660: #End ExternalSource
Line 661:
Line 662: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",1)
Line 663: __ctrl.Title = "Untitled Page"
Line 664:
Line 665: #End ExternalSource
Line 666:
Line 667: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",1)
Line 668: Me.InitializeCulture
Line 669:
Line 670: #End ExternalSource
Line 671:
Line 672: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",6)
Line 673: Me.AddContentTemplate("head", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent1))
Line 674:
Line 675: #End ExternalSource
Line 676:
Line 677: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",27)
Line 678: Me.AddContentTemplate("ContentPlaceHolder1", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent2))
Line 679:
Line 680: #End ExternalSource
Line 681: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 682:
Line 683: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",1)
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:
Line 688: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx",1)
Line 689: __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 690:
Line 691: #End ExternalSource
Line 692: End Sub
Line 693:
Line 694:
Line 695: #ExternalSource("C:\Domains\shq.lasdnews.net\pages\MoreLinks.aspx.vb",912304)
Line 696: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 697: Protected Overrides Sub FrameworkInitialize()
Line 698: MyBase.FrameworkInitialize
Line 699: Me.SetStringResourcePointer(Global.ASP.pages_morelinks_aspx.__stringResource, 0)
Line 700: Me.__BuildControlTree(Me)
Line 701: Me.AddWrappedFileDependencies(Global.ASP.pages_morelinks_aspx.__fileDependencies)
Line 702: Me.Request.ValidateInput
Line 703: End Sub
Line 704:
Line 705: #End ExternalSource
Line 706:
Line 707: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 708: Public Overrides Function GetTypeHashCode() As Integer
Line 709: Return 280338843
Line 710: End Function
Line 711:
Line 712: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 713: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 714: MyBase.ProcessRequest(context)
Line 715: End Sub
Line 716: End Class
Line 717: End Namespace
Line 718:
|