Zireael |
Отправлено: 01 Декабря, 2018 - 01:41:38
|
Эксперт
Покинул форум
Сообщений всего: 4467
Дата рег-ции: Нояб. 2017
Репутация: 585
|
Цитата: Надо потом пропарсить ответ
Проще использовать sendgetweb и сразу получить содержимое файла.
CODE:char c[1000];
string s;
if(sendgetweb(#c[0], "", "GET", "http:/"+"/zireael.zzz.com.ua", "/qwerty.txt")>0)
{
messagebox(format(#c[0])); // текст файла
if(regexsearch(1, #s, format(#c[0]), "(?<=ivantu\s)\d+")>0) // ищем число после 'ivantu '
{
messagebox(s);
}
}
else messagebox("Ошибка"); |
|
|
Zireael |
Отправлено: 01 Декабря, 2018 - 20:10:38
|
Эксперт
Покинул форум
Сообщений всего: 4467
Дата рег-ции: Нояб. 2017
Репутация: 585
|
code (Отобразить)CODE:string s, time, timestamp;
int result=0;
int second, day;
if(sendgetweb(#s, "", "GET", "http:/"+"/zireael.zzz.com.ua", "/time.txt")>0)
{
messagebox(s); // текст файла, в нём ник и время в секундах когда закончится доступ к exe
if(regexsearch(1, #time, s, "(?<=ivantu\s)\d+")>0) // ищем число после 'ivantu '
{
if (sendgetweb(#s, "A", "GET", "http:/"+"/time.is", "/Unix_time_now")>0) // получить код страницы
{
if(regexsearch(1, #timestamp, s, "(?<=\>)\d{10}(?=\<\/div\>)")>0) // ищем таймштамп (время в секундах прошедшее с 1 янв 1970)
{
//messagebox (formatsn(timestamp)+2592000); // текущее время + 2592000 (30 дней в секундах), это число записывать в файл
if(formatsn(time)>formatsn(timestamp)) // если не вышло время
{
result=1; // флаг что скрипт будет доступен
second=formatsn(time)-formatsn(timestamp);
day=(second)/86400;
messagebox("Осталось секунд: "+format(second)+", дней: "+format(day));
}
}
}
}
}
if(result==1)
{
// тут сам скрипт
}
else messagebox("Время вышло или нет доступа к интернету");
Файл, в котором хранится время, записывать таймштамп (время в секундах прошедшее с 01.01.1970, https://time.is/Unix_time_now) + время в секундах, в течении которого скрипт доступен.(Отредактировано автором: 01 Декабря, 2018 - 20:11:01) |
|
|
ivantu |
Отправлено: 03 Декабря, 2018 - 08:31:27
|
Эксперт
Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013
Репутация: 14
|
Друзья глупый вопрос наверное , как можно переменную вставить в поиск по тексту?
CODE:key=individualcode();
if(sendgetweb(#sk, "", "GET", "http:/"+"/site.ru", "/keys.txt")>0)
{
//messagebox(sk);
if(regexsearch(1, #time, sk, "(?<=key\s)\d+")>0)
{ (Отредактировано автором: 03 Декабря, 2018 - 08:31:59) |
|
|
|