Line 1: #ExternalChecksum("http://server/Open_Quotes/Default.aspx","{ff1816ec-aa5e-4d10-87f7-6f4963833460}","E1F7C951D8AE9E3EE2753CC69A2ABEC4DF6AAF1F")
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 Get_Pictures_Too.Get_Pictures.Get_Pictures
Line 17: Imports Microsoft.VisualBasic
Line 18: Imports System
Line 19: Imports System.Collections
Line 20: Imports System.Collections.Specialized
Line 21: Imports System.Configuration
Line 22: Imports System.Data
Line 23: Imports System.Data.SqlClient
Line 24: Imports System.Text
Line 25: Imports System.Text.RegularExpressions
Line 26: Imports System.Web
Line 27: Imports System.Web.Caching
Line 28: Imports System.Web.DynamicData
Line 29: Imports System.Web.Profile
Line 30: Imports System.Web.Security
Line 31: Imports System.Web.SessionState
Line 32: Imports System.Web.UI
Line 33: Imports System.Web.UI.HtmlControls
Line 34: Imports System.Web.UI.WebControls
Line 35: Imports System.Web.UI.WebControls.Expressions
Line 36: Imports System.Web.UI.WebControls.WebParts
Line 37: Imports Validate_Inputs_dll.AFM_Master.Validate_Names_2
Line 38:
Line 39:
Line 40: Partial Public Class Get_Open_Quotes
Line 41: Implements System.Web.SessionState.IRequiresSessionState
Line 42:
Line 43:
Line 44: #ExternalSource("http://server/Open_Quotes/Default.aspx",203)
Line 45: Protected WithEvents Lbl_Training_Description As Global.System.Web.UI.WebControls.Label
Line 46:
Line 47: #End ExternalSource
Line 48:
Line 49:
Line 50: #ExternalSource("http://server/Open_Quotes/Default.aspx",209)
Line 51: Protected WithEvents txtUser_Name As Global.System.Web.UI.WebControls.TextBox
Line 52:
Line 53: #End ExternalSource
Line 54:
Line 55:
Line 56: #ExternalSource("http://server/Open_Quotes/Default.aspx",210)
Line 57: Protected WithEvents Lbl_User_Name_Error As Global.System.Web.UI.WebControls.Label
Line 58:
Line 59: #End ExternalSource
Line 60:
Line 61:
Line 62: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 63: Protected WithEvents txtPassword As Global.System.Web.UI.WebControls.TextBox
Line 64:
Line 65: #End ExternalSource
Line 66:
Line 67:
Line 68: #ExternalSource("http://server/Open_Quotes/Default.aspx",214)
Line 69: Protected WithEvents Lbl_Password_Error As Global.System.Web.UI.WebControls.Label
Line 70:
Line 71: #End ExternalSource
Line 72:
Line 73:
Line 74: #ExternalSource("http://server/Open_Quotes/Default.aspx",220)
Line 75: Protected WithEvents btnContinue As Global.System.Web.UI.WebControls.Button
Line 76:
Line 77: #End ExternalSource
Line 78:
Line 79:
Line 80: #ExternalSource("http://server/Open_Quotes/Default.aspx",221)
Line 81: Protected WithEvents labPassword_in_Use As Global.System.Web.UI.WebControls.Label
Line 82:
Line 83: #End ExternalSource
Line 84:
Line 85: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 86: Get
Line 87: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 88: End Get
Line 89: End Property
Line 90:
Line 91: Protected ReadOnly Property ApplicationInstance() As ASP.global_asax
Line 92: Get
Line 93: Return CType(Me.Context.ApplicationInstance,ASP.global_asax)
Line 94: End Get
Line 95: End Property
Line 96: End Class
Line 97:
Line 98: Namespace ASP
Line 99:
Line 100: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 101: Public Class open_quotes_default_aspx
Line 102: Inherits Global.Get_Open_Quotes
Line 103: Implements System.Web.IHttpHandler
Line 104:
Line 105: Private Shared __initialized As Boolean
Line 106:
Line 107: Private Shared __stringResource As Object
Line 108:
Line 109: Private Shared __fileDependencies As Object
Line 110:
Line 111:
Line 112: #ExternalSource("http://server/Open_Quotes/Default.aspx",6)
Line 113:
Line 114: Public AFM_Vilidate As New Validate_Inputs_dll.AFM_Master.Validate_Names_2
Line 115: Public validation_OK As Boolean = False
Line 116:
Line 117: Sub txtUser_Name_TextChanged(Sender As Object, E As EventArgs)
Line 118: Lbl_User_Name_Error.Visible = True
Line 119: Lbl_User_Name_Error.Text = Nothing
Line 120: If Len(txtUser_Name.Text) < 4 Or Len(txtUser_Name.Text) > 14 Then
Line 121: Lbl_User_Name_Error.Visible = True
Line 122: Lbl_User_Name_Error.Text = "User Name Must be more than 6 and less than 14 characters"
Line 123: End If
Line 124: End Sub
Line 125:
Line 126: Sub txtPassword_TextChanged(Sender As Object, E As EventArgs)
Line 127: Lbl_Password_Error.Visible = True
Line 128: Lbl_Password_Error.Text = Nothing
Line 129: If Len(txtPassword.Text) < 6 Or Len(txtPassword.Text) > 14 Then
Line 130: Lbl_Password_Error.Visible = True
Line 131: Lbl_Password_Error.Text = "Password Must be more than 6 and less than 14 characters"
Line 132: End If
Line 133: End Sub
Line 134:
Line 135: Sub btnContinue_OnClick(Sender As Object, E As EventArgs)
Line 136: Dim conn As SqlConnection
Line 137: Dim sql As String
Line 138: Dim cmd As SqlCommand
Line 139: Dim DBRead As SqlDataReader
Line 140: Dim verify As New CTC_Master.CTC_Master.CTC_Master
Line 141: Dim MemberID As String = Nothing
Line 142: 'Dim Member_ID As Integer
Line 143:
Line 144: CheckInput(txtUser_Name.Text)
Line 145: If Len(err_Msg) > 1 Then
Line 146: Lbl_User_Name_Error.Text = err_Msg & " Not Allowed in User Name"
Line 147: Exit Sub
Line 148: End If
Line 149:
Line 150: CheckInput(txtPassword.Text)
Line 151: If Len(err_Msg) > 1 Then
Line 152: Lbl_Password_Error.Text = err_Msg & " Not Allowed in Password"
Line 153: Exit Sub
Line 154: End If
Line 155:
Line 156: If Len(txtUser_Name.Text) > 0 Then
Line 157: If InStr(UCase(txtUser_Name.Text), "%") Then
Line 158: Response.Redirect("Error.aspx")
Line 159: End If
Line 160: If InStr(UCase(txtUser_Name.Text), "SCRIPT") Then
Line 161: Response.Redirect("Error.aspx")
Line 162: End If
Line 163: If InStr(UCase(txtUser_Name.Text), "MOUSE") Then
Line 164: Response.Redirect("Error.aspx")
Line 165: End If
Line 166: If InStr(UCase(txtUser_Name.Text), "=") Then
Line 167: Response.Redirect("Error.aspx")
Line 168: End If
Line 169: End If
Line 170:
Line 171: If Len(txtPassword.Text) > 0 Then
Line 172: If InStr(UCase(txtPassword.Text), "%") Then
Line 173: Response.Redirect("Error.aspx")
Line 174: End If
Line 175: If InStr(UCase(txtPassword.Text), "SCRIPT") Then
Line 176: Response.Redirect("Error.aspx")
Line 177: End If
Line 178: If InStr(UCase(txtPassword.Text), "MOUSE") Then
Line 179: Response.Redirect("Error.aspx")
Line 180: End If
Line 181: If InStr(UCase(txtPassword.Text), "=") Then
Line 182: Response.Redirect("Error.aspx")
Line 183: End If
Line 184: End If
Line 185:
Line 186:
Line 187: If (Page.IsValid) Then
Line 188: conn = New SqlConnection(Session("Web-Sites-AFM"))
Line 189: conn.Open()
Line 190: sql = "SELECT * FROM tbl_Part_List_Passwords WHERE User_Name='" & txtUser_Name.Text & "' AND Password='" & txtPassword.Text & "'"
Line 191: cmd = New SqlCommand(sql, conn)
Line 192: 'Response.Write(sql)
Line 193: DBRead = cmd.ExecuteReader()
Line 194: If DBRead.Read Then
Line 195: MemberID = verify.Encrypt(DBRead("ID") + 1000)
Line 196:
Line 197: Response.Redirect("../Open_Quotes/Main_Menu.aspx?Admin=true&MID=" & MemberID)
Line 198:
Line 199: End If
Line 200:
Line 201: labPassword_in_Use.Text = "Last Name and Password Not Found"
Line 202: DBRead.Close()
Line 203: conn.Close()
Line 204: Else
Line 205: End If
Line 206: End Sub
Line 207:
Line 208: Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Line 209:
Line 210: If Len(Request("ID")) > 0 Then
Line 211: If Not IsNumeric(Request("ID")) Then
Line 212: Response.Redirect("Error.aspx")
Line 213: End If
Line 214: End If
Line 215:
Line 216: If Len(Request("Admin")) > 0 Then
Line 217: If InStr(UCase(Request("Admin")), "%") Then
Line 218: Response.Redirect("Error.aspx")
Line 219: End If
Line 220: If InStr(UCase(Request("Admin")), "SCRIPT") Then
Line 221: Response.Redirect("Error.aspx")
Line 222: End If
Line 223: If InStr(UCase(Request("Admin")), "MOUSE") Then
Line 224: Response.Redirect("Error.aspx")
Line 225: End If
Line 226: If InStr(UCase(Request("Admin")), "=") Then
Line 227: Response.Redirect("Error.aspx")
Line 228: End If
Line 229: End If
Line 230:
Line 231:
Line 232: If Len(Request("Mid")) > 0 Then
Line 233: If InStr(UCase(Request("Mid")), "%") Then
Line 234: Response.Redirect("Error.aspx")
Line 235: End If
Line 236: If InStr(UCase(Request("Mid")), "SCRIPT") Then
Line 237: Response.Redirect("Error.aspx")
Line 238: End If
Line 239: If InStr(UCase(Request("Mid")), "MOUSE") Then
Line 240: Response.Redirect("Error.aspx")
Line 241: End If
Line 242: If InStr(UCase(Request("Mid")), "=") Then
Line 243: Response.Redirect("Error.aspx")
Line 244: End If
Line 245: End If
Line 246:
Line 247: If Len(Request("Type")) > 0 Then
Line 248: If InStr(UCase(Request("Type")), "%") Then
Line 249: Response.Redirect("Error.aspx")
Line 250: End If
Line 251: If InStr(UCase(Request("Type")), "SCRIPT") Then
Line 252: Response.Redirect("Error.aspx")
Line 253: End If
Line 254: If InStr(UCase(Request("Type")), "MOUSE") Then
Line 255: Response.Redirect("Error.aspx")
Line 256: End If
Line 257: If InStr(UCase(Request("Type")), "=") Then
Line 258: Response.Redirect("Error.aspx")
Line 259: End If
Line 260: End If
Line 261:
Line 262: If Len(Request("Status")) > 0 Then
Line 263: If InStr(UCase(Request("Status")), "%") Then
Line 264: Response.Redirect("Error.aspx")
Line 265: End If
Line 266: If InStr(UCase(Request("Status")), "SCRIPT") Then
Line 267: Response.Redirect("Error.aspx")
Line 268: End If
Line 269: If InStr(UCase(Request("Status")), "MOUSE") Then
Line 270: Response.Redirect("Error.aspx")
Line 271: End If
Line 272: If InStr(UCase(Request("Status")), "=") Then
Line 273: Response.Redirect("Error.aspx")
Line 274: End If
Line 275: End If
Line 276:
Line 277:
Line 278: If Len(Request("Site")) > 0 Then
Line 279: If InStr(UCase(Request("Site")), "%") Then
Line 280: Response.Redirect("Error.aspx")
Line 281: End If
Line 282: If InStr(UCase(Request("Site")), "SCRIPT") Then
Line 283: Response.Redirect("Error.aspx")
Line 284: End If
Line 285: If InStr(UCase(Request("Site")), "MOUSE") Then
Line 286: Response.Redirect("Error.aspx")
Line 287: End If
Line 288: If InStr(UCase(Request("Site")), "=") Then
Line 289: Response.Redirect("Error.aspx")
Line 290: End If
Line 291: End If
Line 292:
Line 293:
Line 294:
Line 295: If Not IsPostBack Then
Line 296: Lbl_User_Name_Error.Visible = False
Line 297:
Line 298: End If
Line 299: End Sub
Line 300:
Line 301: #End ExternalSource
Line 302:
Line 303:
Line 304: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 305: Public Sub New()
Line 306: MyBase.New
Line 307: Dim dependencies() As String
Line 308:
Line 309: #ExternalSource("http://server/Open_Quotes/Get_Open_Quotes.vb",912304)
Line 310: CType(Me,Global.System.Web.UI.Page).AppRelativeVirtualPath = "~/Open_Quotes/Default.aspx"
Line 311:
Line 312: #End ExternalSource
Line 313: If (Global.ASP.open_quotes_default_aspx.__initialized = false) Then
Line 314: Global.ASP.open_quotes_default_aspx.__stringResource = Me.ReadStringResource
Line 315: dependencies = New String(3) {}
Line 316: dependencies(0) = "~/Open_Quotes/Default.aspx"
Line 317: dependencies(1) = "~/A_Open_Quotes.master"
Line 318: dependencies(2) = "~/A_Open_Quotes.vb"
Line 319: dependencies(3) = "~/Open_Quotes/Get_Open_Quotes.vb"
Line 320: Global.ASP.open_quotes_default_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 321: Global.ASP.open_quotes_default_aspx.__initialized = true
Line 322: End If
Line 323: Me.Server.ScriptTimeout = 30000000
Line 324: End Sub
Line 325:
Line 326: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 327: Private Function __BuildControlLbl_Training_Description() As Global.System.Web.UI.WebControls.Label
Line 328: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 329:
Line 330: #ExternalSource("http://server/Open_Quotes/Default.aspx",203)
Line 331: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 332:
Line 333: #End ExternalSource
Line 334: Me.Lbl_Training_Description = __ctrl
Line 335: __ctrl.TemplateControl = Me
Line 336: __ctrl.ApplyStyleSheetSkin(Me)
Line 337:
Line 338: #ExternalSource("http://server/Open_Quotes/Default.aspx",203)
Line 339: __ctrl.ID = "Lbl_Training_Description"
Line 340:
Line 341: #End ExternalSource
Line 342: Return __ctrl
Line 343: End Function
Line 344:
Line 345: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 346: Private Function __BuildControltxtUser_Name() As Global.System.Web.UI.WebControls.TextBox
Line 347: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 348:
Line 349: #ExternalSource("http://server/Open_Quotes/Default.aspx",209)
Line 350: __ctrl = New Global.System.Web.UI.WebControls.TextBox()
Line 351:
Line 352: #End ExternalSource
Line 353: Me.txtUser_Name = __ctrl
Line 354: __ctrl.TemplateControl = Me
Line 355: __ctrl.ApplyStyleSheetSkin(Me)
Line 356:
Line 357: #ExternalSource("http://server/Open_Quotes/Default.aspx",209)
Line 358: __ctrl.ID = "txtUser_Name"
Line 359:
Line 360: #End ExternalSource
Line 361:
Line 362: #ExternalSource("http://server/Open_Quotes/Default.aspx",209)
Line 363: __ctrl.Width = New System.Web.UI.WebControls.Unit(150R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 364:
Line 365: #End ExternalSource
Line 366:
Line 367: #ExternalSource("http://server/Open_Quotes/Default.aspx",209)
Line 368: AddHandler __ctrl.TextChanged, AddressOf Me.txtUser_Name_TextChanged
Line 369:
Line 370: #End ExternalSource
Line 371: Return __ctrl
Line 372: End Function
Line 373:
Line 374: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 375: Private Function __BuildControlLbl_User_Name_Error() As Global.System.Web.UI.WebControls.Label
Line 376: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 377:
Line 378: #ExternalSource("http://server/Open_Quotes/Default.aspx",210)
Line 379: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 380:
Line 381: #End ExternalSource
Line 382: Me.Lbl_User_Name_Error = __ctrl
Line 383: __ctrl.TemplateControl = Me
Line 384: __ctrl.ApplyStyleSheetSkin(Me)
Line 385:
Line 386: #ExternalSource("http://server/Open_Quotes/Default.aspx",210)
Line 387: __ctrl.ID = "Lbl_User_Name_Error"
Line 388:
Line 389: #End ExternalSource
Line 390:
Line 391: #ExternalSource("http://server/Open_Quotes/Default.aspx",210)
Line 392: __ctrl.CssClass = "RedLeft"
Line 393:
Line 394: #End ExternalSource
Line 395: Return __ctrl
Line 396: End Function
Line 397:
Line 398: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 399: Private Function __BuildControltxtPassword() As Global.System.Web.UI.WebControls.TextBox
Line 400: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 401:
Line 402: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 403: __ctrl = New Global.System.Web.UI.WebControls.TextBox()
Line 404:
Line 405: #End ExternalSource
Line 406: Me.txtPassword = __ctrl
Line 407: __ctrl.TemplateControl = Me
Line 408: __ctrl.ApplyStyleSheetSkin(Me)
Line 409:
Line 410: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 411: __ctrl.ID = "txtPassword"
Line 412:
Line 413: #End ExternalSource
Line 414:
Line 415: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 416: __ctrl.TextMode = Global.System.Web.UI.WebControls.TextBoxMode.Password
Line 417:
Line 418: #End ExternalSource
Line 419:
Line 420: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 421: __ctrl.Width = New System.Web.UI.WebControls.Unit(150R, Global.System.Web.UI.WebControls.UnitType.Pixel)
Line 422:
Line 423: #End ExternalSource
Line 424:
Line 425: #ExternalSource("http://server/Open_Quotes/Default.aspx",213)
Line 426: AddHandler __ctrl.TextChanged, AddressOf Me.txtPassword_TextChanged
Line 427:
Line 428: #End ExternalSource
Line 429: Return __ctrl
Line 430: End Function
Line 431:
Line 432: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 433: Private Function __BuildControlLbl_Password_Error() As Global.System.Web.UI.WebControls.Label
Line 434: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 435:
Line 436: #ExternalSource("http://server/Open_Quotes/Default.aspx",214)
Line 437: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 438:
Line 439: #End ExternalSource
Line 440: Me.Lbl_Password_Error = __ctrl
Line 441: __ctrl.TemplateControl = Me
Line 442: __ctrl.ApplyStyleSheetSkin(Me)
Line 443:
Line 444: #ExternalSource("http://server/Open_Quotes/Default.aspx",214)
Line 445: __ctrl.ID = "Lbl_Password_Error"
Line 446:
Line 447: #End ExternalSource
Line 448:
Line 449: #ExternalSource("http://server/Open_Quotes/Default.aspx",214)
Line 450: __ctrl.CssClass = "RedLeft"
Line 451:
Line 452: #End ExternalSource
Line 453: Return __ctrl
Line 454: End Function
Line 455:
Line 456: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 457: Private Function __BuildControlbtnContinue() As Global.System.Web.UI.WebControls.Button
Line 458: Dim __ctrl As Global.System.Web.UI.WebControls.Button
Line 459:
Line 460: #ExternalSource("http://server/Open_Quotes/Default.aspx",220)
Line 461: __ctrl = New Global.System.Web.UI.WebControls.Button()
Line 462:
Line 463: #End ExternalSource
Line 464: Me.btnContinue = __ctrl
Line 465: __ctrl.TemplateControl = Me
Line 466: __ctrl.ApplyStyleSheetSkin(Me)
Line 467:
Line 468: #ExternalSource("http://server/Open_Quotes/Default.aspx",220)
Line 469: __ctrl.ID = "btnContinue"
Line 470:
Line 471: #End ExternalSource
Line 472:
Line 473: #ExternalSource("http://server/Open_Quotes/Default.aspx",220)
Line 474: __ctrl.Text = "Login"
Line 475:
Line 476: #End ExternalSource
Line 477:
Line 478: #ExternalSource("http://server/Open_Quotes/Default.aspx",220)
Line 479: AddHandler __ctrl.Click, AddressOf Me.btnContinue_OnClick
Line 480:
Line 481: #End ExternalSource
Line 482: Return __ctrl
Line 483: End Function
Line 484:
Line 485: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 486: Private Function __BuildControllabPassword_in_Use() As Global.System.Web.UI.WebControls.Label
Line 487: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 488:
Line 489: #ExternalSource("http://server/Open_Quotes/Default.aspx",221)
Line 490: __ctrl = New Global.System.Web.UI.WebControls.Label()
Line 491:
Line 492: #End ExternalSource
Line 493: Me.labPassword_in_Use = __ctrl
Line 494: __ctrl.TemplateControl = Me
Line 495: __ctrl.ApplyStyleSheetSkin(Me)
Line 496:
Line 497: #ExternalSource("http://server/Open_Quotes/Default.aspx",221)
Line 498: __ctrl.ID = "labPassword_in_Use"
Line 499:
Line 500: #End ExternalSource
Line 501:
Line 502: #ExternalSource("http://server/Open_Quotes/Default.aspx",221)
Line 503: __ctrl.Text = " "
Line 504:
Line 505: #End ExternalSource
Line 506: Return __ctrl
Line 507: End Function
Line 508:
Line 509: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 510: Private Sub __BuildControlContent1(ByVal __ctrl As System.Web.UI.Control)
Line 511: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 512:
Line 513: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 514: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(0, 272, true))
Line 515:
Line 516: #End ExternalSource
Line 517: Dim __ctrl1 As Global.System.Web.UI.WebControls.Label
Line 518:
Line 519: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 520: __ctrl1 = Me.__BuildControlLbl_Training_Description
Line 521:
Line 522: #End ExternalSource
Line 523:
Line 524: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 525: __parser.AddParsedSubObject(__ctrl1)
Line 526:
Line 527: #End ExternalSource
Line 528:
Line 529: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 530: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td></tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td valign=""top"" >"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <center>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <table border"& _
Line 531: "=""0"" cellpadding=""5"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td class=""BlackRight"">User Nam"& _
Line 532: "e:</td><td class=""BlackLeft"">"))
Line 533:
Line 534: #End ExternalSource
Line 535: Dim __ctrl2 As Global.System.Web.UI.WebControls.TextBox
Line 536:
Line 537: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 538: __ctrl2 = Me.__BuildControltxtUser_Name
Line 539:
Line 540: #End ExternalSource
Line 541:
Line 542: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 543: __parser.AddParsedSubObject(__ctrl2)
Line 544:
Line 545: #End ExternalSource
Line 546:
Line 547: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 548: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td class=""BlackRight"">"))
Line 549:
Line 550: #End ExternalSource
Line 551: Dim __ctrl3 As Global.System.Web.UI.WebControls.Label
Line 552:
Line 553: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 554: __ctrl3 = Me.__BuildControlLbl_User_Name_Error
Line 555:
Line 556: #End ExternalSource
Line 557:
Line 558: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 559: __parser.AddParsedSubObject(__ctrl3)
Line 560:
Line 561: #End ExternalSource
Line 562:
Line 563: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 564: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <td class=""BlackRight"">Password:</td>"& _
Line 565: "<td class=""BlackLeft"" style=""white-space:nowrap"">"))
Line 566:
Line 567: #End ExternalSource
Line 568: Dim __ctrl4 As Global.System.Web.UI.WebControls.TextBox
Line 569:
Line 570: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 571: __ctrl4 = Me.__BuildControltxtPassword
Line 572:
Line 573: #End ExternalSource
Line 574:
Line 575: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 576: __parser.AddParsedSubObject(__ctrl4)
Line 577:
Line 578: #End ExternalSource
Line 579:
Line 580: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 581: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"<td class=""BlackRight"">"))
Line 582:
Line 583: #End ExternalSource
Line 584: Dim __ctrl5 As Global.System.Web.UI.WebControls.Label
Line 585:
Line 586: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 587: __ctrl5 = Me.__BuildControlLbl_Password_Error
Line 588:
Line 589: #End ExternalSource
Line 590:
Line 591: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 592: __parser.AddParsedSubObject(__ctrl5)
Line 593:
Line 594: #End ExternalSource
Line 595:
Line 596: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 597: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </center>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
Line 598: " <tr><td class=""BlackCenter"">"))
Line 599:
Line 600: #End ExternalSource
Line 601: Dim __ctrl6 As Global.System.Web.UI.WebControls.Button
Line 602:
Line 603: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 604: __ctrl6 = Me.__BuildControlbtnContinue
Line 605:
Line 606: #End ExternalSource
Line 607:
Line 608: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 609: __parser.AddParsedSubObject(__ctrl6)
Line 610:
Line 611: #End ExternalSource
Line 612:
Line 613: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 614: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("<br/>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <span class=""RedCentered""><strong>"))
Line 615:
Line 616: #End ExternalSource
Line 617: Dim __ctrl7 As Global.System.Web.UI.WebControls.Label
Line 618:
Line 619: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 620: __ctrl7 = Me.__BuildControllabPassword_in_Use
Line 621:
Line 622: #End ExternalSource
Line 623:
Line 624: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 625: __parser.AddParsedSubObject(__ctrl7)
Line 626:
Line 627: #End ExternalSource
Line 628:
Line 629: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 630: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</strong></span>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td></tr>"&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)&"</table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</center>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(9)&"</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 631: "</tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr><td> "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</td></tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </center>"&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 632:
Line 633: #End ExternalSource
Line 634: End Sub
Line 635:
Line 636: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 637: Private Sub __BuildControlTree(ByVal __ctrl As open_quotes_default_aspx)
Line 638:
Line 639: #ExternalSource("http://server/Open_Quotes/Default.aspx",1)
Line 640: __ctrl.Title = "AFM Engineering Home Page"
Line 641:
Line 642: #End ExternalSource
Line 643:
Line 644: #ExternalSource("http://server/Open_Quotes/Default.aspx",1)
Line 645: __ctrl.MasterPageFile = "~/A_Open_Quotes.master"
Line 646:
Line 647: #End ExternalSource
Line 648:
Line 649: #ExternalSource("http://server/Open_Quotes/Default.aspx",1)
Line 650: Me.InitializeCulture
Line 651:
Line 652: #End ExternalSource
Line 653:
Line 654: #ExternalSource("http://server/Open_Quotes/Default.aspx",195)
Line 655: Me.AddContentTemplate("ContentPlaceHolder1", New System.Web.UI.CompiledTemplateBuilder(AddressOf Me.__BuildControlContent1))
Line 656:
Line 657: #End ExternalSource
Line 658: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 659:
Line 660: #ExternalSource("http://server/Open_Quotes/Default.aspx",1)
Line 661: __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)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
Line 662:
Line 663: #End ExternalSource
Line 664: End Sub
Line 665:
Line 666:
Line 667: #ExternalSource("http://server/Open_Quotes/Get_Open_Quotes.vb",912304)
Line 668: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 669: Protected Overrides Sub FrameworkInitialize()
Line 670: MyBase.FrameworkInitialize
Line 671: Me.SetStringResourcePointer(Global.ASP.open_quotes_default_aspx.__stringResource, 0)
Line 672: Me.__BuildControlTree(Me)
Line 673: Me.AddWrappedFileDependencies(Global.ASP.open_quotes_default_aspx.__fileDependencies)
Line 674: Me.Request.ValidateInput
Line 675: End Sub
Line 676:
Line 677: #End ExternalSource
Line 678:
Line 679: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 680: Public Overrides Function GetTypeHashCode() As Integer
Line 681: Return 338808062
Line 682: End Function
Line 683:
Line 684: <System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Line 685: Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 686: MyBase.ProcessRequest(context)
Line 687: End Sub
Line 688: End Class
Line 689: End Namespace
Line 690:
|