Актуально для пользователей из РБ. Может кому-то будет полезно.
Данные получает из ЕРИП с сайта wmtransfer.by Версия сырая, могут быть ошибки. Тестировалось только для Минска.
Возможно понадобиться адаптация под вашего поставщика электричества, изменением переменной $n
Код: Выделить всё
/*
$n = 10051; //Минское МРО Электроэнергия
если нужны другие коды, вытягивайте их самостоятельно из дерева ЕРИП
https://pay.wmtransfer.by/pls/iSOU/!iSOU.ServiceTree
выбрав нужный раздел ищите в коде <INPUT TYPE="hidden" NAME="service_no" VALUE="?????">
*/
Предварительно нужно создать объект Balance. В свойствах объекта можно хранить историю, затем строить графики расхода по месяцам.
Код скрипта getBalanceElec:
Код: Выделить всё
if (isset($params["level"])) $level = $params["level"]; else $level = 1;
if (!isOnline('Internet')) { say("Нет доступа в Интернет!", $level); return; }
if (isset($params["change"])) $change = $params["change"];
if (isset($params["account"])) $account = $params["account"];
if (!$account) $account = "000000000"; //номер абонента
$n = 10051; //Минское МРО Электроэнергия
/*
если нужны другие коды, вытягивайте их самостоятельно из дерева ЕРИП
https://pay.wmtransfer.by/pls/iSOU/!iSOU.ServiceTree
выбрав нужный раздел ищите в коде <INPUT TYPE="hidden" NAME="service_no" VALUE="?????">
*/
function browser_get_contents($url) {
$ch = curl_init($url);
curl_setopt($ch, CURLOPT_COOKIEFILE, 'cookie_wmtransfer_by.txt');
curl_setopt($ch, CURLOPT_COOKIEJAR, 'cookie_wmtransfer_by.txt');
curl_setopt($ch, CURLOPT_REFERER, 'http://wmtransfer.by');
curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/61.0.3163.100 Safari/537.36');
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
curl_setopt($ch, CURLOPT_HEADER, false);
curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 10);
curl_setopt($ch, CURLOPT_TIMEOUT, 15);
$html = curl_exec($ch);
curl_close($ch);
return $html;
}
function parse_form($page_cont) {
if ($page_cont) {
$page_cont = str_replace("\r" , "", $page_cont);
$page_cont = str_replace("\n" , "", $page_cont);
//print_r($page_cont);
preg_match_all("/<FORM(.*?)<\/FORM>/i", $page_cont, $matchForm);
//print_r($matchForm);
//$page_cont = $matchForm[0][0];
preg_match_all("/<INPUT(.*?)>/i", $page_cont, $matchInput);
//print_r($matchInput[1]);
foreach($matchInput[1] as $key => $value) {
preg_match_all("/NAME=\"(.*?)\"/i", $value, $matchName);
//print_r($matchName[1][0]);
preg_match_all("/VALUE=\"(.*?)\"/i", $value, $matchValue);
//print_r($matchValue[1][0]);
$param_arr[$matchName[1][0]] = $matchValue[1][0];
}
//$param_arr = array_filter($param_arr);
unset($param_arr['']);
//print_r($param_arr);
}
return $param_arr;
}
// ------------------------ BEGIN: ТЕЛО ПАРСЕРА ------------------------
$url = "http://wmtransfer.by/pay.asp?n=" . $n; //ссылка на платеж
$page_cont = browser_get_contents($url);
//print_r($page_cont);
$param_arr = parse_form($page_cont);
//print_r($param_arr);
$url = "https://pay.wmtransfer.by/pls/iSOU/!iSOU.Authentication?";
foreach($param_arr as $key => $value) {
$url .= "&" . $key . "=" . urlencode($value);
}
//print_r($url);
$page_cont = browser_get_contents($url);
//print_r($page_cont);
$url = "https://pay.wmtransfer.by/pls/iSOU/!iSOU.PaymentPrepare?service_no=" . $n . "&ExtraInfoText=&ParamCount=&Amount=&AmountCurr=&ServiceInfoId=";
$page_cont = browser_get_contents($url);
//print_r($page_cont);
$param_arr = parse_form($page_cont);
$param_arr["param1"] = $account;
//print_r($param_arr);
$url = "https://pay.wmtransfer.by/pls/iSOU/!iSOU.PaymentPrepare?";
foreach($param_arr as $key => $value) {
$url .= "&" . $key . "=" . urlencode($value);
}
//print_r($url);
$page_cont = browser_get_contents($url);
//print_r($page_cont);
$param_arr = parse_form($page_cont);
//print_r($param_arr);
// ------------------------ END: ТЕЛО ПАРСЕРА ------------------------
$mon_name_arr = [
'',
'январь',
'февраль',
'март',
'апрель',
'май',
'июнь',
'июль',
'август',
'сентябрь',
'октябрь',
'ноябрь',
'декабрь'
];
$elec_date = $param_arr['param3'];
if ($elec_date) {
$elec_date = "01." . $param_arr['param3'];
$elec_date = date('m', strtotime($elec_date));
$elec_date = intval($elec_date);
$elec_date = $mon_name_arr[$elec_date];
sg("Balance.ElecDate", $elec_date);
}
$ret .= "Показания счетчиков. ";
$elec_meter = $param_arr['param5'];
if ($elec_meter) {
sg("Balance.ElecCount", $elec_meter);
$ret .= "Электроэнергия на " . $elec_date . ": " . $elec_meter . " киловатт-час. ";
} else {
$ret .= "Данные не получены. ";
}
$ret = trim($ret);
if ($ret) {
say($ret, $level);
echo "<br>" . $ret;
}
Код для Cron (Рекомендую выполнять не чаще 2 раз в дневное время):
Код: Выделить всё
runScript("getBalanceElec", array("change"=>"1"));
P/S. Модераторы. Если я опубликовал не в тот раздел тему, пожалуйста перенесите, поправьте.Показания счетчиков. Электроэнергия на сентябрь: 70320 киловатт-час.