Private Shared Sub asignarTimerTask()
' Las tareas sólo deben registrarse una vez
For Each task In BackgroundTaskRegistration.AllTasks
If task.Value.Name = "TileAsignarTilesTimer" Then
Return
End If
Next
Dim builder As New BackgroundTaskBuilder()
builder.Name = "TileAsignarTilesTimer"
builder.TaskEntryPoint = "BackgroundTasks.TileBackgroundTask"
'builder.SetTrigger(New TimeTrigger(180, False))
builder.SetTrigger(New TimeTrigger(15, False))
builder.Register()
End Sub