trier un datagrid

Object reference not set to an instance of an object.

Line 68:     Private Sub dg_SortCommand(ByVal source As Object, ByVal e As DataGridSortCommandEventArgs) Handles dg.SortCommand
Line 69:         Dim dv As DataView = Session("dv")
Line 70:         dv.Sort = e.SortExpression
Line 71:         DataBind()
Line 72: 

Dim cn As New Odbc.OdbcConnection("DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=C:\Inetpub\wwwroot\annuaire\annuaire.mdb")

Dim ds As New DataSet

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'Put user code to initialize the page here

Dim da As New Odbc.OdbcDataAdapter("select * from personnes", cn)

End Sub

Private Sub cmdRecherche_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdRecherche.Click

Dim dt As DataTable = ds.Tables(0)

Dim dv As New DataView(dt)

If RdoNom.Checked Then

dv.RowFilter = String.Format("nom like '{0}%'", txtRecherche.Text)

Else : dv.RowFilter = String.Format("prenom like '{0}%'", txtRecherche.Text)

End If

End Sub

Private Sub dg_PageIndexChanged(ByVal source As Object, ByVal e As DataGridPageChangedEventArgs) Handles dg.PageIndexChanged

End Sub

Private Sub dg_SortCommand(ByVal source As Object, ByVal e As DataGridSortCommandEventArgs) Handles dg.SortCommand

Dim dv As DataView = Session("dv")

End Sub



Merci