Опубликовано 2 августа, 20242 г. Эххх. Что-то никто не хочет делится отремонтированными плодами своего творчества по инструкции доброго Shurik91
Опубликовано 2 августа, 20242 г. 5 минут назад, VikTuk сказал: Эххх. Что-то никто не хочет делится отремонтированными плодами своего творчества по инструкции доброго Shurik91 Они их теперь продают )
Опубликовано 2 августа, 20242 г. Администраторы 39 минут назад, VikTuk сказал: Эххх. Что-то никто не хочет делится отремонтированными плодами своего творчества по инструкции доброго Shurik91 Моя прога:
Опубликовано 2 августа, 20242 г. кто ремонт может сделать таблицы тому скину деньги ,только с Украины могу перевести macbeth-v-3.1_08-2021.xlsb
Опубликовано 2 августа, 20242 г. Во вроде сделано все по инструкции. А работать не хочет. Моет быть кто-то сможет посмотреть?RADARIO BET_(FX2024).xlsm nFile.xlsm
Опубликовано 2 августа, 20242 г. Добрый, может кто починить эти две таблицы? FOOTBALL CALCULATION 2024.xlsb AutoGoL_mod(FX2023).xlsb
Опубликовано 2 августа, 20242 г. 1 час назад, Semyon Semyonovich сказал: Они их теперь продают ) 53 минуты назад, asdsadas сказал: Кто отремонтировал поделитесь Тестируем, будет стабильо работать обязательно поделимся
Опубликовано 2 августа, 20242 г. 22 часа назад, Shurik91 сказал: Итак😅, ПОЧТИ УНИВЕРСАЛЬНАЯ ИНСТРУКЦИЯ v. 01.08.2024📎. Чтобы отремонтировать свою любимую таблицу❤️. В 70%, она должна сработать. Но бывают случаи, когда кто-то уже побывал в таблице или таблица, написана с некоторыми отличиями. Тогда нужно, повнимательнее быть и проверять, что меняете и где? Думаю, кто не справится сам. Сможет здесь попросить, кого-то помочь или подсказать. РЕШЕНИЕ✔️ оцениваю как СЛОЖНО, но возможно, главное захотеть👌 постарался максимально упростить инструкцию, чтобы у всех была возможность, попробовать самостоятельно сделать ремонт или помогать другим. Так как таблиц очень много. ПОЕХАЛИ✍️ 1. В отдельный новый модуль. 2. Скопируй и вставь, функцию getTable. Внутри ничего не меняй. Она универсальная. Мы будем вызывать её далее, для загрузки нужных таблиц. 3. Обязательно удали строку Option Explicit. Которая появится в новом модуле. Код функции getTable: Function getTable(id, sourcer, table_name) Dim table(35) As Variant Dim game(25) As Variant Select Case table_name: Case "table_overall": table_index = 1: my_temper = "0" Case "table_home": table_index = 2: my_temper = "0" Case "table_away": table_index = 3: my_temper = "0" Case "form_overall": table_index = 5: my_temper = "0" Case "form_home": table_index = 8: my_temper = "0" Case "form_away": table_index = 9: my_temper = "0" Case "over_under_overall": table_index = 6: my_temper = "2.5" Case "over_under_home": table_index = 17: my_temper = "2.5" Case "over_under_away": table_index = 18: my_temper = "2.5" End Select t = 0 Set objHttp = CreateObject("MSXML2.XMLHTTP") objHttp.Open "GET", "https://d." & sourcer & "x/feed/df_to_1_" & id & "_" & table_index, False objHttp.setRequestHeader "X-Fsign", "SW9D1eZo" objHttp.send fs_input = objHttp.responseText fs_rows = Split(fs_input, "¬~") fs_rows_len = UBound(fs_rows) - LBound(fs_rows) For i = 0 To fs_rows_len - 1 fs_row = Split(fs_rows(i), "¬") fs_row_len = UBound(fs_row) - LBound(fs_row) fs_index = Split(fs_row(0), ChrW(&HF7)) If IsArray(fs_index) Then fs_index_name = fs_index(0) fs_index_value = fs_index(1) End If If fs_index_name = "TR" And temper = True Then Erase game For j = 0 To fs_row_len fs_row_parts = Split(fs_row(j), ChrW(&HF7)) Select Case fs_row_parts(0): Case "TR": game(0) = fs_row_parts(1) Case "TN": game(3) = fs_row_parts(1) Case "TM": f = fs_row_parts(1) game(6) = f Case "TWR", "OUO": game(9) = fs_row_parts(1) Case "TDR", "OUU": game(12) = fs_row_parts(1) Case "TLR": If IsEmpty(game(15)) Then game(15) = fs_row_parts(1) Case "TG": gols = Split(fs_row_parts(1), ":") If IsEmpty(game(15)) Then game(15) = gols(0) game(16) = gols(1) game(18) = gols(0) game(19) = gols(1) Case "TP": game(25) = fs_row_parts(1) End Select Next j If table_index = 5 And f < 5 Then GoTo next_item If t > 35 Then GoTo return_table table(t) = game t = t + 1 ElseIf fs_index_name = "ETI" Then temper = False If fs_index_value = my_temper Then temper = True End If next_item: Next i return_table: getTable = table End Function 4. Далее, нужно найти модуль👁️ в твоей таблице, в котором находятся участки кода с ошибками🐛 Они все, включают в себя ссылку, с приставкой ss_1 Можно в поиск вбить, это ключевое слово и поискать по модулям. Приблизительно, они выглядят так. Блоки с кодом. Кто пользовался старыми инструкциями по ремонту от меня, должен их знать и помнить. 6. Когда ты обнаружил строку ss_1. Убедись, что она ПЕРВАЯ! Их может быть несколько (2, 3, 6) Мы будем исправлять все ss_1. Начиная с ПЕРВОЙ. Не ссылки исправлять, а добавлять новый рабочий код. В этих местах. 7. Если ты сюда добрался, то ты в НАЧАЛЕ ПУТИ😅 8. Теперь из ПЕРВОЙ ссылки ss_1. В твоей таблице. Нам нужно узнать, имена переменных для запуска функции getTable. Приблизительно ссылка ss_1, выглядит так: https://d." & sourcer & "x/feed/ss_1_" & tournamentEncodedId & "_" & tournamentStageEncodedId & "_table_overall?hp1=" & participantEncodedIds1 & "&hp2=" & participantEncodedIds2 & "&e=" & id Переменные (параметры)🔧 для getTable, которые тебе нужны. Берутся из ссылки ss_1 9.1 Это имя переменной, в которой хранится название флешскора. Стандартное название sourcer. Может быть и другое! Запиши или запомни его название. Если переменной нет, а просто написано flashscore.com/ или ru/ Тогда запиши его название. 9.2 Имя турнирной таблицы. Которую мы восстанавливаем. Например здесь, в этом блоке, мы ремонтируем table_overall 9.3 Переменная, которая хранит в себе, ID текущего матча. Смотри в самый конец ссылки ---> Может быть имя id или match_id. Или другое, как у тебя. 10. Всё запомнил или записал. 11. Исправляем первый ss_1 Каждый блок ss_1. Имеет своё НАЧАЛО и КОНЕЦ. Начало - это наличие ссылки ss_1 Конец, это слово End If. Или Начало следующего блока ss_1. Тебе нужно найти разрыв между ними. 12. И в конце каждого ss_1. Вызвать getTable. И передать ей переменные (параметры) 9.1, 9.2, 9.3 getTable( ID матча, название флешскора, название турнирной таблицы ) ранее, ты их записал. Поэтому проблем с поиском не будет. Вызов getTable. Копируешь код целиком и вставляешь между концом и началом следующего ss_1 Это нужно вставить в разрыв. b1 = 2 table_overall = getTable(id, sourcer, "table_overall") For Each submatches In table_overall If IsEmpty(submatches) Then Exit For ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(0) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(3) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(6) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(9) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(12) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(15) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(18) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(19) ThisWorkbook.Sheets("имя твоего листа").Range("имя ячейки" & b1).Value = submatches(25) b1 = b1 + 1 Next submatches Вот так, должно, выглядеть: 13. СМОТРИ внимательно! На скрине, я отметил, что должно совпадать с оригиналом. В точности, как в старом коде, который там есть. 1. Имя листа. 2. Имя ячеек. 3. Индексы. Всё, должно совпадать на 100% Ты сам, смотришь и проверяешь. Если Имя листа другое у тебя. Ты меняешь на своё имя. Если Индексов, меньше, лишние убираешь. 14. Первый блок ss_1 ты починил. МОЛОДЕЦ👍 15. Далее, все остальные ss_1. Ремонтируются аналогично. Первому. Например, ты идёшь дальше. И встретил такой блок ss_1. Он отвечает за загрузку таблицы ТБ 2,5. Для домашней команды. Имя over_under_home. Здесь, имя листа, имя ячеек и индексы другие и их меньше. Как быть? Ваш новый код, должен быть таким! Количество индексов, уменьшаем. Пишем другое имя листа. И ячейки тоже меняем. В вызове меняем имя таблицы на over_under_home. Вроде бы ВСЁ!😉 Для людей опытных напишу, коротко. Наша задача убрать полностью старый код и заменить на новый. А так как ячейки и имя листа, остаются теми же. То в новом коде, нам нужно. Просто прописать их имена и всё. Я оставил, новичкам старый код, чтобы им было легче, а то если, ещё и удалять просить... То можно совсем потеряться и запутаться😅 Кто умеет смотреть скрытые листы и ставить на стоп код, проверьте обязательно, заполнение таблиц на правильность. Мало ли...🧐 А может быть такое, что ссылки с приставкой ss1 нет?
Опубликовано 2 августа, 20242 г. 5 часов назад, VikTuk сказал: Эххх. Что-то никто не хочет делится отремонтированными плодами своего творчества по инструкции доброго Shurik91 Да, бееееда...Никто так мне и не прислал ящик пятничного пива , для починки табличек🥲
Опубликовано 2 августа, 20242 г. Всем добрый вечер! Кто-нибудь может починить таблицу? GoldeBet V.2 (5).xlsb
Опубликовано 2 августа, 20242 г. 44 минуты назад, Burn Marlon сказал: Да, бееееда...Никто так мне и не прислал ящик пятничного пива , для починки табличек🥲 Да, пожалуйста. Нам не жалко. ))
Опубликовано 2 августа, 20242 г. Постоянный В 01.08.2024 в 20:20, Shurik91 сказал: Наша задача убрать полностью старый код и заменить на новый Это все понятно и полезно. Но касательно изменений со стороны флэшскора - в чем именно они заключаются? ) Что конкретно перестало работать, какая строка, массив, переменная, ссылка, адрес или ячейки? ) Простыми словами если можно, там то там, это это 🙂
Опубликовано 2 августа, 20242 г. Постоянный Рабочий, готовый к использованию "модуль" загрузки общей, домашней и гостевой таблицы на базе Shurik91. Для полноценности, добавил запись РГ, может кто пользуется этими значениями. Грузит так: table_a - пишем свои, или необходимые. nmshet - название листа. frow и lrow - диапазон столбцов для записи данных. В принципе на этом фсё, пока что ) g_5_Data.bas Изменено 2 августа, 20242 г. пользователем Валерий Иванович
Опубликовано 3 августа, 20242 г. Может кому пригодится. Таблицу грузит. Пристально не тестил. Ничего не менял. DeluX_API-based_v1.0 mod RedStar.xlsm
Опубликовано 3 августа, 20242 г. Automatic version of the file. Outosaves the output. I hope someone repairs the non-working parts Univers_liga_2v (6).xlsm
Опубликовано 3 августа, 20242 г. 10 часов назад, Валерий Иванович сказал: Рабочий, готовый к использованию "модуль" загрузки общей, домашней и гостевой таблицы на базе Shurik91. Для полноценности, добавил запись РГ, может кто пользуется этими значениями. Грузит так: table_a - пишем свои, или необходимые. nmshet - название листа. frow и lrow - диапазон столбцов для записи данных. В принципе на этом фсё, пока что ) g_5_Data.bas 2.85 kB · 15 загрузок Может кому-то (по отдельности) - конечно понадобится... НО - в Канале - недавно была таблица - которая (за секунды) парсила Линию на день и за минуту - подставляла те-же данные... правда считала - по последним шести играм... (что меня в принципе устраивает... хотя...)) Называется - Nicnaim - Stats.2...
Опубликовано 3 августа, 20242 г. IncoSJSportFormula 1,2.xlsb Добрый день. Возможно отремонтировать данную таблицу?
Опубликовано 3 августа, 20242 г. Постоянный 55 минут назад, Кирилл Клейменов сказал: Линию на день и за минуту Линия - это я понимаю просто названия лиг, команд, счет, разные ID, страна. Короче вся информация что дается по этой ссылке: Call Download_site("https://d." & sourcer & "x/feed/f_1_" & dayzone & "_" & timezone & suffix, fs_input) У меня 1500 матчей в среднем за 3 секунды прогружаются без всякого api и т.д. Около 2 сек уходит на загрузку home\away\data\odds данных для одного матча. И это на старом парсере. А это чудо "Nicnaim - Stats.2" не встречал ) Изменено 3 августа, 20242 г. пользователем Валерий Иванович
Опубликовано 3 августа, 20242 г. Постоянный 27 минут назад, Валерий Иванович сказал: Около 2 сек уходит на загрузку home\away\data\odds данных для одного матча Что бы не думали что я балабол )) Это загрузка данных: Это касательно загрузки списка игр, сегодня 1182 игры за 1.48 сек Изменено 3 августа, 20242 г. пользователем Валерий Иванович
Опубликовано 3 августа, 20242 г. Постоянный 17 часов назад, k.a.isakov сказал: А может быть такое, что ссылки с приставкой ss1 нет? такое может быть в 2-х случаях: 1-й если таблица, не использует турнирную таблицу для анализа 2-й таблица уже использует новый url для загрузки. Новые url появились не пару дней назад, они уже работают какое-то время. Просто со стороны флешскора, старые не блокировали. Работали оба. Но сейчас видимо, флешскор, решил отключить старые за ненадобностью для себя.
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.