AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--Enviar mensaje de bienvenida whatsapp

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-10-09 19:15:00 -07:00
parent 8500107a31
commit 0a7ca48dc4
5 changed files with 194 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Sistemas/SessionesActivas.aspx.vb
View File

@@ -193,9 +193,8 @@ Partial Class SessionesActivas
Dim mensaje = TxtMensaje.Text.Trim() + "<br/> <a target='_blank' href='https://www.w3schools.com'>Liga</a>"
'TokenPermanente
Dim Token = "EAAQvTBdnkp4BO51Hmf5PD48NaY3ZC830gUS7WVNNoZAampZCK256UQ68OZCVCcPZCZCMmtW4xZA0PtP8HLRz6ZASufOgqk4A0lOpCi4ZBtWR5ZCpiMZCr9e0PpwUx4lZBW0spGZBM1DcOHQE5DnTmeJ1RISBnzI1i8RbRClLk2xbvNTu4elEXoSaofd96bW2mQ66ddLprSAZDZD"
EnviarNotificacionWhatsApp("6621143532", mensaje, Token:=Token)
EnviarNotificacionWhatsApp("6621143532", mensaje)
ClsSisNotificaciones.EnviarAlerta("Aviso", mensaje, RCveUsuario, Tipo:=TipoNotificacion.ToastInformacionB)