this should be simple, i've ran into it before, but can't remember how i fixed it.

I have a single page, that is just displaying other pages inside of it. It has a previous and a next button to page between the pages of a book. however, if you click next, then previous, it goes next twice, instead of going to the next one, and then going to the original one.

can anyone tell me what the problem is? I have the code below, and a working example at http://www.ori.net/mandreko/highscho...1/Default.aspx


Default.aspx:
Code:
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="Default.aspx.vb" Inherits="highschoolsports1._Default"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
	<HEAD>
		<title>Default</title>
		<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
		<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
		<meta name="vs_defaultClientScript" content="VBScript">
		<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
	</HEAD>
	<body MS_POSITIONING="FlowLayout">
		<form id="Form1" method="post" runat="server">
			<P>
				<asp:Label id="lblPageNo" runat="server"></asp:Label><BR>
				<asp:LinkButton id="hypPrevious" runat="server">Previous</asp:LinkButton>
				<asp:LinkButton id="hypNext" runat="server">Next</asp:LinkButton></P>
			<P>&nbsp;</P>
			<P>
				<asp:Literal id="myPage" runat="server"></asp:Literal></P>
			<P>&nbsp;</P>
		</form>
	</body>
</HTML>


Default.aspx.vb:
Code:
Imports System.Net
Imports System.IO

Public Class _Default
    Inherits System.Web.UI.Page
    Protected WithEvents hypPrevious As System.Web.UI.WebControls.LinkButton
    Protected WithEvents hypNext As System.Web.UI.WebControls.LinkButton
    Protected WithEvents lblPageNo As System.Web.UI.WebControls.Label
    Protected WithEvents myPage As System.Web.UI.WebControls.Literal

#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: This method call is required by the Web Form Designer
        'Do not modify it using the code editor.
        InitializeComponent()
    End Sub

#End Region

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

        lblPageNo.Text = Session("PageNo")
        Dim storefile As Directory
        Dim directory As String
        Dim files As String()
        Dim File As String
        Dim i As Integer





        files = storefile.GetFiles("e:\inetpub\ori.net\mandreko\highschoolsports1\", "page*.html")

        For i = 0 To (files.Length - 1)
            files(i) = files(i).Replace("e:\inetpub\ori.net\mandreko\highschoolsports1\", "")

        Next




        Select Case Session("PageNo")
            Case 1
                hypPrevious.Visible = False
                hypNext.Visible = True
            Case files.Length
                hypPrevious.Visible = True
                hypNext.Visible = False
            Case Else
                hypPrevious.Visible = True
                hypNext.Visible = True
        End Select



        'DataGrid1.DataSource = files
        'DataGrid1.DataBind()










        myPage.Text = readHtmlPage("http://www.ori.net/mandreko/highschoolsports1/page" & Session("PageNo") & ".html")
        myPage.DataBind()


    End Sub

    Function readHtmlPage(ByVal url As String) As String
        Dim objResponse As WebResponse
        Dim objRequest As WebRequest
        Dim result As String
        objRequest = System.Net.HttpWebRequest.Create(url)
        objResponse = objRequest.GetResponse()
        Dim sr As New StreamReader(objResponse.GetResponseStream())
        result = sr.ReadToEnd()

        'clean up StreamReader
        sr.Close()

        Return result
    End Function

    Private Sub hypPrevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hypPrevious.Click
        Session("PageNo") = Session("PageNo") - 1
        myPage.DataBind()
    End Sub

    Private Sub hypNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hypNext.Click
        Session("PageNo") = Session("PageNo") + 1
        myPage.DataBind()
    End Sub
End Class