function kirim_pesan(nomorpengirim,pesan){
//KODE BALASAN DARI WHATSAPP
var url = 'https://sender.digilunar.com/send-message';
var api = '8cm35qQ0XA1qhAFlTkEb5I38RxTm4q';
var headers = {
'Content-Type' : 'application/json',
'Authorization' : api,
};
var body = {
"api_key": api,
"sender": "6285708249267",
"number": nomorpengirim,
"message": pesan
};
var options = {
'method' : 'post',
'headers' : headers,
'payload' : JSON.stringify(body)
};
var hasil = UrlFetchApp.fetch(url,options);
// Logger.log (hasil);
}
function doPost(e){
//nomor pengirim
var konten = e.postData.contents.split(',',10)[5].trim();
var nomorpengirim = konten.slice(10,konten.length-16);
//nama pengirim
var konten = e.postData.contents.split(',',12)[7].trim();
var namapengirim = konten.slice(12,konten.length-1);
var pesan = "Selamat malam " + namapengirim;
kirim_pesan(nomorpengirim,pesan);
}
Rabu, 03 Juli 2024
GASWA uji Teks plus nama pengirim
Langganan:
Posting Komentar (Atom)
Menghitung USIA Excel
=BYROW(D2:D100; LAMBDA(tanggal_lahir; IF(tanggal_lahir=""; ""; DATEDIF(tanggal_lahir; TODAY(); "y"...
-
klik di sni
-
Option Explicit Sub cetaktabungansetoran() Dim rujukan As Range Dim b As Long Set rujukan = Sheets("CETAKTABUNGAN").Range(...
-
Option Explicit Private Sub CDMDDELETE_Click() Application.ScreenUpdating = False Me.TABELDATA.value = "" If Me.TXTNISN.valu...
Tidak ada komentar:
Posting Komentar