shitnersefe
New Member
I'm creating a page that uses Linqfor data access and I'm using DataList to display data. How can I use Linq to do data paging ? Please read simple code below :I normally use a PagedDatasource but this only seems to work with a DataTable.Here's my Linq to return Datatable which is bound with Datalist 
ublic Shared Function GetStudentList() As DataTable\[code\] Dim db As New DemoDataClassesDataContext() Dim query = From st In db.students _ Order By st.st_studentid Ascending _ Select st Dim dtStudent = New DataTable("myst") dtStudent.Columns.Add("st_id", GetType(Integer)) dtStudent.Columns.Add("st_userid", GetType(Guid)) dtStudent.Columns.Add("st_studentid", GetType(Integer)) dtStudent.Columns.Add("st_firstname", GetType(String)) dtStudent.Columns.Add("st_lastname", GetType(String)) dtStudent.Columns.Add("st_gender", GetType(String)) dtStudent.Columns.Add("st_email", GetType(String)) For Each q In query dtStudent.Rows.Add(New Object() {q.st_id, q.st_userid, q.st_studentid, q.st_firstname, q.st_lastname, q.st_gender, q.st_email}) Next Return dtStudentEnd Function\[/code\]In the code behind of the page :\[code\]Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not Page.IsPostBack() Then LoadData() End IfEnd SubPrivate Sub LoadData() dsStduent = da_Student.GetStudentList() dt_Student.DataSource = dsStduent dt_Student.DataBind()End Sub\[/code\]
ublic Shared Function GetStudentList() As DataTable\[code\] Dim db As New DemoDataClassesDataContext() Dim query = From st In db.students _ Order By st.st_studentid Ascending _ Select st Dim dtStudent = New DataTable("myst") dtStudent.Columns.Add("st_id", GetType(Integer)) dtStudent.Columns.Add("st_userid", GetType(Guid)) dtStudent.Columns.Add("st_studentid", GetType(Integer)) dtStudent.Columns.Add("st_firstname", GetType(String)) dtStudent.Columns.Add("st_lastname", GetType(String)) dtStudent.Columns.Add("st_gender", GetType(String)) dtStudent.Columns.Add("st_email", GetType(String)) For Each q In query dtStudent.Rows.Add(New Object() {q.st_id, q.st_userid, q.st_studentid, q.st_firstname, q.st_lastname, q.st_gender, q.st_email}) Next Return dtStudentEnd Function\[/code\]In the code behind of the page :\[code\]Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not Page.IsPostBack() Then LoadData() End IfEnd SubPrivate Sub LoadData() dsStduent = da_Student.GetStudentList() dt_Student.DataSource = dsStduent dt_Student.DataBind()End Sub\[/code\]