mirror of
https://github.com/KeymonSoft/Kelloggs_v4.git
synced 2026-04-19 19:19:14 +00:00
- VERSION 5.03.02
- Se agregó código para las promos por monto. - Se agregó codigo para validar la hora del telefono con la hora del servidor.
This commit is contained in:
@@ -29,10 +29,16 @@ End Sub
|
||||
' Determine if the app already has MANAGE_EXTERNAL_STORAGE call Environment.isExternalStorageManager()
|
||||
' Return True if this app already has MANAGE_EXTERNAL_STORAGE permission
|
||||
Public Sub HasPermission As Boolean
|
||||
Dim has As Boolean
|
||||
Dim jo As JavaObject
|
||||
jo.InitializeStatic("android.os.Environment")
|
||||
has = jo.RunMethod("isExternalStorageManager", Null)
|
||||
Dim has As Boolean = False
|
||||
Try
|
||||
Dim jo As JavaObject
|
||||
jo.InitializeStatic("android.os.Environment")
|
||||
If jo.RunMethod("isExternalStorageManager", Null) <> Null Then
|
||||
has = jo.RunMethod("isExternalStorageManager", Null)
|
||||
End If
|
||||
Catch
|
||||
Log(LastException)
|
||||
End Try
|
||||
Return has
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user