From d7a8c03776f933688ca4dd24e4ebe88ac542f449 Mon Sep 17 00:00:00 2001 From: zkitefly <64117916+zkitefly@users.noreply.github.com> Date: Sun, 2 Oct 2022 08:43:43 +0800 Subject: [PATCH 1/4] =?UTF-8?q?=E4=BF=AE=E6=94=B9=E9=93=BE=E6=8E=A5?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Pages/PageLaunch/PageLoginMojangSkin.xaml.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb index a811451..06e2561 100644 --- a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb @@ -88,7 +88,7 @@ MySkin.ReloadCache("http://textures.minecraft.net/texture/" & Result, False) ElseIf Result.ToLower.Contains("ip not secured") Then If MyMsgBox("首次操作需要在官网验证密保问题。" & vbCrLf & "验证完成后，你即可使用 PCL 更改皮肤，且无需再次验证。", "验证密保问题", "开始验证", "取消") = 1 Then - OpenWebsite("https://www.minecraft.net/zh-hans/profile/skin") + OpenWebsite("https://www.minecraft.net/zh-hans/msaprofile/mygames/editskin") End If ElseIf Result.Contains("request requires user authentication") Then Hint("正在重新登录，请稍后再次尝试更改皮肤！") From 07061dc4a13a0087db7c2cf11cfc5c5760c330b4 Mon Sep 17 00:00:00 2001 From: zkitefly <64117916+zkitefly@users.noreply.github.com> Date: Sun, 2 Oct 2022 08:56:23 +0800 Subject: [PATCH 2/4] add --- .../Pages/PageLaunch/PageLoginMojangSkin.xaml.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb index 06e2561..129a104 100644 --- a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojangSkin.xaml.vb @@ -47,7 +47,7 @@ Select Case MyMsgBox("你希望通过哪种途径更改密码？" & vbCrLf & "首次通过个人档案修改密码可能需要验证你的密保问题。", "更改密码", "个人档案", "密保邮箱", "取消") Case 1 '个人档案 - OpenWebsite("https://www.minecraft.net/zh-hans/profile/") + OpenWebsite("https://www.minecraft.net/zh-hans/msaprofile") Case 2 '密保邮箱 OpenWebsite("https://account.mojang.com/password") From f67189919f0f2d4a01c82b1dbf5480988d962868 Mon Sep 17 00:00:00 2001 From: zkitefly <64117916+zkitefly@users.noreply.github.com> Date: Sun, 2 Oct 2022 09:04:28 +0800 Subject: [PATCH 3/4] add --- Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb index 5b968a0..7724a95 100644 --- a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb @@ -72,7 +72,7 @@ End Sub Private Sub BtnMojang_Click(sender As Object, e As EventArgs) Handles BtnLink.Click If BtnLink.Content = "购买正版" Then - OpenWebsite("https://www.minecraft.net/store/minecraft-java-edition/buy") + OpenWebsite("https://www.minecraft.net/zh-hans/store/checkout/minecraft-java-bedrock-edition-pc") Else OpenWebsite("https://account.mojang.com/password") End If From cb3b7483676887251f11de0eb78c6c94789557ef Mon Sep 17 00:00:00 2001 From: zkitefly <64117916+zkitefly@users.noreply.github.com> Date: Sun, 2 Oct 2022 09:12:01 +0800 Subject: [PATCH 4/4] add --- Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb index 7724a95..7ee4d1f 100644 --- a/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageLaunch/PageLoginMojang.xaml.vb @@ -74,7 +74,7 @@ If BtnLink.Content = "购买正版" Then OpenWebsite("https://www.minecraft.net/zh-hans/store/checkout/minecraft-java-bedrock-edition-pc") Else - OpenWebsite("https://account.mojang.com/password") + OpenWebsite("https://www.minecraft.net/zh-hans/password/forgot") End If End Sub Private Sub HintMigration_Click() Handles HintMigration.MouseLeftButtonUp