Android Question b4a can't save files since updating to b4a 8.0?

    Dim rp As RuntimePermissions
 
    rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE) 'it create a event
 
 
    Log("PERMISSION_WRITE_EXTERNAL_STORAGE:" & rp.Check(rp.PERMISSION_WRITE_EXTERNAL_STORAGE))
     
    For Each name In rp.GetAllSafeDirsExternal("")
        Log(name)
    Next

   rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
   Wait For Activity_PermissionResult (Permission As String, Result As Boolean)
   If Result = False Then
       ToastMessageShow("No permission...", True)
   Else
      File.WriteString(File.DirRootExternal, "1.txt", "aaa")
   End If