20211008備份

SYS-UPDATE/SYS-UPDATE.vb

         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)