Click here to Skip to main content
15,908,172 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
VB
Dim da = New OdbcDataAdapter(qry1, vcon)
                da.SelectCommand.Transaction = vTrans

                da.Fill(ds, "testdemo")

                vTrans.Commit()
                Dim lmd As New List(Of modeldata)()
                Return View("View1", lmd)


view

@Modeltype System.Data.DataSet

@code
ViewBag.title = "View"
ViewData("Title") = "VIEW"
End code

@ViewBag.Title


@code

Dim grid As New WebGrid(Model, rowsPerPage:=5)

@grid.GetHtml(tableStyle:="table", fillEmptyRows:=True, headerStyle:="header", footerStyle:="grid-footer", mode:=WebGridPagerModes.All, firstText:="<< First", _
previousText:="< Prev", nextText:="Next >", lastText:="Last >>")

End code
Posted

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900