User-581461503 posted
dear experts, Im develop mobile web application using ASP.net. I do encounter an error "Requested Page cannot be display" when i test my application using Nokia Engage phone. Below here is the program code for the page. Private Sub Page_Load(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Put user code to initialize the page here lnkChinese.NavigateUrl = "Navigation.aspx?Lang=1" lnkEnglish.NavigateUrl = "Navigation.aspx?Lang=0" If Request.QueryString("Lang") = Nothing Or Request.QueryString("Lang")
= "" Then If Session("Lang") = 0 Then Session("Lang") = 0 objDictionary.Language = 0 Else Session("Lang") = 1 objDictionary.Language = 1 End If ElseIf Request.QueryString("Lang") = 0 Then Session("Lang") = 0 objDictionary.Language = 0 ElseIf Request.QueryString("Lang")
= 1 Then Session("Lang") = 1 objDictionary.Language = 1 End If lnkChinese.Text = objDictionary.Chinese_Word lnkEnglish.Text = objDictionary.English_Word MenuData() End Sub Private Function MenuData() Dim db As New clsDatabaseMYSQL(dbContent) Dim objMenu As
New clsMenu Dim dt As New DataTable 'Dim dtMenu As New DataTable 'Dim dRow As DataRow Dim i As Integer dt = objMenu.getMainMenu(db) For i = 0 To dt.Rows.Count - 1 Dim tvLink As New MobileControls.TextView Dim strDesc As String Dim browserCaps As System.Web.Mobile.MobileCapabilities
browserCaps = Request.Browser If browserCaps.HasCapability("isHTML32", vbNullString) Then Dim imgImage As New MobileControls.Image imgImage.ImageUrl = dt.Rows(i).Item("imagePath") imgImage.BreakAfter = False pnlMenu.Controls.Add(imgImage) imgImage = Nothing
End If If Session("Lang") = 0 Then strDesc = dt.Rows(i).Item("Name").ToString ElseIf Session("Lang") = 1 Then 'strDesc = iso8859_unicode(Convert.ToString(dt.Rows(i).Item("ChineseName")).Trim) End If Dim strLink As String strLink = dt.Rows(i).Item("MenuLink").ToString
strLink += "&ChineseName=" & Server.UrlEncode(Convert.ToString(dt.Rows(i).Item("ChineseName")).Trim) tvLink.BreakAfter = True tvLink.Text = "
" tvLink.Text += " " & strDesc tvLink.Text += "" pnlMenu.Controls.Add(tvLink) tvLink
= Nothing Next objMenu = Nothing db.CloseConn() db = Nothing ' Return dtMenu End Function