fix command issue

fix command issue #677
This commit is contained in:
hama3254 2023-01-21 12:57:00 +01:00
parent 2ce9b488b7
commit 18e4d9a0d4
4 changed files with 13 additions and 9 deletions

Binary file not shown.

View File

@ -405,8 +405,10 @@ Public Class Anime_Add
Dim JsonUrl As String = "https://www.crunchyroll.com/content/v2/cms/seasons/" + Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).guid + "/episodes?preferred_audio_language=" + Main.DubSprache.CR_Value + "&locale=" + Main.locale
Dim Loc_CR_Cookies = " -H " + Chr(34) + Main.CR_Cookies.Replace(Chr(34), "").Replace(" -H ", "") + Chr(34)
Dim EpisodeJson As String = Main.CurlAuth(JsonUrl, Main.CR_Cookies, Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).Auth) '
Dim EpisodeJson As String = Main.CurlAuth(JsonUrl, Loc_CR_Cookies, Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).Auth) '
FillCREpisodes(EpisodeJson)

View File

@ -1084,7 +1084,9 @@ Public Class Main
CR_MassSeasons.Clear()
If BrowserData = Nothing Then
SeasonJson = CurlAuth(JsonUrl, CR_Cookies, Auth)
Dim Loc_CR_Cookies = " -H " + Chr(34) + CR_Cookies.Replace(Chr(34), "").Replace(" -H ", "") + Chr(34)
SeasonJson = CurlAuth(JsonUrl, Loc_CR_Cookies, Auth)
If CBool(InStr(SeasonJson, "curl:")) = True Then
'Browser.WebView2.CoreWebView2.Navigate(Url)
@ -4445,7 +4447,7 @@ Public Class Main
Dim SeriesUrl As String = "https://www.crunchyroll.com/content/v2/cms/series/" + SeriesUrlBuilder2(0) + "/seasons?preferred_audio_language=" + DubSprache.CR_Value + "&locale=" + locale '+ "&Signature=" + signature2(0) + "&Policy=" + policy2(0) + "&Key-Pair-Id=" + key_pair_id2(0)
Debug.WriteLine(SeriesUrl)
'MsgBox(SeriesUrl)
GetBetaSeasons(Url, SeriesUrl, Auth2)
@ -4508,7 +4510,7 @@ Public Class Main
StreamsUrl = StreamsUrlBuilder3(0) + "videos/" + StreamsUrlBuilder2(0) + "/streams?" + StreamsUrlBuilder4(1)
MsgBox(StreamsUrl)
'MsgBox(StreamsUrl)
' Debug.WriteLine(StreamsUrl)
Catch ex As Exception

View File

@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.14")>
<Assembly: AssemblyFileVersion("3.14")>
<Assembly: AssemblyVersion("3.14.0.1")>
<Assembly: AssemblyFileVersion("3.14.0.1")>
<Assembly: NeutralResourcesLanguage("en")>