Object reference not set to an instance of an object.

[adascat]

Feel so mad strugging why this happens :( Does anyone have a clue? Thanks a lot in advance.

Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.NullReferenceException: Object reference not set to an instance of an object.

Source Error:

Line 21: aDataAdapter.SelectCommand.Connection.Open()
Line 22: aDataAdapter.Fill(aDataSet, "Results")
Line 23: Gridview1.DataSource = aDataSet.Tables("Results")
Line 24: Gridview1.DataBind()
Line 25:


Source File: C:\Users\...\WebApplication1\Login_Admin.aspx.vb Line: 23

Stack Trace:

[NullReferenceException: Object reference not set to an instance of an object.]
WebApplication1._Default.Page_Load(Object sender, EventArgs e) in C:\Users\...\WebApplication1\Login_Admin.aspx.vb:2 3
System.Web.UI.Control.OnLoad(EventArgs e) +91
System.Web.UI.Control.LoadRecursive() +74
System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +2207

Imports System.Data
Imports System.Data.OleDb
 
Partial Class _Default
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
 
 
            Dim aConnection = New OleDbConnection
            Dim aConnectionString As String
            Dim SQLQuery As String
            Dim aDataAdapter = New OleDbDataAdapter
            Dim aDataSet = New DataSet
            aConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & _
                Server.MapPath("/App_Data/CS5012ProjectAY201011.accdb")
            aConnection.ConnectionString = aConnectionString
            SQLQuery = "Select * From Translator Where IsTranslatorRegistered = False"
            aDataAdapter.SelectCommand = New OleDbCommand(SQLQuery, aConnection)
            aDataAdapter.SelectCommand.Connection.Open()
            aDataAdapter.Fill(aDataSet, "Results")
            Gridview1.DataSource = aDataSet.Tables("Results")
            Gridview1.DataBind()
 
        End If
    End Sub
 
 
End Class