Merge pull request #5073 from tangge233/homepage

优化:请求头逻辑
This commit is contained in:
龙腾猫跃
2024-12-05 18:58:53 +08:00
committed by GitHub
2 changed files with 10 additions and 3 deletions
+4 -1
View File
@@ -128,7 +128,10 @@ RetryStart:
'下载 '下载
ActualSource = LoadingSource '显示加载中图片 ActualSource = LoadingSource '显示加载中图片
TempDownloadingPath = TempPath & RandomInteger(0, 10000000) TempDownloadingPath = TempPath & RandomInteger(0, 10000000)
NetDownload(Url, TempDownloadingPath, True) Directory.CreateDirectory(GetPathFromFullPath(TempPath))
Using Client As New System.Net.WebClient
Client.DownloadFile(Url, TempDownloadingPath)
End Using
If Url <> Source AndAlso Url <> FallbackSource Then If Url <> Source AndAlso Url <> FallbackSource Then
'已经更换了地址 '已经更换了地址
File.Delete(TempDownloadingPath) File.Delete(TempDownloadingPath)
@@ -109,7 +109,9 @@ Friend Module ModSecret
Client.Headers("User-Agent") = "PCL2/" & VersionStandardCode Client.Headers("User-Agent") = "PCL2/" & VersionStandardCode
End If End If
Client.Headers("Referer") = "http://" & VersionCode & ".pcl2.open.server/" Client.Headers("Referer") = "http://" & VersionCode & ".pcl2.open.server/"
If Url.Contains("api.curseforge") Then
Client.Headers("x-api-key") = CurseForgeAPIKey Client.Headers("x-api-key") = CurseForgeAPIKey
End If
End Sub End Sub
''' <summary> ''' <summary>
''' 设置 Headers 的 UA、Referer。 ''' 设置 Headers 的 UA、Referer。
@@ -123,7 +125,9 @@ Friend Module ModSecret
Request.UserAgent = "PCL2/" & VersionStandardCode Request.UserAgent = "PCL2/" & VersionStandardCode
End If End If
Request.Referer = "http://" & VersionCode & ".pcl2.open.server/" Request.Referer = "http://" & VersionCode & ".pcl2.open.server/"
If Url.Contains("api.curseforge") Then
Request.Headers("x-api-key") = CurseForgeAPIKey Request.Headers("x-api-key") = CurseForgeAPIKey
End If
End Sub End Sub
#End Region #End Region