Discussione:
WhatsApp da Form Access
(troppo vecchio per rispondere)
Stefano
2022-04-30 18:29:59 UTC
Permalink
Buonasera,
ho creato un form anagrafica dove c'è il campo cellulare e un campo
messaggio.
Vorrei creare un pulsante per inviare il messaggio al cliente tramite
whatsapp.
il numero inserito nel campo cellulare è 3291111111

Ho inserito il codice:

Private Sub messaggio_Click()

me.txtmsg = "Conferma appuntamento"

CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39" & me.cellulare & "&text=" &
me.txtmsg
Exit_messaggio_Click:
Exit Sub

Err_messaggio_Click:
MsgBox "Err #" & Str(Err.Number) & vbCrLf & Err.Description &
vbCrLf & Str(Erl), , "MandaConWhatsapp [Whatsapp_MF]"
Resume Exit_messaggio_Click


End Sub

quando eseguo lo script, mi apre la pagina di whatsapp, ma mi
restituisce l'errore "Numero di telefono condiviso via url non valido"

Sto sbagliando qualcosa?
Vi ringrazio.
--
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
Stefano
2022-04-30 18:46:38 UTC
Permalink
Post by Stefano
Buonasera,
ho creato un form anagrafica dove c'è il campo cellulare e un campo
messaggio.
Vorrei creare un pulsante per inviare il messaggio al cliente tramite
whatsapp.
il numero inserito nel campo cellulare è 3291111111
Private Sub messaggio_Click()
me.txtmsg = "Conferma appuntamento"
CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39" & me.cellulare & "&text=" &
me.txtmsg
    Exit Sub
    MsgBox "Err #" & Str(Err.Number) & vbCrLf & Err.Description &
vbCrLf & Str(Erl), , "MandaConWhatsapp [Whatsapp_MF]"
    Resume Exit_messaggio_Click
End Sub
quando eseguo lo script, mi apre la pagina di whatsapp, ma mi
restituisce l'errore "Numero di telefono condiviso via url non valido"
Sto sbagliando qualcosa?
Vi ringrazio.
Buonasera,
ho trovato il problema. Whatsapp vuole il numero di cellulare formattato
con il codice internazionale e il numero di cellulare con spazi ogni 3
numeri quindi, ho modificato il codice così:

cell = "+39 " & Left(Me.cellulare, 3) & " " & Mid(Me.cellulare, 4, 3) &
" " & Right(Me.cellulare, 4)

CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39 329 111 1111&text=" & Me.txtmsg

In questo modo funziona.
Grazie comunque.
--
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
BFS
2022-05-02 06:31:04 UTC
Permalink
Post by Stefano
Post by Stefano
Buonasera,
ho creato un form anagrafica dove c'è il campo cellulare e un campo
messaggio.
Vorrei creare un pulsante per inviare il messaggio al cliente tramite
whatsapp.
il numero inserito nel campo cellulare è 3291111111
Private Sub messaggio_Click()
me.txtmsg = "Conferma appuntamento"
CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39" & me.cellulare & "&text=" &
me.txtmsg
     Exit Sub
     MsgBox "Err #" & Str(Err.Number) & vbCrLf & Err.Description &
vbCrLf & Str(Erl), , "MandaConWhatsapp [Whatsapp_MF]"
     Resume Exit_messaggio_Click
End Sub
quando eseguo lo script, mi apre la pagina di whatsapp, ma mi
restituisce l'errore "Numero di telefono condiviso via url non valido"
Sto sbagliando qualcosa?
Vi ringrazio.
Buonasera,
ho trovato il problema. Whatsapp vuole il numero di cellulare formattato
con il codice internazionale e il numero di cellulare con spazi ogni 3
cell = "+39 " & Left(Me.cellulare, 3) & " " & Mid(Me.cellulare, 4, 3) &
" " & Right(Me.cellulare, 4)
CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39 329 111 1111&text=" & Me.txtmsg
In questo modo funziona.
Grazie comunque.
hai trovato anche il modo di bypassare il fatto che cmq devi premere
invio a mano per spedire il messaggio ?
se si, puoi condividerlo?

BFS
--
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com
Ammammata
2022-05-02 08:45:50 UTC
Permalink
Il giorno Mon 02 May 2022 08:31:04a, *BFS* ha inviato su
Post by BFS
hai trovato anche il modo di bypassare il fatto che cmq devi premere
invio a mano per spedire il messaggio ?
se si, puoi condividerlo?
ah, ecco: se ne era già parlato qualche tempo fa ed era uscito questo
"intoppo"
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........
Michele
2022-05-04 08:22:28 UTC
Permalink
Post by Ammammata
Il giorno Mon 02 May 2022 08:31:04a, *BFS* ha inviato su
Post by BFS
hai trovato anche il modo di bypassare il fatto che cmq devi premere
invio a mano per spedire il messaggio ?
se si, puoi condividerlo?
ah, ecco: se ne era già parlato qualche tempo fa ed era uscito questo
"intoppo"
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........
io sono riuscito a inviare messaggi con telegram...
Simone Calligaris
2022-05-04 08:53:04 UTC
Permalink
Post by Michele
io sono riuscito a inviare messaggi con telegram...
Ed è un segreto?

Saluti
Michele
2022-05-04 09:56:48 UTC
Permalink
Post by Simone Calligaris
Post by Michele
io sono riuscito a inviare messaggi con telegram...
Ed è un segreto?
Saluti
no, se interessa posso postare il codice.
leggendo ho capito che sarebbe stato più difficile con whatsapp e ci ho rinunciato
Ammammata
2022-05-04 10:39:57 UTC
Permalink
Il giorno Wed 04 May 2022 11:56:48a, *Michele* ha inviato su
Il giorno mercoledì 4 maggio 2022 alle 10:53:06 UTC+2 Simone
Post by Simone Calligaris
Post by Michele
io sono riuscito a inviare messaggi con telegram...
Ed è un segreto?
Saluti
no, se interessa posso postare il codice.
leggendo ho capito che sarebbe stato più difficile con whatsapp e ci ho rinunciato
bene. ti ringrazio io a nome di Simone: posta pure che male non fa
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........
Simone Calligaris
2022-05-04 10:56:30 UTC
Permalink
Post by Michele
no, se interessa posso postare il codice.
Beh, penso possa interessare molti se non tutti :-)

Saluti
BFS
2022-05-05 05:52:41 UTC
Permalink
Post by Michele
Post by Simone Calligaris
Post by Michele
io sono riuscito a inviare messaggi con telegram...
Ed è un segreto?
Saluti
no, se interessa posso postare il codice.
leggendo ho capito che sarebbe stato più difficile con whatsapp e ci ho rinunciato
avevo letto che whatapp per contratto vieta l'invio di messaggi senta
l'intervento dell'utente...
l'unica è tramite le business api

BFS
BFS
2022-05-20 05:50:27 UTC
Permalink
Post by Stefano
Buonasera,
ho creato un form anagrafica dove c'è il campo cellulare e un campo
messaggio.
Vorrei creare un pulsante per inviare il messaggio al cliente tramite
whatsapp.
il numero inserito nel campo cellulare è 3291111111
Private Sub messaggio_Click()
me.txtmsg = "Conferma appuntamento"
CreateObject("Shell.Application").Open
"https://api.whatsapp.com/send?phone=+39" & me.cellulare & "&text=" &
me.txtmsg
    Exit Sub
    MsgBox "Err #" & Str(Err.Number) & vbCrLf & Err.Description &
vbCrLf & Str(Erl), , "MandaConWhatsapp [Whatsapp_MF]"
    Resume Exit_messaggio_Click
End Sub
quando eseguo lo script, mi apre la pagina di whatsapp, ma mi
restituisce l'errore "Numero di telefono condiviso via url non valido"
Sto sbagliando qualcosa?
Vi ringrazio.
notizie fresche di ieri durante il live di Zuck

https://www.ceotech.it/whatsapp-nuova-api-cloud-con-servizi-premium/

a breve sarà possibile inviare messaggi mediante cloud API e molto altro.

vedremo i costi

BFS

Loading...