The code (VB .Net) to call the Wurfl function is :
Code: Select all
Dim wrapper = New HttpContextWrapper(HttpContext.Current)
Dim dinfo As DeviceInfo = WurflService.GetDataByRequest(wrapper)
Dim strWireless = dinfo.Get("is_wireless_device")
Code: Select all
Imports ScientiaMobile.WurflCloud
Imports ScientiaMobile.WurflCloud.Config
Imports ScientiaMobile.WurflCloud.Device
Public Class WurflService
Public Shared Function GetDataByRequest(ByVal context As HttpContextBase) As DeviceInfo
Dim config = New DefaultCloudClientConfig() With {.ApiKey = "mykey:apikeycheckedascorrect"}
Dim manager = New CloudClientManager(config)
Return manager.GetDeviceInfo(context)
End Function
End Class
ScientiaMobile.WurflCloud.Exc.ApiKeyException was unhandled by user code
HResult=-2146233088
Message=No API key was provided
Source=ScientiaMobile.WurflCloud
StackTrace:
at ScientiaMobile.WurflCloud.Http.CloudClient.SendRequest(HttpContextBase context, String url, Boolean uaMayBeDifferent)
at ScientiaMobile.WurflCloud.CloudClientManager.DetectDevice(HttpContextBase context, String userAgent, Dictionary`2 reqParams, String[] capabilities, Boolean uaMayBeDifferent)
at ScientiaMobile.WurflCloud.CloudClientManager.GetDeviceInfo(HttpContextBase context, String[] capabilities)
at ScientiaMobile.WurflCloud.CloudClientManager.GetDeviceInfo(HttpContextBase context)
at WurflService.GetDataByRequest(HttpContextBase context) in C:\Development Area\Website Modulise\Modulise\App_Code\WurflService.vb:line 9
at Login_S.Page_Load(Object sender, EventArgs e) in C:\Development Area\Website Modulise\Modulise\Site\Login_S.aspx.vb:line 31
at System.Web.UI.Control.OnLoad(EventArgs e)
at System.Web.UI.Control.LoadRecursive()
at System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint)
InnerException:
Any help would be appreciated.
Thanks.