Android Question sms send without permissions problem

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
Hola, si uso este código enviado por EREL, ¿es posible modificarlo para enviar un SMS sin que el usuario tenga que presionar el botón de enviar? Necesito que sea enviado directamente desde la APP. Este tema de restricciones de permisos me está complicando.
metro

B4X:
 Sub enviar_sms ()   
    
    Dim PhoneNumber As String = "0232320XXXXXX"
    Dim Message As String = evento_electrico & evento_informacion & evento_telefonico & evento_internet & "" & Editsuministro.Text & "" & Editobs.Text
    Dimado As Boolean = True
    Dim enviado como Boolean = True

    'env.Initialize ("env")   
    ToastMessageShow ("enviando mensaje ..." & PhoneNumber, True)           
    'msn.Send2 (PhoneNumber, Message, recibido, enviado)' envia sms
    Dim In In Intent
    Dim EN como intención
    In.Initialize (In.ACTION_VIEW, "sms:" & PhoneNumber)
    
    
    In.PutExtra ("sms_body", Mensaje)
    
    Iniciar actividad (en)
    
    
    End Sub [/ CODE]
 

DonManfred

Expert
Licensed User
Longtime User
This is the english part of the forum. Please write english here.
 
Upvote 0
Top