function kirimPesan() {
var url = 'https://sender.digilunar.com/send-message';
var headers = {
'Content-Type' : 'application/json',
'Authorization' : 'vcQwWe2hJiHLYvyGosWHtS9msP7Bmt'
};
var body = {
"api_key": "vcQwWe2hJiHLYvyGosWHtS9msP7Bmt",
"sender": "6285708249267",
"number": "6285229944411",
"message": "Uji coba lunar"
}
var options = {
'method' : 'post',
'headers' : headers,
'payload' : JSON.stringify(body)
};
var hasil = UrlFetchApp.fetch(url,options);
Logger.log (hasil);
}
function doPost(e){
var konten = e.postData.contents.split(',',12)[7].trim();
var pengirim = konten.slice(12,konten.length-1);
GmailApp.sendEmail('finaasiyb@gmail.com',"uji coba script",pengirim);
}
Selasa, 02 Juli 2024
GASWA menampilkan NAMA pengirim saja
GASWA Kirim Pesan via email
function kirimPesan() {
var url = 'https://sender.digilunar.com/send-message';
var headers = {
'Content-Type' : 'application/json',
'Authorization' : 'vcQwWe2hJiHLYvyGosWHtS9msP7Bmt'
};
var body = {
"api_key": "vcQwWe2hJiHLYvyGosWHtS9msP7Bmt",
"sender": "6285708249267",
"number": "6285229944411",
"message": "Uji coba lunar"
}
var options = {
'method' : 'post',
'headers' : headers,
'payload' : JSON.stringify(body)
};
var hasil = UrlFetchApp.fetch(url,options);
Logger.log (hasil);
}
function doPost(e){
var konten = e.postData.contents;
GmailApp.sendEmail('finaasiyb@gmail.com',"uji coba script",konten);
}
Senin, 01 Juli 2024
GAS WA Gatway-Kirim Pesan
function kirimPesan() {
var url = 'https://sender.digilunar.com/send-message';
var headers = {
'Content-Type' : 'application/json',
'Authorization' : 'vcQwWe2hJiHLYvyGosWHtS9msP7Bmt'
};
var body = {
"api_key": "vcQwWe2hJiHLYvyGosWHtS9msP7Bmt",
"sender": "6285708249267",
"number": "6285229944411",
"message": "Hello World"
}
var options = {
'method' : 'post',
'headers' : headers,
'payload' : JSON.stringify(body)
};
var hasil = UrlFetchApp.fetch(url,options);
Logger.log (hasil);
}
Selasa, 25 Juni 2024
GAS POSTMAN
function koneksi() {
var dataExcel = SpreadsheetApp.openById("1AwuVYSWRHoAIWn0o9dl6FMgl7FUs4XVPU41jNOjXnO4");
var namaData = dataExcel.getName();
Logger.log(namaData);
var sapaan = berbicara();
Logger.log(sapaan);
var sheetInfo = dataExcel.getSheetByName("nama siswa");
var jumlahBaris = sheetInfo.getLastRow();
Logger.log (jumlahBaris);
}
function berbicara(){
return "Assalamu'alaikum Wr. Wb"
}
function getCell (){
var dataExcel = SpreadsheetApp.openById("1AwuVYSWRHoAIWn0o9dl6FMgl7FUs4XVPU41jNOjXnO4");
var sheetInfo = dataExcel.getSheetByName("nama siswa");
var dataAlamat = sheetInfo.getRange(4,3).getValue();
Logger.log(dataAlamat);
}
function doPost(e){
var dataExcel = SpreadsheetApp.openById("1AwuVYSWRHoAIWn0o9dl6FMgl7FUs4XVPU41jNOjXnO4");
var sheetName = e.parameter.sheetName;
var sheet = dataExcel.getSheetByName(sheetName);
var action = e.parameter.action;
//filter request user
switch(action){
case "create":
return createData (e,sheet);
break;
case "read":
return readData();
break;
}
}
function createData(request,sheet){
var nama = request.parameter.nama;
var alamat = request.parameter.alamat;
sheet.appendRow([sheet.getLastRow(),nama,alamat]);
var output =JSON.stringify({
"hasil" : "sukses"
});
return ContentService
.createTextOutput(output)
.setMimeType(ContentService.MimeType.JSON);
}
GAS Pemula
function koneksi() {
var dataExcel = SpreadsheetApp.openById("1AwuVYSWRHoAIWn0o9dl6FMgl7FUs4XVPU41jNOjXnO4");
var namaData = dataExcel.getName();
Logger.log(namaData);
var sapaan = berbicara();
Logger.log(sapaan);
var sheetInfo = dataExcel.getSheetByName("nama siswa");
var jumlahBaris = sheetInfo.getLastRow();
Logger.log (jumlahBaris);
}
function berbicara(){
return "Assalamu'alaikum Wr. Wb"
}
Minggu, 12 November 2023
Tanggal dan Waktu event Change
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("A5:C13")) Is Nothing Then
ThisWorkbook.Sheets("cant").Range("A1").Value = Format(Now(), "dddd, dd mmmm yyyy")
ThisWorkbook.Sheets("cant").Range("A2").Value = "Waktu : " & Format(Now(), "hh:mm") & " WIB"
End If
End Sub
Selasa, 24 Oktober 2023
Langganan:
Postingan (Atom)
Menghitung USIA Excel
=BYROW(D2:D100; LAMBDA(tanggal_lahir; IF(tanggal_lahir=""; ""; DATEDIF(tanggal_lahir; TODAY(); "y"...
-
klik di sni
-
?worksheets.count 5 ======================== selection.offset (15,0).select ======================= selection.copy selection.offset (2,0)...
-
Option Explicit Sub cetaktabungansetoran() Dim rujukan As Range Dim b As Long Set rujukan = Sheets("CETAKTABUNGAN").Range(...