.Net 2005, DataList如何控制多少個product show

Piyo

我要做一個像以下的layout的DataList,雖然我是做到了﹐但是卻不能設定一頁成只能list 20個product.因為同意種類的PRODUCT我有好多的東西會在同一面﹐造成一page會非常的長。。。。

請問你們會弄這個嗎﹖我是剛要從ASP轉向。NET的新手﹐請大家指教

http://quickstarts.asp.net/QuickStartv20/aspnet/samples/ctrlref/data/DataList/DataList5_vb.aspx

Piyo

推推。。。。。。有人能給點意見嗎﹖

天下人管天下事

原帖由 Piyo 于 23-10-2007 09:36 AM 发表
推推。。。。。。有人能給點意見嗎﹖

set attribute of pagesize of the datalist to 20.

Piyo

原帖由 天下人管天下事 于 23-10-2007 12:29 PM 发表

set attribute of pagesize of the datalist to 20.

請問如何SET﹖

datalist没有办法set pagesize, 要自己用code 来写
有几个方法,比较直接和简单的做法就是抄别人的做法啦.
建议你自己google --> paging .net 2.0 datalist

大概的做法就是用自己的paging display 1,2,3.. 然后在按那些号码的时候,pass as parameter to the database, 再选择性的取回,说容易不容易,说难也不难.

datalist没有办法set pagesize, 要自己用code 来写
有几个方法,比较直接和简单的做法就是抄别人的做法啦.
建议你自己google --> paging .net 2.0 datalist

大概的做法就是用自己的paging display 1,2,3.. 然后在按那些号码的时候,pass as parameter to the database, 再选择性的取回,说容易不容易,说难也不难.

Piyo

原帖由 阿牙木 于 24-10-2007 08:59 AM 发表
datalist没有办法set pagesize, 要自己用code 来写
有几个方法,比较直接和简单的做法就是抄别人的做法啦.
建议你自己google --> paging .net 2.0 datalist

大概的做法就是用自己的paging display 1,2,3.. ...

你好。。。我是找到別人的CODE了
但是人家的是寫在VS2003的
-------------------------------------------------
Dim pagedData As New pagedDataSource

Sub Page_Load(byVal obj As Object, byVal e As EventArgs)
doPaging()
End Sub


Function getTheData() As DataTable
Dim DS As New DataSet()
Dim strConnect As New SqlConnection("server=localhost;uid=sa;pwd=;Database=Northwind")
Dim objSQLAdapter As New SQLDataAdapter("SELECT companyName, contactName, contactTitle FROM customers", strConnect)
objSQLAdapter.Fill(DS, "customers")

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


Sub doPaging()
pagedData.DataSource = getTheData().DefaultView 'bind a DataTable as a DataSource
pagedData.AllowPaging = True
pagedData.PageSize = 10

Try
pagedData.CurrentPageIndex = Int32.Parse(Request.QueryString("age")).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
theDataList.DataBind()
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

-------------------------------------------------------------------------------------


我想請問﹐下面這connection如何轉換在customer.xsd?如果我是用dataset的話

Function getTheData() As DataTable
Dim DS As New DataSet()
Dim strConnect As New SqlConnection("server=localhost;uid=sa;pwd=;Database=Northwind")
Dim objSQLAdapter As New SQLDataAdapter("SELECT companyName, contactName, contactTitle FROM customers", strConnect)
objSQLAdapter.Fill(DS, "customers")

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

謝謝

我已经三年没有用VB了,要请别人来帮你看, 哈哈.