Server Error in '/' Application.

---

c:\windows\system32\inetsrv> "C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\vbc.exe" /t:library /utf8output /R:"C:\WINDOWS\assembly\GAC_32\System.EnterpriseServices\2.0.0.0__b03f5f7f11d50a3a\System.EnterpriseServices.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System.Configuration\2.0.0.0__b03f5f7f11d50a3a\System.Configuration.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System.Drawing\2.0.0.0__b03f5f7f11d50a3a\System.Drawing.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System.Web.Services\2.0.0.0__b03f5f7f11d50a3a\System.Web.Services.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System\2.0.0.0__b77a5c561934e089\System.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System.Xml\2.0.0.0__b77a5c561934e089\System.Xml.dll" /R:"C:\WINDOWS\assembly\GAC_32\System.Data\2.0.0.0__b77a5c561934e089\System.Data.dll" /R:"C:\WINDOWS\assembly\GAC_32\System.Web\2.0.0.0__b03f5f7f11d50a3a\System.Web.dll" /R:"C:\WINDOWS\assembly\GAC_MSIL\System.Web.Mobile\2.0.0.0__b03f5f7f11d50a3a\System.Web.Mobile.dll" /out:"C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\App_Web_k5wgnzys.dll" /D:DEBUG=1 /debug+ /win32resource:"C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\k5wgnzys.res" /define:_MYTYPE=\"Web\" /imports:Microsoft.VisualBasic,System,System.Collections,System.Collections.Specialized,System.Configuration,System.Text,System.Text.RegularExpressions,System.Web,System.Web.Caching,System.Web.SessionState,System.Web.Security,System.Web.Profile,System.Web.UI,System.Web.UI.WebControls,System.Web.UI.WebControls.WebParts,System.Web.UI.HtmlControls  "C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\App_Web_k5wgnzys.0.vb" "C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\App_Web_k5wgnzys.1.vb" "C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\App_Web_k5wgnzys.2.vb" "C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Temporary ASP.NET Files\root\2d1df925\3e00c3a2\App_Web_k5wgnzys.3.vb"


Microsoft (R) Visual Basic Compiler version 8.0.50727.42
for Microsoft (R) .NET Framework version 2.0.50727.42
Copyright (c) Microsoft Corporation.  All rights reserved.

E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_ak.aspx(95) : warning BC42024: Unused local variable: 'strResults'.

    Dim strResults As String
        ~~~~~~~~~~          
E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_hi.aspx(93) : warning BC42024: Unused local variable: 'strResults'.

    Dim strResults As String
        ~~~~~~~~~~          
E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx(89) : error BC30451: Name 'E' is not declared.

    Dim Path As String = E:\0\0\18\40\18529\user\20046\htdocs\db\DLocator.mdb"
                         ~                                                    
E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx(89) : error BC30035: Syntax error.

    Dim Path As String = E:\0\0\18\40\18529\user\20046\htdocs\db\DLocator.mdb"
                           ~                                                  

Line 1:    #ExternalChecksum("E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","7FD0A915767A808330089F3EC261AF0C")
Line 2:    '------------------------------------------------------------------------------
Line 3:    ' <auto-generated>
Line 4:    '     This code was generated by a tool.
Line 5:    '     Runtime Version:2.0.50727.42
Line 6:    '
Line 7:    '     Changes to this file may cause incorrect behavior and will be lost if
Line 8:    '     the code is regenerated.
Line 9:    ' </auto-generated>
Line 10:   '------------------------------------------------------------------------------
Line 11:   
Line 12:   Option Strict Off
Line 13:   Option Explicit On
Line 14:   
Line 15:   Imports Microsoft.VisualBasic
Line 16:   Imports System
Line 17:   Imports System.Collections
Line 18:   Imports System.Collections.Specialized
Line 19:   Imports System.Configuration
Line 20:   Imports System.Data
Line 21:   Imports System.Data.OleDB
Line 22:   Imports System.Text
Line 23:   Imports System.Text.RegularExpressions
Line 24:   Imports System.Web
Line 25:   Imports System.Web.Caching
Line 26:   Imports System.Web.Profile
Line 27:   Imports System.Web.Security
Line 28:   Imports System.Web.SessionState
Line 29:   Imports System.Web.UI
Line 30:   Imports System.Web.UI.HtmlControls
Line 31:   Imports System.Web.UI.WebControls
Line 32:   Imports System.Web.UI.WebControls.WebParts
Line 33:   
Line 34:   Namespace ASP
Line 35:       
Line 36:       <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()>  _
Line 37:       Public Class pages_usa_in_aspx
Line 38:           Inherits Global.System.Web.UI.Page
Line 39:           Implements System.Web.SessionState.IRequiresSessionState, System.Web.IHttpHandler
Line 40:           
Line 41:           Private Shared __initialized As Boolean
Line 42:           
Line 43:           Private Shared __stringResource As Object
Line 44:           
Line 45:           Private Shared __fileDependencies As Object
Line 46:           
Line 47:           Public Sub New()
Line 48:               MyBase.New
Line 49:               Dim dependencies() As String
Line 50:               CType(Me,System.Web.UI.Page).AppRelativeVirtualPath = "~/pages/usa_in.aspx"
Line 51:               If (Global.ASP.pages_usa_in_aspx.__initialized = false) Then
Line 52:                   Global.ASP.pages_usa_in_aspx.__stringResource = Me.ReadStringResource
Line 53:                   dependencies = New String(0) {}
Line 54:                   dependencies(0) = "~/pages/usa_in.aspx"
Line 55:                   Global.ASP.pages_usa_in_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 56:                   Global.ASP.pages_usa_in_aspx.__initialized = true
Line 57:               End If
Line 58:               Me.Server.ScriptTimeout = 30000000
Line 59:           End Sub
Line 60:           
Line 61:           Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 62:               Get
Line 63:                   Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 64:               End Get
Line 65:           End Property
Line 66:           
Line 67:           Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
Line 68:               Get
Line 69:                   Return false
Line 70:               End Get
Line 71:           End Property
Line 72:           
Line 73:           Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
Line 74:               Get
Line 75:                   Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
Line 76:               End Get
Line 77:           End Property
Line 78:           
Line 79:           Private Sub __BuildControlTree(ByVal __ctrl As pages_usa_in_aspx)
Line 80:               
Line 81:               #ExternalSource("E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx",1)
Line 82:               __ctrl.ContentType = "text/html"
Line 83:               
Line 84:               #End ExternalSource
Line 85:               
Line 86:               #ExternalSource("E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx",1)
Line 87:               __ctrl.ResponseEncoding = "iso-8859-1"
Line 88:               
Line 89:               #End ExternalSource
Line 90:               
Line 91:               #ExternalSource("E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx",1)
Line 92:               Me.InitializeCulture
Line 93:               
Line 94:               #End ExternalSource
Line 95:               __ctrl.SetRenderMethodDelegate(AddressOf Me.__Render__control1)
Line 96:           End Sub
Line 97:           
Line 98:           Private Sub __Render__control1(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 99:               Me.WriteUTF8ResourceString(__w, 0, 5215, false)
Line 100:              
Line 101:              #ExternalSource("E:\0\0\18\40\18529\user\20046\htdocs\pages\usa_in.aspx",87)
Line 102:    
Line 103:  	
Line 104:  	Dim Path As String = E:\0\0\18\40\18529\user\20046\htdocs\db\DLocator.mdb"
Line 105:  	Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0; DATA Source=" & Path & ";"
Line 106:  	Dim objConn As OleDbConnection
Line 107:  	Dim cmdSelect As OleDbCommand
Line 108:  	Dim strResults As String
Line 109:  	
Line 110:  	objConn = New OleDbConnection(connString)
Line 111:  	
Line 112:  	objConn.Open()
Line 113:  	cmdSelect= New OleDbCommand( "SELECT Dealer_Info.* FROM Dealer_Info WHERE (State = 'IN') ORDER BY Dealer_Name", objConn)
Line 114:  
Line 115:  		
Line 116:  	
Line 117:  	Dim dtrReader As OleDbDataReader
Line 118:  	dtrReader= cmdSelect.ExecuteReader()
Line 119:  	While dtrReader.Read()
Line 120:  		Response.Write ("<div class=newsTextBB><center><br><font size=+1><strong>" & dtrReader("Dealer_Name") & "</strong></font><br>" & dtrReader("Street_Address_1") & "<br>" & dtrReader("Street_Address_2") & "<br>" & dtrReader("City") & ", " & dtrReader("State") & " " & dtrReader("Zip") & "<br>" & dtrReader("Phone") & "<br><a class=supportLink href=mailto:" & dtrReader("E-mail") & ">" & dtrReader("E-mail") & "<br>" & "<a class=supportLink target=_blank href=http://" & dtrReader("Website") & ">" & dtrReader("Website") & "</a><br><br><hr></center></div>")
Line 121:  	End While
Line 122:  	
Line 123:  	dtrReader.Close()
Line 124:  	objConn.Close()
Line 125:  
Line 126:              
Line 127:              #End ExternalSource
Line 128:              Me.WriteUTF8ResourceString(__w, 5215, 2145, true)
Line 129:          End Sub
Line 130:          
Line 131:          Protected Overrides Sub FrameworkInitialize()
Line 132:              MyBase.FrameworkInitialize
Line 133:              SetStringResourcePointer(Global.ASP.pages_usa_in_aspx.__stringResource, 0)
Line 134:              Me.__BuildControlTree(Me)
Line 135:              Me.AddWrappedFileDependencies(Global.ASP.pages_usa_in_aspx.__fileDependencies)
Line 136:              Me.Request.ValidateInput
Line 137:          End Sub
Line 138:          
Line 139:          Public Overrides Function GetTypeHashCode() As Integer
Line 140:              Return 909526700
Line 141:          End Function
Line 142:          
Line 143:          Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
Line 144:              MyBase.ProcessRequest(context)
Line 145:          End Sub
Line 146:      End Class
Line 147:  End Namespace
Line 148: