Sub Globals
Dim LogonUrl As String = "file:///android_asset/test.htm"
Dim WebView1 As WebView
Dim WebViewExtras1 As WebViewExtras
End Sub
Sub Activity_Create(FirstTime As Boolean)
WebView1.Initialize("WebView1")
Activity.AddView(WebView1, 0, 0, 100%x, 100%y)
WebView1.ZoomEnabled = False
WebViewExtras1.Initialize(WebView1)
WebViewExtras1.addJavascriptInterface(WebView1, "APP")
WebView1.LoadUrl(LogonUrl)
End Sub
Sub Logout
Activity.Finish
End Sub