Mega Code Archive

 

Categories / ASP.Net / Mobile Control

 

Bind data from Access database to mobile list (VB net)

<%@ Page      Inherits="System.Web.UI.MobileControls.MobilePage"      Language="VB"  %> <%@ Register      TagPrefix="mobile"      Namespace="System.Web.UI.MobileControls"      Assembly="System.Web.Mobile"  %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OLEDB" %> <script runat="server" language="VB"> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)     Dim DBConn as OleDbConnection     Dim DBCommand As OleDbDataAdapter     Dim DSPageData as New DataSet     DBConn = New OleDbConnection( _         "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _         & "DATA SOURCE=" _         & Server.MapPath("EmployeeDatabase.mdb;"))     DBCommand = New OleDbDataAdapter _         ("Select FirstName " _         & "From Employee " _         & "Order By FirstName", DBConn)     DBCommand.Fill(DSPageData, _         "Employee")     List1.DataSource = _         DSPageData.Tables("Employee").DefaultView     List1.DataBind() End Sub</script> <mobile:form      id="StartForm"      runat="server"> <mobile:list     runat="server"      id="list1"     datatextfield="FirstName"  /> </mobile:form>