{"id":3536,"date":"2022-06-06T08:05:25","date_gmt":"2022-06-06T08:05:25","guid":{"rendered":"https:\/\/blog.ultramsg.com\/invia-whatsapp-api-messages-using-ocaml\/"},"modified":"2022-06-06T08:05:26","modified_gmt":"2022-06-06T08:05:26","slug":"invia-whatsapp-api-messages-using-ocaml","status":"publish","type":"post","link":"https:\/\/blog.ultramsg.com\/it\/invia-whatsapp-api-messages-using-ocaml\/","title":{"rendered":"Come inviare un’API WhatsApp con OCaml"},"content":{"rendered":"\n

introduzione<\/h2>\n\n

In questo tutorial creeremo semplici esempi per inviare messaggi tramite l’API di WhatsApp utilizzando OCaml.<\/p>\n\n

Primo messaggio API WhatsApp utilizzando OCaml<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/chat\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&body=WhatsApp API on UltraMsg.com works good&priority=10&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia immagine<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/image\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&image=https:\/\/file-example.s3-accelerate.amazonaws.com\/images\/test.jpg&caption=image Caption&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia documento<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/document\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&filename=hello.pdf&document=https:\/\/file-example.s3-accelerate.amazonaws.com\/documents\/cv.pdf&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia audio<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/audio\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&audio=https:\/\/file-example.s3-accelerate.amazonaws.com\/audio\/2.mp3&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia voce<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/voice\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&audio=https:\/\/file-example.s3-accelerate.amazonaws.com\/voice\/oog_example.ogg&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia video<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/video\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&video=https:\/\/file-example.s3-accelerate.amazonaws.com\/video\/test.mp4&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia il link<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/link\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&link=https:\/\/en.wikipedia.org\/wiki\/COVID-19&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia contatto<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/contact\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&contact=14000000001@c.us&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia posizione<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/location\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&address=ABC company \\n Sixth floor , office 38&lat=25.197197&lng=55.2721877&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
Invia Vcard<\/h2>\n\n
open Cohttp_lwt_unix\nopen Cohttp\nopen Lwt\n\nlet uri = Uri.of_string \"https:\/\/api.ultramsg.com\/instance1150\/messages\/vcard\" in\nlet body = Cohttp_lwt_body.of_string \"token=token_here&to=966550883606&vcard= BEGIN:VCARD\\nVERSION:3.0\\nN:lastname;firstname\\nFN:firstname lastname\\nTEL;TYPE=CELL;waid=14000000001:14000000002\\nNICKNAME:nickname\\nBDAY:01.01.1987\\nX-GENDER:M\\nNOTE:note\\nADR;TYPE=home:;;;;;;\\nADR;TYPE=work_:;;;;;;\\nEND:VCARD&referenceId=\" in\n\nClient.call ~body `POST uri\n>>= fun (res, body_stream) ->\n  (* Do stuff with the result *)<\/code><\/code><\/pre>\n\n
infine, puoi vedere la documentazione completa dell’API di Whatsapp<\/a> e le domande frequenti<\/a> .<\/p>\n","protected":false},"excerpt":{"rendered":"
introduzione In questo tutorial creeremo semplici esempi per inviare messaggi tramite l’API di WhatsApp utilizzando … <\/p>\n
Read More<\/a><\/p>\n","protected":false},"author":1,"featured_media":3443,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[274],"tags":[275,289],"class_list":["post-3536","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-api-di-whatsapp","tag-api-di-whatsapp","tag-ocaml-it","infinite-scroll-item","generate-columns","tablet-grid-50","mobile-grid-100","grid-parent","grid-25","no-featured-image-padding"],"_links":{"self":[{"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/posts\/3536","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/comments?post=3536"}],"version-history":[{"count":1,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/posts\/3536\/revisions"}],"predecessor-version":[{"id":3537,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/posts\/3536\/revisions\/3537"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/media\/3443"}],"wp:attachment":[{"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/media?parent=3536"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/categories?post=3536"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.ultramsg.com\/it\/wp-json\/wp\/v2\/tags?post=3536"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}