Опубликовано 29 июня, 20242 г. Администраторы 20 минут назад, SergioJek сказал: Отсев там стоит на 10 игр. Турнирку проверяет Грузил и без от отсева то самое. Раньше грузил все подряд.
Опубликовано 29 июня, 20242 г. Администраторы 2 часа назад, The Iron Wizard сказал: Возможно стоит ограничение на количество сыгранных матчей. Если это парсер от Серджио, то на главном листе можно выставить, чтобы парсил все или чтобы отсеивал и загружал только где сыгрались по 10 матчей. Еще где-то 2 недели грузил все, возможно на флешскоре какие-то изменения.
Опубликовано 29 июня, 20242 г. 6 минут назад, Nazarnineangels сказал: Грузил и без от отсева то самое. Раньше грузил все подряд. Тогда думаю другой вариант - только что стролкнулся. В некоторых лигах ID турнира неправильно считывается. Там чуть код подправить надо. Займусь сегодня и обновленный парсер на свой ресурс выложу. Здесь не делаю чтобы не уличили в рекламе, хотя многие не понимают что деньги меня уже давно не интерисуют....Давно уже просто хобби. Надоело одно и тоже переделывать
Опубликовано 29 июня, 20242 г. Администраторы 7 минут назад, SergioJek сказал: Тогда думаю другой вариант - только что стролкнулся. В некоторых лигах ID турнира неправильно считывается. Там чуть код подправить надо. Займусь сегодня и обновленный парсер на свой ресурс выложу. Здесь не делаю чтобы не уличили в рекламе, хотя многие не понимают что деньги меня уже давно не интерисуют....Давно уже просто хобби. Надоело одно и тоже переделывать Спасибо конечно, сможете кинуть мне в телеграм @ogsns? Просто мне этот парсер, настраивали под меня.
Опубликовано 29 июня, 20242 г. 2 часа назад, Nazarnineangels сказал: Спасибо конечно, сможете кинуть мне в телеграм @ogsns? Просто мне этот парсер, настраивали под меня. А ты разве сам не занимаешься созданием/ремонтом?
Опубликовано 29 июня, 20242 г. Администраторы 37 минут назад, Cage сказал: А ты разве сам не занимаешься созданием/ремонтом? Кое-что могу, но не все.
Опубликовано 29 июня, 20242 г. В 28.06.2024 в 21:42, yelkenci 34 сказал: ht ft over tahminler çıkmıyor past games makrosu yapıştırma olmuyor hata veriyor
Опубликовано 29 июня, 20242 г. Только что, Юрий Журавлев сказал: Выбираешь по 5 игр копируешь и через правую кнопку вставляешь в красную ячейку
Опубликовано 29 июня, 20242 г. 55 минут назад, Юрий Журавлев сказал: bende çıkmıyor dosya hazırlarken bir sayfa açık kalmış sanırım atımda hata veriyor resimdeki hatalardan ola bilirmi
Опубликовано 29 июня, 20242 г. 16 минут назад, yelkenci 34 сказал: bende çıkmıyor dosya hazırlarken bir sayfa açık kalmış sanırım atımda hata veriyor resimdeki hatalardan ola bilirmi Hangi program?
Опубликовано 30 июня, 20242 г. кто сможет заставить следующий код работать для футбола? rowindx = 2 'Get H2H Sheets("ARALARI").Range("A1").Value = ActiveCell.Offset(, -6).Value Sheets("ARALARI").Range("B1").Value = ActiveCell.Offset(, -5).Value Sheets("CONF").Range("A1").Value = ActiveCell.Offset(, -6).Value Sheets("CONF").Range("B1").Value = ActiveCell.Offset(, -5).Value Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP") oXMLHTTP.Open "GET", "https://d." & Sourcer & "x/feed/d_hh_" & id & suffix, False oXMLHTTP.setRequestHeader "X-Fsign", "SW9D1eZo" oXMLHTTP.Send response = oXMLHTTP.ResponseText Set oRegExp = CreateObject("VBScript.RegExp") oRegExp.Global = True oRegExp.MultiLine = False oRegExp.Pattern = Chr(9) response = oRegExp.Replace(response, "") oRegExp.Pattern = Chr(10) response = oRegExp.Replace(response, "") oRegExp.Pattern = Chr(13) response = oRegExp.Replace(response, "") oRegExp.Pattern = "<table class=" & Chr(34) & "head_to_head h2h_mutual" & Chr(34) & ">(.*?)<\/table>" If oRegExp.test(response) = True Then Set oMatches = oRegExp.Execute(response) response = oMatches.Item(0).submatches(0) oRegExp.Pattern = "<span class=" & Chr(34) & "date" & Chr(34) & ">(.*?)<\/span>(.*?)title=" & Chr(34) & "(.*?)" & Chr(34) & "(.*?)class=" & Chr(34) & "name" & Chr(34) & "><span>(.*?)<\/span><\/td><td class=" & Chr(34) & "name" & Chr(34) & "><span>(.*?)<\/span>(.*?)<strong>(.*?) : (.*?)<\/strong>" If oRegExp.test(response) = True Then Set oMatches = oRegExp.Execute(response) cntx = oMatches.Count Call Show_PrBar_Or_No(cntx, "VERÝLER ÇEKÝLÝYOR...") For Each m In oMatches If bShowBar Then Call MyProgresBar oRegExp.Pattern = "<strong>" m_home = oRegExp.Replace(m.submatches(4), "") m_away = oRegExp.Replace(m.submatches(5), "") oRegExp.Pattern = "<\/strong>" m_home = oRegExp.Replace(m_home, "") m_away = oRegExp.Replace(m_away, "") m_date = DateAdd("s", m.submatches(0), "01/01/1970") date_match = DateAdd("h", timezone, date_match) m_date = Format(m_date, "yyyy.mm.dd") If m_date = Format(Now, "yyyy.mm.dd") Or m_date = Format(Now - 1, "yyyy.mm.dd") Then Else Set oRegExp = CreateObject("VBScript.RegExp") oRegExp.Pattern = "\s\(...\)" m_home = oRegExp.Replace(m_home, "") m_away = oRegExp.Replace(m_away, "") Sheets("ARALARI").Range("A" & rowindx).Value = m.submatches(2) Sheets("ARALARI").Range("B" & rowindx).Value = Format(m_date, "yyyy.mm.dd hh:mm") Sheets("ARALARI").Range("C" & rowindx).Value = m_home Sheets("ARALARI").Range("D" & rowindx).Value = m_away Sheets("ARALARI").Range("E" & rowindx).Value = m.submatches(7) Sheets("ARALARI").Range("F" & rowindx).Value = m.submatches(8) If m_home = Sheets("ARALARI").Range("A1").Value Then Sheets("CONF").Range("A" & rowindx).Value = m.submatches(2) m_date = DateAdd("s", m.submatches(0), "01/01/1970") Sheets("CONF").Range("B" & rowindx).Value = Format(m_date, "yyyy.mm.dd hh:mm") Sheets("CONF").Range("C" & rowindx).Value = m_home Sheets("CONF").Range("D" & rowindx).Value = m_away Sheets("CONF").Range("E" & rowindx).Value = m.submatches(7) Sheets("CONF").Range("F" & rowindx).Value = m.submatches(8) End If rowindx = rowindx + 1 End If Next If bShowBar Then Unload frmStatusBar End If End If Sheets("ARALARI").Range("A:F").Sort Key1:=Sheets("ARALARI").Columns("B"), Header:=xlYes, Order1:=xlDescending Sheets("CONF").Range("A:F").Sort Key1:=Sheets("CONF").Columns("B"), Header:=xlYes, Order1:=xlDescending
Опубликовано 30 июня, 20242 г. Администраторы В 29.06.2024 в 00:14, Nazarnineangels сказал: Кто может посмотреть к парсеру, игр 700 в день, а он грузит только 130. IncoSJSportFormula_1_2_3_1__1 (1).xlsb 7.34 MB · 30 загрузок Кто-то посмотрит? Человек который говорил, что посмотрит наверное сильно занят.
Опубликовано 1 июля, 20242 г. Постоянный 14 часов назад, Nazarnineangels сказал: Кто-то посмотрит? Человек который говорил, что посмотрит наверное сильно занят. привет😉, в файле стоит фильтр по коэф-там на ТБ 2,5, так и должно быть ? Я его откл. и загрузило 450 матчей за Сб
Опубликовано 1 июля, 20242 г. Администраторы 23 минуты назад, Shurik91 сказал: привет😉, в файле стоит фильтр по коэф-там на ТБ 2,5, так и должно быть ? Я его откл. и загрузило 450 матчей за Сб Честно не знаю, скиньте файл с отключеным фильтром посмотрю.
Опубликовано 1 июля, 20242 г. Администраторы 42 минуты назад, Shurik91 сказал: привет😉, в файле стоит фильтр по коэф-там на ТБ 2,5, так и должно быть ? Я его откл. и загрузило 450 матчей за Сб В суботу было 700 игр.
Опубликовано 1 июля, 20242 г. 21 минуту назад, Nazarnineangels сказал: В суботу было 700 игр. Часть игр же без кефов идут
Опубликовано 1 июля, 20242 г. Постоянный 43 минуты назад, Nazarnineangels сказал: Честно не знаю, скиньте файл с отключеным фильтром посмотрю. попробуй IncoSJSportFormula_1_2_3_1__1 (1).xlsb
Опубликовано 1 июля, 20242 г. Администраторы 15 минут назад, Shurik91 сказал: попробуй IncoSJSportFormula_1_2_3_1__1 (1).xlsb 7.3 MB · 0 загрузок Ок, сейчас.
Опубликовано 1 июля, 20242 г. В 29.06.2024 в 23:41, Hacker сказал: Кто может взломать пароль и логин ? FREE FORBET SOCCER ESPORT.xlsm 40.85 MB · 16 загрузок free 1020304050
Опубликовано 3 июля, 20242 г. Можно ли восстановить этот файл для тенниса? Результаты загрузки неверны. Спасибо! InfinityBook Tennis.xlsb
Опубликовано 4 июля, 20242 г. В 01.07.2024 в 17:26, Shurik91 сказал: привет😉, в файле стоит фильтр по коэф-там на ТБ 2,5, так и должно быть ? Я его откл. и загрузило 450 матчей за Сб Это я ставила. Могу снять.
Опубликовано 4 июля, 20242 г. В 01.07.2024 в 18:32, Cage сказал: Часть игр же без кефов идут В этой, конкретной табличке такие игры не загружаются.
Опубликовано 4 июля, 20242 г. В 01.07.2024 в 02:42, Nazarnineangels сказал: Кто-то посмотрит? Человек который говорил, что посмотрит наверное сильно занят. Пробуй IncoSJSportFormula_1_2_3_1__1 (1).xlsb
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.