20211008備份

SYS-UPDATE/SYS-UPDATE.vb

@@ -31,8 +31,8 @@ Public Class SYS_UPDATE
         MyModule1.進度條() : Dim Str As String = Application.StartupPath
         MyModule1.進度條() : If File.Exists(Str + "\GA-ERP-SYS.exe") Then : File.Delete(Str + "\GA-ERP-SYS.exe") : End If
         MyModule1.進度條() : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "GA-ERP-SYS.exe", Str + "\GA-ERP-SYS.exe")
-        MyModule1.進度條() : If File.Exists(Str + "\loginVerify.exe") Then : File.Delete(Str + "\loginVerify.exe") : End If
-        MyModule1.進度條() : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "loginVerify.exe", Str + "\loginVerify.exe")
+        'MyModule1.進度條() : If File.Exists(Str + "\loginVerify.exe") Then : File.Delete(Str + "\loginVerify.exe") : End If
+        'MyModule1.進度條() : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "loginVerify.exe", Str + "\loginVerify.exe")
         MyModule1.進度條() : If File.Exists(Str + "\Auto.exe") Then : File.Delete(Str + "\Auto.exe") : End If
         MyModule1.進度條() : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "Auto.exe", Str + "\Auto.exe")
         MyModule1.進度條() : Shell(Str + "\GA-ERP-SYS.exe", vbNormalFocus)