Line 1: #ExternalChecksum("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","F7D18A2DE09C15587A24F71D084916FC22E13FCE")
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 EmailCMS
Line 17: Imports Microsoft.VisualBasic
Line 18: Imports System
Line 19: Imports System.Collections
Line 20: Imports System.Collections.Generic
Line 21: Imports System.Collections.Specialized
Line 22: Imports System.Configuration
Line 23: Imports System.Data
Line 24: Imports System.Data.SqlClient
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.DynamicData
Line 30: Imports System.Web.Profile
Line 31: Imports System.Web.Security
Line 32: Imports System.Web.SessionState
Line 33: Imports System.Web.UI
Line 34: Imports System.Web.UI.HtmlControls
Line 35: Imports System.Web.UI.WebControls
Line 36: Imports System.Web.UI.WebControls.Expressions
Line 37: Imports System.Web.UI.WebControls.WebParts
Line 38:
Line 39:
Line 40: Partial Public Class CollegeAr
Line 41: Implements System.Web.SessionState.IRequiresSessionState
Line 42:
Line 43: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 44: Get
Line 45: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 46: End Get
Line 47: End Property
Line 48:
Line 49: Protected ReadOnly Property ApplicationInstance() As ASP.global_asax
Line 50: Get
Line 51: Return CType(Me.Context.ApplicationInstance,ASP.global_asax)
Line 52: End Get
Line 53: End Property
Line 54: End Class
Line 55:
Line 56: Namespace ASP
Line 57:
Line 58: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 59: Public Class deanshipsen_aspx
Line 60: Inherits Global.CollegeAr
Line 61: Implements System.Web.IHttpHandler
Line 62:
Line 63: Private Shared __PageInspector_SetTraceDataMethod As System.Reflection.MethodInfo = Global.ASP.deanshipsen_aspx.__PageInspector_LoadHelper("SetTraceData")
Line 64:
Line 65: Private Shared __PageInspector_BeginRenderTracingMethod As System.Reflection.MethodInfo = Global.ASP.deanshipsen_aspx.__PageInspector_LoadHelper("BeginRenderTracing")
Line 66:
Line 67: Private Shared __PageInspector_EndRenderTracingMethod As System.Reflection.MethodInfo = Global.ASP.deanshipsen_aspx.__PageInspector_LoadHelper("EndRenderTracing")
Line 68:
Line 69: Private Shared __initialized As Boolean
Line 70:
Line 71: Private Shared __stringResource As Object
Line 72:
Line 73: Private Shared __fileDependencies As Object
Line 74:
Line 75: Private Shared __outputCacheSettings As System.Web.UI.OutputCacheParameters = Nothing
Line 76:
Line 77: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 78: Public Sub New()
Line 79: MyBase.New
Line 80: Dim dependencies() As String
Line 81:
Line 82: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx.vb",912304)
Line 83: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/DeanshipsEn.aspx"
Line 84:
Line 85: #End ExternalSource
Line 86: If (Global.ASP.deanshipsen_aspx.__initialized = false) Then
Line 87: Global.ASP.deanshipsen_aspx.__stringResource = Me.ReadStringResource
Line 88: dependencies = New String(3) {}
Line 89: dependencies(0) = "~/DeanshipsEn.aspx"
Line 90: dependencies(1) = "~/DeanshipsEn.aspx.vb"
Line 91: dependencies(2) = "~/NewMasterPageEn.master"
Line 92: dependencies(3) = "~/NewMasterPageEn.master.vb"
Line 93: Global.ASP.deanshipsen_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 94: Global.ASP.deanshipsen_aspx.__initialized = true
Line 95: End If
Line 96: Me.Server.ScriptTimeout = 30000000
Line 97: If (Global.ASP.deanshipsen_aspx.__outputCacheSettings Is Nothing) Then
Line 98: Dim outputCacheSettings As System.Web.UI.OutputCacheParameters
Line 99: outputCacheSettings = New System.Web.UI.OutputCacheParameters()
Line 100: outputCacheSettings.Duration = 7200
Line 101: outputCacheSettings.VaryByParam = Nothing
Line 102: Global.ASP.deanshipsen_aspx.__outputCacheSettings = outputCacheSettings
Line 103: End If
Line 104: End Sub
Line 105:
Line 106: Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 107: Get
Line 108: Return false
Line 109: End Get
Line 110: End Property
Line 111:
Line 112: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 113: Private Function __BuildControl__control2() As Global.System.Web.UI.LiteralControl
Line 114: Dim __ctrl As Global.System.Web.UI.LiteralControl
Line 115: __ctrl = New Global.System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 116: __ctrl.TemplateControl = Me
Line 117: Me.__PageInspector_SetTraceData(New Object() {__ctrl, Nothing, 276, 2, true})
Line 118: Return __ctrl
Line 119: End Function
Line 120:
Line 121: Private Shared Function __PageInspector_LoadHelper(ByVal helperName As String) As System.Reflection.MethodInfo
Line 122: Dim helperClass As System.Type = System.Type.GetType("Microsoft.WebTools.BrowserLink.Runtime.WebForms.TraceHelpers, Microsoft.WebTools."& _
Line 123: "BrowserLink.Tracing, Version=17.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f1"& _
Line 124: "1d50a3a", false, false)
Line 125: If (Not (helperClass) Is Nothing) Then
Line 126: Return helperClass.GetMethod(helperName)
Line 127: End If
Line 128: Return Nothing
Line 129: End Function
Line 130:
Line 131: Private Sub __PageInspector_SetTraceData(ByVal parameters() As Object)
Line 132: If (Not (Global.ASP.deanshipsen_aspx.__PageInspector_SetTraceDataMethod) Is Nothing) Then
Line 133: Global.ASP.deanshipsen_aspx.__PageInspector_SetTraceDataMethod.Invoke(Nothing, parameters)
Line 134: End If
Line 135: End Sub
Line 136:
Line 137: Private Sub __PageInspector_BeginRenderTracing(ByVal parameters() As Object)
Line 138: If (Not (Global.ASP.deanshipsen_aspx.__PageInspector_BeginRenderTracingMethod) Is Nothing) Then
Line 139: Global.ASP.deanshipsen_aspx.__PageInspector_BeginRenderTracingMethod.Invoke(Nothing, parameters)
Line 140: End If
Line 141: End Sub
Line 142:
Line 143: Private Sub __PageInspector_EndRenderTracing(ByVal parameters() As Object)
Line 144: If (Not (Global.ASP.deanshipsen_aspx.__PageInspector_EndRenderTracingMethod) Is Nothing) Then
Line 145: Global.ASP.deanshipsen_aspx.__PageInspector_EndRenderTracingMethod.Invoke(Nothing, parameters)
Line 146: End If
Line 147: End Sub
Line 148:
Line 149: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 150: Private Sub __BuildControlContent1(ByVal __ctrl As System.Web.UI.Control)
Line 151: Dim __ctrl1 As Global.System.Web.UI.LiteralControl
Line 152:
Line 153: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",6)
Line 154: __ctrl1 = Me.__BuildControl__control2
Line 155:
Line 156: #End ExternalSource
Line 157: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 158:
Line 159: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",6)
Line 160: __parser.AddParsedSubObject(__ctrl1)
Line 161:
Line 162: #End ExternalSource
Line 163: End Sub
Line 164:
Line 165: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 166: Private Sub __BuildControlContent2(ByVal __ctrl As System.Web.UI.Control)
Line 167: __ctrl.SetRenderMethodDelegate(AddressOf Me.__RenderContent2)
Line 168: End Sub
Line 169:
Line 170: Private Sub __RenderContent2(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 171: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 383, 6, true})
Line 172: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 173: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 174: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 519, 65, true})
Line 175: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- Navigation -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <main id=""main"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 176: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 177: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 584, 579, false})
Line 178:
Line 179: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",20)
Line 180:
Line 181: Try
Line 182: Dim dts As DataTable = Show_SCR.Show_Articles_In_View_last(276, 1, 1)
Line 183: Dim dts2 As DataTable = Show_SCR.Show_Articles_In_View_orderasc(399, 1, 1)
Line 184: Dim dtCat2 As DataTable = Show_SCR.Show_CategoryM(276, 1)
Line 185: Dim MCatName As String = dtCat2.Rows(0)("C_Name").ToString
Line 186:
Line 187:
Line 188: #End ExternalSource
Line 189:
Line 190: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",27)
Line 191:
Line 192: If dts.Rows.Count > 0 Then
Line 193: Dim A_Img As String = ResolveUrl(dts.Rows(0)("A_Img").ToString)
Line 194: Dim A_Title As String = dts.Rows(0)("A_Title").ToString
Line 195:
Line 196:
Line 197: #End ExternalSource
Line 198: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 199: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 1163, 279, true})
Line 200: Me.WriteUTF8ResourceString(__w, 0, 279, true)
Line 201: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 202: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 1442, 14, false})
Line 203:
Line 204: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",40)
Line 205: __w.Write( MCatName)
Line 206:
Line 207:
Line 208: #End ExternalSource
Line 209: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 210: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 1456, 523, true})
Line 211: Me.WriteUTF8ResourceString(__w, 279, 523, true)
Line 212: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 213: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 1979, 14, false})
Line 214:
Line 215: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",55)
Line 216: __w.Write(MCatName )
Line 217:
Line 218:
Line 219: #End ExternalSource
Line 220: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 221: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 1993, 73, true})
Line 222: __w.Write("</h2>"&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)&" ")
Line 223: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 224: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 2066, 2511, false})
Line 225:
Line 226: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",58)
Line 227:
Line 228: Try
Line 229: Dim Show_SCR As New Show_SCR
Line 230:
Line 231: Dim dt As DataTable = Show_SCR.Show_Articles(276, 1, 1)
Line 232: 'Dim dt As DataTable = Show_SCR.Show_Articles(302, 1, 1)
Line 233:
Line 234: Dim dt2 As DataTable = Show_SCR.Show_Articles(AHUPhotoGallery, 1, 1)
Line 235:
Line 236:
Line 237:
Line 238: #End ExternalSource
Line 239:
Line 240: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",68)
Line 241:
Line 242:
Line 243: For i As Integer = 0 To dt.Rows.Count - 1
Line 244: If i = 1 Then
Line 245: Exit For
Line 246: End If
Line 247:
Line 248: Dim A_ID As String = dt.Rows(0)(0).ToString
Line 249: Dim img As String = ResolveUrl(dt.Rows(0)(1))
Line 250: ' Dim A_Title As String = dt.Rows(0)(2).ToString
Line 251: Dim A_Text As String = dt.Rows(0)(4).ToString
Line 252: Dim A_link As String = dt.Rows(0)(3).ToString
Line 253: Dim Author As String = dt.Rows(0)("Author").ToString
Line 254: Dim A_Img2 As String = ResolveUrl(dt.Rows(0)("A_Img2").ToString)
Line 255: Dim A_ImgTop As String = ResolveUrl(dt2.Rows(0)(1))
Line 256: Dim A_link2 As String = dt2.Rows(0)(3).ToString
Line 257: Dim A_Title2 As String = dt2.Rows(0)(2).ToString
Line 258: Dim Link_type2 As Integer = CInt(dt2.Rows(0)("Link_type").ToString)
Line 259: Dim A_ID2 As String = dt2.Rows(0)(0).ToString
Line 260: If Link_type2 = 2 Then
Line 261: A_link2 = "En-article-" & A_ID2
Line 262: End If
Line 263:
Line 264:
Line 265: A_Text = HTMLStriper.NewStripHTMLv1(A_Text)
Line 266: If A_Text.Length > 250 Then
Line 267: A_Text = A_Text.Substring(0, 250) & "..."
Line 268: End If
Line 269: Dim Link_type As Integer = CInt(dt.Rows(0)("Link_type").ToString)
Line 270: If Link_type = 2 Then
Line 271: A_link = "En-article-" & A_ID
Line 272: End If
Line 273:
Line 274:
Line 275: #End ExternalSource
Line 276: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 277: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 4577, 113, true})
Line 278: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""full"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 279: " <p style=""text-align: justify"">")
Line 280: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 281: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 4690, 12, false})
Line 282:
Line 283: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",102)
Line 284: __w.Write(A_Text )
Line 285:
Line 286:
Line 287: #End ExternalSource
Line 288: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 289: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 4702, 167, true})
Line 290: __w.Write("</p>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class="& _
Line 291: """full"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a class=""hvr-radial-out button-theme"" "& _
Line 292: "href='")
Line 293: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 294: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 4869, 12, false})
Line 295:
Line 296: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",105)
Line 297: __w.Write(A_link )
Line 298:
Line 299:
Line 300: #End ExternalSource
Line 301: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 302: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 4881, 237, true})
Line 303: __w.Write("'>Read more</a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </di"& _
Line 304: "v>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""col-md-6 hid4Mob"& _
Line 305: """>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""full"" style=""background-image: url('")
Line 306: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 307: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5118, 9, false})
Line 308:
Line 309: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",110)
Line 310: __w.Write(img )
Line 311:
Line 312:
Line 313: #End ExternalSource
Line 314: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 315: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5127, 136, true})
Line 316: __w.Write(" '); height: 400px; background-size: contain; background-repeat: no-repeat; backg"& _
Line 317: "round-position: center;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 318: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 319: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5304, 231, true})
Line 320: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""full"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 321: " <h5 style=""text-align: Center"">The Dean</h5>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 322: " <h4 style=""text-align: Center; margin-top: -10px;"">")
Line 323: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 324: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5535, 12, false})
Line 325:
Line 326: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",115)
Line 327: __w.Write(Author )
Line 328:
Line 329:
Line 330: #End ExternalSource
Line 331: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 332: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5547, 109, true})
Line 333: __w.Write("</h4>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 334: " </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 335: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 336: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5656, 174, false})
Line 337:
Line 338: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",120)
Line 339: Next
Line 340:
Line 341: #End ExternalSource
Line 342:
Line 343: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",121)
Line 344:
Line 345: Catch ex As Exception
Line 346: Response.Write(ex.Message)
Line 347: End Try
Line 348:
Line 349:
Line 350: #End ExternalSource
Line 351: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 352: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5830, 76, true})
Line 353: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- end section -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 354: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 355: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5906, 12, false})
Line 356:
Line 357: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",129)
Line 358: End If
Line 359:
Line 360: #End ExternalSource
Line 361: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 362: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 5918, 795, true})
Line 363: Me.WriteUTF8ResourceString(__w, 802, 795, true)
Line 364: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 365: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 6713, 1636, false})
Line 366:
Line 367: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",153)
Line 368:
Line 369: Try
Line 370:
Line 371: Dim dtcat As DataTable = Show_SCR.View_Products(1806, 1)
Line 372:
Line 373:
Line 374:
Line 375: #End ExternalSource
Line 376:
Line 377: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",159)
Line 378:
Line 379:
Line 380: For j As Integer = 0 To dtcat.Rows.Count - 1
Line 381:
Line 382:
Line 383: Dim A_IDS As String = dtcat.Rows(j)(0).ToString
Line 384: Dim imgS As String = ResolveUrl(dtcat.Rows(j)(1))
Line 385: Dim A_TitleS As String = dtcat.Rows(j)(1).ToString
Line 386: Dim A_TextS As String = dtcat.Rows(j)(4).ToString
Line 387: Dim A_linkS As String = "En-article-" + dtcat.Rows(j)(0).ToString
Line 388: Dim AuthorS As String = dtcat.Rows(j)("Author").ToString
Line 389: Dim A_Img2S As String = ResolveUrl(dtcat.Rows(j)("A_Img2").ToString)
Line 390: Dim A_ImgTopS As String = ResolveUrl(dtcat.Rows(j)(1))
Line 391:
Line 392:
Line 393:
Line 394: A_TextS = HTMLStriper.NewStripHTMLv1(A_TextS)
Line 395: If A_TextS.Length > 250 Then
Line 396: A_TextS = A_TextS.Substring(0, 250) & "..."
Line 397: End If
Line 398: Dim Link_typeS As Integer = CInt(dtcat.Rows(j)("Link_type").ToString)
Line 399: A_linkS = "En-CenterInner-" & A_IDS
Line 400: If Link_typeS = 2 Then
Line 401: A_linkS = "En-CenterInner-" & A_IDS
Line 402: End If
Line 403: If A_IDS = 4999 Then
Line 404: A_linkS = "En-Category-" & A_IDS
Line 405:
Line 406:
Line 407: #End ExternalSource
Line 408: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 409: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8349, 97, true})
Line 410: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""col-lg-4 col-md-2 col-sm-2"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 411: " <a href=""")
Line 412: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 413: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8446, 12, false})
Line 414:
Line 415: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",188)
Line 416: __w.Write(A_linkS)
Line 417:
Line 418:
Line 419: #End ExternalSource
Line 420: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 421: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8458, 205, true})
Line 422: __w.Write(""">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""service_blog"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 423: " <div class=""service_icons"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div"& _
Line 424: " class=""full"" style=""background-image: url('")
Line 425: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 426: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8663, 14, false})
Line 427:
Line 428: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",191)
Line 429: __w.Write(A_Img2S )
Line 430:
Line 431:
Line 432: #End ExternalSource
Line 433: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 434: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8677, 146, true})
Line 435: __w.Write(" '); height: 120px; background-size: cover; background-repeat: no-repeat; backgro"& _
Line 436: "und-position: center;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 437: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 438: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 8864, 82, true})
Line 439: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 440: " ")
Line 441: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 442: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9037, 134, true})
Line 443: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div cl"& _
Line 444: "ass=""full"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <h4>")
Line 445: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 446: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9171, 14, false})
Line 447:
Line 448: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",197)
Line 449: __w.Write(A_TitleS )
Line 450:
Line 451:
Line 452: #End ExternalSource
Line 453: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 454: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9185, 79, true})
Line 455: __w.Write("</h4>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 456: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 457: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9332, 118, true})
Line 458: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 459: " </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 460: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 461: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9450, 198, false})
Line 462:
Line 463: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",206)
Line 464: Next
Line 465:
Line 466: #End ExternalSource
Line 467:
Line 468: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",209)
Line 469:
Line 470: Catch ex As Exception
Line 471: Response.Write(ex.Message)
Line 472: End Try
Line 473:
Line 474:
Line 475: #End ExternalSource
Line 476: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 477: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 9648, 768, true})
Line 478: Me.WriteUTF8ResourceString(__w, 1597, 768, true)
Line 479: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 480: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 10416, 1699, false})
Line 481:
Line 482: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",237)
Line 483:
Line 484: Try
Line 485:
Line 486: Dim dtcat As DataTable = Show_SCR.Show_Articles(276, 1, 1)
Line 487:
Line 488:
Line 489:
Line 490: #End ExternalSource
Line 491:
Line 492: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",243)
Line 493:
Line 494:
Line 495: For g As Integer = 0 To dtcat.Rows.Count - 1
Line 496:
Line 497:
Line 498: Dim A_IDn As String = dtcat.Rows(g)(0).ToString
Line 499: Dim imgn As String = ResolveUrl(dtcat.Rows(g)(1))
Line 500: Dim A_Titlen As String = dtcat.Rows(g)(2).ToString
Line 501: Dim A_Textn As String = dtcat.Rows(g)(4).ToString
Line 502: Dim A_linkn As String = "En-article-" + dtcat.Rows(g)(0).ToString
Line 503: Dim Authorn As String = dtcat.Rows(g)("Author").ToString
Line 504: Dim A_Img2n As String = ResolveUrl(dtcat.Rows(g)("A_Img2").ToString)
Line 505: Dim NewDays As String = dtcat.Rows(g)(5).ToString
Line 506: Dim NewMonths As String = dtcat.Rows(g)(6).ToString
Line 507:
Line 508: If A_Titlen.Length > 90 Then
Line 509: A_Titlen = A_Titlen.Substring(0, 90) & "..."
Line 510: End If
Line 511:
Line 512: A_Textn = HTMLStriper.NewStripHTMLv1(A_Textn)
Line 513: If A_Textn.Length > 150 Then
Line 514: A_Textn = A_Textn.Substring(0, 150) & "..."
Line 515: End If
Line 516: Dim Link_typeS As Integer = CInt(dtcat.Rows(g)("Link_type").ToString)
Line 517: If Link_typeS = 2 Then
Line 518: A_linkn = "En-article-" & A_IDn
Line 519: End If
Line 520:
Line 521:
Line 522: #End ExternalSource
Line 523: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 524: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12115, 88, true})
Line 525: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""col-sm-6 col-md-4"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a"& _
Line 526: " href=""")
Line 527: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 528: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12203, 13, false})
Line 529:
Line 530: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",272)
Line 531: __w.Write(A_linkn )
Line 532:
Line 533:
Line 534: #End ExternalSource
Line 535: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 536: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12216, 138, true})
Line 537: __w.Write(""">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""service_blog"" style=""max-height: 150p"& _
Line 538: "x; min-height: 150px;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 539: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 540: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12651, 94, true})
Line 541: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""full"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 542: " <h4>")
Line 543: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 544: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12745, 14, false})
Line 545:
Line 546: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",281)
Line 547: __w.Write(A_Titlen )
Line 548:
Line 549:
Line 550: #End ExternalSource
Line 551: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 552: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12759, 165, true})
Line 553: __w.Write("</h4>"&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)&" </di"& _
Line 554: "v>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&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)&" "& _
Line 555: " ")
Line 556: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 557: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 12924, 198, false})
Line 558:
Line 559: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",288)
Line 560: Next
Line 561:
Line 562: #End ExternalSource
Line 563:
Line 564: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",291)
Line 565:
Line 566: Catch ex As Exception
Line 567: Response.Write(ex.Message)
Line 568: End Try
Line 569:
Line 570:
Line 571: #End ExternalSource
Line 572: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 573: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 13122, 971, true})
Line 574: Me.WriteUTF8ResourceString(__w, 2365, 971, true)
Line 575: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 576: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 14093, 2322, false})
Line 577:
Line 578: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",323)
Line 579:
Line 580: Try
Line 581: Dim Show_SCR As New Show_SCR
Line 582:
Line 583: Dim dt As DataTable = Show_SCR.Show_Articles_In_View_last(313, 1, 1)
Line 584:
Line 585:
Line 586:
Line 587:
Line 588:
Line 589: #End ExternalSource
Line 590:
Line 591: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",332)
Line 592:
Line 593:
Line 594: For i As Integer = 0 To dt.Rows.Count - 1
Line 595: If i = 7 Then
Line 596: Exit For
Line 597: End If
Line 598: Dim A_ID As String = dt.Rows(i)(0).ToString
Line 599: Dim img As String = ResolveUrl(dt.Rows(i)(1))
Line 600: Dim A_Title As String = dt.Rows(i)(2).ToString
Line 601: If A_Title.Length > 71 Then
Line 602: A_Title = A_Title.Substring(0, 70) + "..."
Line 603: End If
Line 604: Dim A_Text As String = dt.Rows(i)(4).ToString
Line 605: Dim A_link As String = dt.Rows(i)(3).ToString
Line 606: Dim A_Img2 As String = ResolveUrl(dt.Rows(i)("A_Img2").ToString)
Line 607:
Line 608: Dim news_day As String = dt.Rows(i)("news_day").ToString
Line 609: Dim news_month As String = dt.Rows(i)("news_month").ToString
Line 610: Dim news_year As String = dt.Rows(i)("news_year").ToString
Line 611: 'A_Text = HTMLStriper.NewStripHTMLv1(A_Text)
Line 612: 'If A_Text.Length > 250 Then
Line 613: ' A_Text = A_Text.Substring(0, 250)
Line 614: 'End If
Line 615: Dim Link_type As Integer = CInt(dt.Rows(i)("Link_type").ToString)
Line 616: If Link_type = 2 Then
Line 617: A_link = "En-article-" & A_ID
Line 618: End If
Line 619:
Line 620:
Line 621: #End ExternalSource
Line 622: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 623: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16415, 47, true})
Line 624: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a href='")
Line 625: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 626: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16462, 11, false})
Line 627:
Line 628: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",360)
Line 629: __w.Write(A_link)
Line 630:
Line 631:
Line 632: #End ExternalSource
Line 633: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 634: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16473, 293, true})
Line 635: Me.WriteUTF8ResourceString(__w, 3336, 293, true)
Line 636: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 637: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16766, 13, false})
Line 638:
Line 639: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",363)
Line 640: __w.Write(news_day)
Line 641:
Line 642:
Line 643: #End ExternalSource
Line 644: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 645: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16779, 1, true})
Line 646: __w.Write(",")
Line 647: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 648: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16780, 15, false})
Line 649:
Line 650: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",363)
Line 651: __w.Write(news_month)
Line 652:
Line 653:
Line 654: #End ExternalSource
Line 655: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 656: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16795, 1, true})
Line 657: __w.Write(",")
Line 658: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 659: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16796, 14, false})
Line 660:
Line 661: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",363)
Line 662: __w.Write(news_year)
Line 663:
Line 664:
Line 665: #End ExternalSource
Line 666: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 667: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16810, 147, true})
Line 668: __w.Write("</h6>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""padding-bottom: -5"& _
Line 669: "px !important;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 670: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 671: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16957, 12, false})
Line 672:
Line 673: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",365)
Line 674: __w.Write(A_Title)
Line 675:
Line 676:
Line 677: #End ExternalSource
Line 678: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 679: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 16969, 180, true})
Line 680: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 681: " </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 682: " ")
Line 683: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 684: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 17149, 273, false})
Line 685:
Line 686: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",369)
Line 687: Next
Line 688:
Line 689: #End ExternalSource
Line 690:
Line 691: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",370)
Line 692:
Line 693: Catch ex As Exception
Line 694: Response.Write(ex.Message)
Line 695: End Try
Line 696:
Line 697:
Line 698: #End ExternalSource
Line 699: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 700: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 17422, 74, true})
Line 701: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 702: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 703: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 17649, 823, true})
Line 704: Me.WriteUTF8ResourceString(__w, 3629, 823, true)
Line 705: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 706: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 18472, 2322, false})
Line 707:
Line 708: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",400)
Line 709:
Line 710: Try
Line 711: Dim Show_SCR As New Show_SCR
Line 712:
Line 713: Dim dt As DataTable = Show_SCR.Show_Articles_In_View_last(400, 1, 1)
Line 714:
Line 715:
Line 716:
Line 717:
Line 718:
Line 719: #End ExternalSource
Line 720:
Line 721: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",409)
Line 722:
Line 723:
Line 724: For i As Integer = 0 To dt.Rows.Count - 1
Line 725: If i = 7 Then
Line 726: Exit For
Line 727: End If
Line 728: Dim A_ID As String = dt.Rows(i)(0).ToString
Line 729: Dim img As String = ResolveUrl(dt.Rows(i)(1))
Line 730: Dim A_Title As String = dt.Rows(i)(2).ToString
Line 731: If A_Title.Length > 71 Then
Line 732: A_Title = A_Title.Substring(0, 70) + "..."
Line 733: End If
Line 734: Dim A_Text As String = dt.Rows(i)(4).ToString
Line 735: Dim A_link As String = dt.Rows(i)(3).ToString
Line 736: Dim A_Img2 As String = ResolveUrl(dt.Rows(i)("A_Img2").ToString)
Line 737:
Line 738: Dim news_day As String = dt.Rows(i)("news_day").ToString
Line 739: Dim news_month As String = dt.Rows(i)("news_month").ToString
Line 740: Dim news_year As String = dt.Rows(i)("news_year").ToString
Line 741: 'A_Text = HTMLStriper.NewStripHTMLv1(A_Text)
Line 742: 'If A_Text.Length > 250 Then
Line 743: ' A_Text = A_Text.Substring(0, 250)
Line 744: 'End If
Line 745: Dim Link_type As Integer = CInt(dt.Rows(i)("Link_type").ToString)
Line 746: If Link_type = 2 Then
Line 747: A_link = "En-article-" & A_ID
Line 748: End If
Line 749:
Line 750:
Line 751: #End ExternalSource
Line 752: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 753: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 20794, 47, true})
Line 754: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a href='")
Line 755: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 756: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 20841, 11, false})
Line 757:
Line 758: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",437)
Line 759: __w.Write(A_link)
Line 760:
Line 761:
Line 762: #End ExternalSource
Line 763: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 764: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 20852, 293, true})
Line 765: Me.WriteUTF8ResourceString(__w, 4452, 293, true)
Line 766: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 767: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21145, 13, false})
Line 768:
Line 769: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",440)
Line 770: __w.Write(news_day)
Line 771:
Line 772:
Line 773: #End ExternalSource
Line 774: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 775: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21158, 1, true})
Line 776: __w.Write(",")
Line 777: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 778: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21159, 15, false})
Line 779:
Line 780: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",440)
Line 781: __w.Write(news_month)
Line 782:
Line 783:
Line 784: #End ExternalSource
Line 785: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 786: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21174, 1, true})
Line 787: __w.Write(",")
Line 788: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 789: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21175, 14, false})
Line 790:
Line 791: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",440)
Line 792: __w.Write(news_year)
Line 793:
Line 794:
Line 795: #End ExternalSource
Line 796: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 797: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21189, 147, true})
Line 798: __w.Write("</h6>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""padding-bottom: -5"& _
Line 799: "px !important;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 800: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 801: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21336, 12, false})
Line 802:
Line 803: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",442)
Line 804: __w.Write(A_Title)
Line 805:
Line 806:
Line 807: #End ExternalSource
Line 808: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 809: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21348, 180, true})
Line 810: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 811: " </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </a>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 812: " ")
Line 813: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 814: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21528, 273, false})
Line 815:
Line 816: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",446)
Line 817: Next
Line 818:
Line 819: #End ExternalSource
Line 820:
Line 821: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",447)
Line 822:
Line 823: Catch ex As Exception
Line 824: Response.Write(ex.Message)
Line 825: End Try
Line 826:
Line 827:
Line 828: #End ExternalSource
Line 829: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 830: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 21801, 74, true})
Line 831: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 832: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 833: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 22028, 228, true})
Line 834: __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 835: " </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 836: " <!-- end section -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- section -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 837: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 838: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 22256, 95, false})
Line 839:
Line 840: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",467)
Line 841:
Line 842: Dim A_Img233 As String = ResolveUrl(dts2.Rows(0)("A_Img").ToString)
Line 843:
Line 844:
Line 845: #End ExternalSource
Line 846: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 847: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 22351, 245, true})
Line 848: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div class=""section dark banner"" style=""background: #12385b; position: "& _
Line 849: "relative; background-position: center; background-size: cover; background-repeat"& _
Line 850: ": no-repeat; background-attachment: fixed; min-height: 100%; background-image: u"& _
Line 851: "rl('")
Line 852: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 853: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 22596, 13, false})
Line 854:
Line 855: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",470)
Line 856: __w.Write(A_Img233)
Line 857:
Line 858:
Line 859: #End ExternalSource
Line 860: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 861: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 22609, 1083, true})
Line 862: Me.WriteUTF8ResourceString(__w, 4745, 1083, true)
Line 863: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 864: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 23692, 259, false})
Line 865:
Line 866: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",491)
Line 867:
Line 868: Try
Line 869: Dim Show_SCR As New Show_SCR
Line 870:
Line 871: Dim dt As DataTable = Show_SCR.Show_Articles_In_View_last(AHURelatedlinks, 1, 1)
Line 872:
Line 873:
Line 874:
Line 875: #End ExternalSource
Line 876: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 877: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 23951, 89, true})
Line 878: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- Wrapper for Slides -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 879: " ")
Line 880: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 881: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 24040, 681, false})
Line 882:
Line 883: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",500)
Line 884: For i As Integer = 0 To dt.Rows.Count - 1
Line 885:
Line 886: Dim A_ID As String = dt.Rows(i)(0).ToString
Line 887:
Line 888: Dim A_link As String = dt.Rows(i)(3).ToString
Line 889: Dim Imag As String = dt.Rows(i)(1).ToString
Line 890: Dim Title As String = dt.Rows(i)(2).ToString
Line 891:
Line 892:
Line 893: Dim Link_type As Integer = CInt(dt.Rows(i)(0).ToString)
Line 894: If Link_type = 2 Then
Line 895: A_link = "En-article-" & A_ID
Line 896: End If
Line 897:
Line 898:
Line 899:
Line 900: #End ExternalSource
Line 901: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 902: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 24721, 229, true})
Line 903: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- start show -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 904: "<div class=""swiper-slide"" style=""background: rgb(1, 1, 20, 0.6); border: 1px sol"& _
Line 905: "id; border-radius: 5px;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <a href='")
Line 906: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 907: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 24950, 12, false})
Line 908:
Line 909: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",518)
Line 910: __w.Write( A_link)
Line 911:
Line 912:
Line 913: #End ExternalSource
Line 914: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 915: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 24962, 124, true})
Line 916: __w.Write("'>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <div style=""min-height: 200px;"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 917: " <img src='")
Line 918: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 919: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25086, 22, false})
Line 920:
Line 921: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",520)
Line 922: __w.Write(Imag.Substring(1))
Line 923:
Line 924:
Line 925: #End ExternalSource
Line 926: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 927: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25108, 7, true})
Line 928: __w.Write("' alt=""")
Line 929: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 930: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25115, 10, false})
Line 931:
Line 932: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",520)
Line 933: __w.Write(Title)
Line 934:
Line 935:
Line 936: #End ExternalSource
Line 937: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 938: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25125, 123, true})
Line 939: __w.Write(""" style=""padding-top: 10px;"" class=""hid4Mob"" />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 940: " <h4 style=""padding-top: -10px;"">")
Line 941: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 942: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25248, 10, false})
Line 943:
Line 944: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",522)
Line 945: __w.Write(Title)
Line 946:
Line 947:
Line 948: #End ExternalSource
Line 949: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 950: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25258, 157, true})
Line 951: __w.Write("</h4>"&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 952: " </a>"&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)&" ")
Line 953: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 954: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25415, 8, false})
Line 955:
Line 956: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",528)
Line 957: Next
Line 958:
Line 959: #End ExternalSource
Line 960: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 961: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25423, 84, true})
Line 962: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&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)&" "& _
Line 963: " ")
Line 964: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 965: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25507, 140, false})
Line 966:
Line 967: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",532)
Line 968:
Line 969: Catch ex As Exception
Line 970: Response.Write(ex.Message)
Line 971: End Try
Line 972:
Line 973: #End ExternalSource
Line 974: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 975: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25647, 200, true})
Line 976: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <br />"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 977: " </section>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <!-- End Clients Section -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 978: " <!-- end section -->"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 979: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 980: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25847, 116, false})
Line 981:
Line 982: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",546)
Line 983:
Line 984: Catch ex As Exception
Line 985: Response.Write(ex.Message)
Line 986:
Line 987: End Try
Line 988:
Line 989:
Line 990: #End ExternalSource
Line 991: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 992: Me.__PageInspector_BeginRenderTracing(New Object() {__w, "/DeanshipsEn.aspx", 25963, 19, true})
Line 993: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </main>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10))
Line 994: Me.__PageInspector_EndRenderTracing(New Object() {__w})
Line 995: End Sub
Line 996:
Line 997: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 998: Private Sub __BuildControlTree(ByVal __ctrl As deanshipsen_aspx)
Line 999:
Line 1000: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",1)
Line 1001: __ctrl.MasterPageFile = "~/NewMasterPageEn.master"
Line 1002:
Line 1003: #End ExternalSource
Line 1004:
Line 1005: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",1)
Line 1006: Me.InitializeCulture
Line 1007:
Line 1008: #End ExternalSource
Line 1009:
Line 1010: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",6)
Line 1011: Me.AddContentTemplate("head", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent1))
Line 1012:
Line 1013: #End ExternalSource
Line 1014:
Line 1015: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",10)
Line 1016: Me.AddContentTemplate("ContentPlaceHolder1", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent2))
Line 1017:
Line 1018: #End ExternalSource
Line 1019: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 1020:
Line 1021: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",1)
Line 1022: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 1023:
Line 1024: #End ExternalSource
Line 1025:
Line 1026: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx",1)
Line 1027: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 1028:
Line 1029: #End ExternalSource
Line 1030: End Sub
Line 1031:
Line 1032:
Line 1033: #ExternalSource("C:\inetpub\wwwroot\AHUFinal\AHUFinal\DeanshipsEn.aspx.vb",912304)
Line 1034: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1035: Protected Overrides Sub FrameworkInitialize()
Line 1036: MyBase.FrameworkInitialize
Line 1037: Me.SetStringResourcePointer(Global.ASP.deanshipsen_aspx.__stringResource, 0)
Line 1038: Me.__BuildControlTree(Me)
Line 1039: Me.AddWrappedFileDependencies(Global.ASP.deanshipsen_aspx.__fileDependencies)
Line 1040: Me.InitOutputCache(Global.ASP.deanshipsen_aspx.__outputCacheSettings)
Line 1041: Me.Request.ValidateInput
Line 1042: End Sub
Line 1043:
Line 1044: #End ExternalSource
Line 1045:
Line 1046: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1047: Public Overrides Function GetTypeHashCode() As Integer
Line 1048: Return 1376373779
Line 1049: End Function
Line 1050:
Line 1051: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 1052: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 1053: MyBase.ProcessRequest(context)
Line 1054: End Sub
Line 1055: End Class
Line 1056: End Namespace
Line 1057:
|