🐛 修复导出压缩包的问题

2024-07-10 22:14:55 +08:00
parent ad41b4e377
commit 87e1fb0b1e
3 changed files with 51 additions and 19 deletions
@@ -1,5 +1,10 @@
 Public Class PageVersionExport
    Public Sub BtnExportExport_Click() Handles BtnExportExport.Click
-        ModpackExport(New ExportOptions With {.Version = McVersionCurrent, .Type = ModpackType.Compressed, .Dest = Path & "export.zip"})
+        ModpackExport(New ExportOptions(McVersionCurrent,
+                                        Path & "export.zip",
+                                        ModpackType.Compressed,
+                                        {"新的世界", "雕塑"},
+                                        PCLSetupGlobal:=False,
+                                        PCLSetupVer:=True))
    End Sub
 End Class