p2p.wrox.com Forums

p2p.wrox.com Forums (http://p2p.wrox.com/index.php)
-   ASP.NET 2.0 Professional (http://p2p.wrox.com/forumdisplay.php?f=215)
-   -   Probelm For Runing This Code (http://p2p.wrox.com/showthread.php?t=46071)

farhad13841384 August 3rd, 2006 01:37 AM

Probelm For Runing This Code
Hi to all.
i have some problem with this code.please if you know help me immediatly.

-----code paging8.vb begin--------
Imports System
Imports System.IO
Imports System.Data
Imports System.Data.SQLClient
Imports System.Web.HttpException
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.Webcontrols
Imports System.Xml
Imports System.Data.DataTable
Imports System.collections
Imports system.configuration
Imports System.Datetime
Imports system.Web.Caching
Imports System.Data.SqlClient.SqlDataAdapter
Imports Microsoft.VisualBasic

Namespace myclass1

public class myfunction2 : inherits page

    Public Sub New()

    End Sub

public sub page_load(sender as object,e as eventargs)
end sub

public btnPrev AS LinkButton
public btnNext AS LinkButton
public pagedData As New pagedDataSource
public DS As New DataSet()
public strConnect As New SQLConnection("server=localhost;uid=sa;pwd=shona20 0;Database=northwind")
public objSQLAdapter As New SQLDataAdapter("SELECT companyname , contactname , contacttitle FROM customers ", strConnect)
public pageNumber AS Label
public theDataList AS DataList

    public function getTheData() As DataTable

        objSQLAdapter.Fill(DS, "customers")

        Return DS.Tables("customers").Copy
    End function

    public Sub doPaging()
        pagedData.DataSource = getTheData().DefaultView
        pagedData.AllowPaging = True
        pagedData.PageSize = 5

            pagedData.CurrentPageIndex = Int32.Parse(Request.QueryString("Page")).ToString( )
        Catch ex As Exception
            pagedData.CurrentPageIndex = 0
        End Try

        btnPrev.Visible = ( NOT pagedData.IsFirstPage )
        btnNext.Visible = ( NOT pagedData.IsLastPage )

        pageNumber.Text = (pagedData.CurrentPageIndex + 1) & " of " & pagedData.PageCount

        theDataList.DataSource = pagedData
    End Sub

    public Sub Prev_Click(ByVal obj As Object, ByVal e As EventArgs)
        Response.Redirect(Request.CurrentExecutionFilePath & "?Page=" & (pagedData.CurrentPageIndex - 1))
    End Sub

    public Sub Next_Click(ByVal obj As Object, ByVal e As EventArgs)
        Response.Redirect(Request.CurrentExecutionFilePath & "?Page=" & (pagedData.CurrentPageIndex + 1))
    End Sub

End Class
End Namespace

----------end code-------------

I compile above code with asp.net 2 vbc.exe --> (vbc.exe /t:library /r:system.dll,system.data.dll,system.web.dll,system .xml.dll /out:bin/paging8.dll paging8.vb)
and everything is ok without any error and .dll create in /bin folder.
but when i call paging.aspx file in my browser then I give error

BC30456: 'Prev_Click' is not a member of 'ASP._2paging_aspx'.

Line 41: <asp:LinkButton id="btnPrev" Text="&lt; Previous Page" OnClick="Prev_Click" runat="server" />

how Can I resolve this problem ??? thanks a lot.this 2 file(paging.aspx and paging8.vb work without any problem , but when I compile .vb code and call paging.aspx in my browser error occured !)
I used winxp with asp.net 2 and sql2000

------------begin paging.aspx file--------------
<%@ Import Namespace="myclass1" %>
<%@ Page Explicit="True" %>

<Script runat="server">

' this is comment

<title>Paging with ASP.NET - DataSet Example - VB.NET</title>

<form runat="server">

<asp:label id="pageNumber" runat="server" />
<asp:DataList id="theDataList" runat="server">
<table border="0" cellpadding="0" cellspacing="0" width="500">
                    <td width="140"><strong>Company Name</strong>:</td>
                <td><%# DataBinder.Eval(Container.DataItem, "companyname") %></td>
                <td width="110"><strong>Contact Name</strong>:</td>
                <td><A Href="detail.aspx?id=<%# DataBinder.Eval(Container.DataItem, "contactname") %> "> <%# DataBinder.Eval(Container.DataItem, "contactname") %></a></td>
        <td width="110"><strong>Contact Title</strong>:</td>
         <td><%# DataBinder.Eval(Container.DataItem, "contacttitle") %></td>


        <asp:LinkButton id="btnPrev" Text="&lt; Previous Page" OnClick="Prev_Click" runat="server" />
        <asp:LinkButton id="btnNext" Text="Next Page &gt; " OnClick="Next_Click" runat="server" />

-------------end paging.aspx file-----------

All times are GMT -4. The time now is 12:55 PM.

Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.