Вверх ↑
Ответов: 845
Рейтинг: 17
#1: 2025-01-09 12:06:49 ЛС | профиль | цитата

Add(MainForm,2953706,770,609)
{
link(onCreate,9290393:doWork,[])
}
Add(VBJScript,9290393,833,623)
{
WorkPoints=#6:doWork|
EventPoints=#7:onEvent|
DataPoints=#2:D1|
Language=1
Script=#16:function Main() |1:{|28: var sheetName = 'Лист1';|20: var cell = 'E2';|36: var newValue = 'Новое значение';|0:|28: // Создание тела запроса|61: var body = 'sheetName=' + encodeURIComponent(sheetName) +|52: '&cell=' + encodeURIComponent(cell) +|59: '&newValue=' + encodeURIComponent(newValue);|0:|63: var url = 'https://script.google.com/macros/s/скрыто/exec';|0:|40: // Создание объекта для HTTP-запроса|9: try {|59: var http = new ActiveXObject("MSXML2.XMLHTTP.6.0");|17: } catch (e) {|44: sys.onEvent("Ошибка: " + e.message);|15: return;|5: }|0:|34: http.Open("POST", url, false);|79: http.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");|99: http.setRequestHeader("Cookie", "имя_вашего_куки=значение"); // при необходимости добавьте куки|0:|23: // Отправка запроса|20: http.Send(body);|0:|22: // Проверка ответа|30: if (http.Status === 200) {|47: sys.onEvent("Запрос выполнен успешно");|12: } else {|82: sys.onEvent("Произошла ошибка: " + http.Status + " - " + http.statusText);|5: }|1:}|0:|65:/******************* Начало **********************************/|28:function doWork(Data, Index)|1:{|11: Main();|1:}|67:/************* Конец ********************************************/|
UseName=0
link(onEvent,4786660:doMessage,[])
}
Add(Message,4786660,903,623)
{
}

карма: 0

0