Problem using custom paging

[dinesh]

Trying to page results from a repeater. The resulting hyperlinks point o
empty references when the page is run. No errors show up

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
'Dim partoftown = Session("partof town")
' Dim partoftown = "kensington "

Dim conPubs As SqlConnection
Dim cmdSelect As SqlCommand
Dim dtrAuthors As SqlDataReader
Dim objConn As SqlConnection = New SqlConnection(" Data
Source=server1; Initial Catalog=findand view;trusted_co nnection=true;" )
Dim objCommand As SqlDataAdapter = New SqlDataAdapter( "Select *
from maintable where area = 'Kensington'", objConn)
Dim ds As DataSet = New DataSet
objCommand.Fill (ds)

Dim objPds As PagedDataSource = New PagedDataSource
objPds.DataSour ce = ds.Tables(0).De faultView
objPds.AllowPag ing = True
objPds.PageSize = 5
Dim CurPage As Integer
If Not Request.QuerySt ring("Page") Is Nothing Then
CurPage = Convert.ToInt32 (Request.QueryS tring("Page"))
Else
CurPage = 1
End If

objPds.CurrentP ageIndex = CurPage - 1
lblCurrentPage. Text = "Page: " + CurPage.ToStrin g()

If Not objPds.IsFirstP age Then
lnkPrev.Navigat eUrl = Request.Current ExecutionFilePa th +
"?Page=" + Convert.ToStrin g(CurPage - 1)
End If

If Not objPds.IsLastPa ge Then
lnkNext.Navigat eUrl = Request.Current ExecutionFilePa th +
"?Page=" + Convert.ToStrin g(CurPage + 1)
End If

Repeater1.DataS ource = objPds
Repeater1.DataB ind()
End Sub

....
in ASP

<td valign="top" align="right" width="82"><asp :HyperLink id="lnkPrev"
runat="server"> <img src="../buttons/previous_button _06.gif" width=82
height=22></asp:HyperLink></td>

<td width="82" valign="top" align="left"><a sp:HyperLink id="lnkNext"
runat="server"> <img src="../buttons/next_button_06. gif" width=82
height=22></asp:HyperLink></td>