From 66757c60dec96e8f444a9e237619eb9c55d2635b Mon Sep 17 00:00:00 2001 From: Jose Alberto Guerra Ugalde Date: Fri, 17 May 2024 05:19:00 -0600 Subject: [PATCH] - Se cambio el nombre del archivo que se envia por WhatsApp cuando se envia la base de datos, ahora es kmt_durakelo.db --- B4A/B4XMainPage.bas | 4 ++-- B4A/Durakelo.b4a.meta | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/B4A/B4XMainPage.bas b/B4A/B4XMainPage.bas index 1c2c6ae..9ee6beb 100644 --- a/B4A/B4XMainPage.bas +++ b/B4A/B4XMainPage.bas @@ -514,11 +514,11 @@ Private Sub b_envioBD_Click 'copy the shared file to the shared folder Log("xxxxxx:"&Provider.SharedFolder) Sleep(1000) - File.Copy(File.DirInternal, FileName, Provider.SharedFolder, FileName) + File.Copy(File.DirInternal, FileName, Provider.SharedFolder, $"kmt_durakelo.db"$) Dim email As Email email.To.Add("cheveguerra@gmail.com") email.Subject = "subject" - email.Attachments.Add(Provider.GetFileUri(FileName)) + email.Attachments.Add(Provider.GetFileUri($"kmt_durakelo.db"$)) ' email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment Dim in As Intent = email.GetIntent in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION diff --git a/B4A/Durakelo.b4a.meta b/B4A/Durakelo.b4a.meta index b7a2d17..d03da23 100644 --- a/B4A/Durakelo.b4a.meta +++ b/B4A/Durakelo.b4a.meta @@ -73,6 +73,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=kms_helperSubs,CheckNotificationAccess,446,0,kms_helperSubs,traeUsarIntentBDWA,457,0,kms_helperSubs,Class_Globals,18,0,B4XMainPage,ocultaProgreso,526,0,B4XMainPage,cb_importarBDWA_CheckedChange,529,0,B4XMainPage,ImageView4_Click,429,0,kms_helperSubs,importaBDDesdeWhatsApp,467,3,B4XMainPage,B4XPage_Created,103,0,Visual Designer,login.bal,-100,6,B4XMainPage,B4XPage_Appear,208,0 +NavigationStack=kms_helperSubs,CheckNotificationAccess,446,0,kms_helperSubs,traeUsarIntentBDWA,457,0,kms_helperSubs,Class_Globals,18,0,B4XMainPage,ocultaProgreso,526,0,B4XMainPage,cb_importarBDWA_CheckedChange,529,0,B4XMainPage,ImageView4_Click,429,0,B4XMainPage,B4XPage_Created,103,0,B4XMainPage,B4XPage_Appear,208,0,Visual Designer,login.bal,-100,6,kms_helperSubs,importaBDDesdeWhatsApp,472,3,B4XMainPage,b_envioBD_Click,514,6 SelectedBuild=0 VisibleModules=2,10,4,19,5,6,8,9,11,24,7