HX-PGS-ERP-SYS
/
PC-SYS-UPDATE-LEEHSIEHJUI
关注 4
点赞 0
派生 0
代码 工单 0 合并请求 0 版本发布 0 百科 动态
浏览代码

20230624備份

B70340 2 年前
父节点
c1ae099bf0
当前提交
f28bc89bf3
共有 10 个文件被更改，包括 14 次插入 和 0 次删除
合并视图 显示文件统计
  1. 二进制
      .vs/HX-PGS-UPDATE/FileContentIndex/68013284-4aac-4b4d-a2a4-73e7b4bbddd4.vsidx
  2. 0
    0
      .vs/HX-PGS-UPDATE/FileContentIndex/c20265a6-a57f-4bc7-a02d-6e0aea3ae7ba.vsidx
  3. 0
    0
      .vs/HX-PGS-UPDATE/FileContentIndex/c2088dc1-330b-497d-b3e0-91cf4a5be277.vsidx
  4. 二进制
      .vs/HX-PGS-UPDATE/FileContentIndex/e9e7fe1d-5ce4-4234-957a-e45d7198241a.vsidx
  5. 二进制
      .vs/HX-PGS-UPDATE/v17/.suo
  6. 14
    0
      HX-PGS-UPDATE/HX-PGS-UPDATE.vb
  7. 二进制
      HX-PGS-UPDATE/bin/Debug/HX-PGS-UPDATE.exe
  8. 二进制
      HX-PGS-UPDATE/bin/Debug/HX-PGS-UPDATE.pdb
  9. 二进制
      HX-PGS-UPDATE/obj/Debug/HX-PGS-UPDATE.exe
  10. 二进制
      HX-PGS-UPDATE/obj/Debug/HX-PGS-UPDATE.pdb

二进制
.vs/HX-PGS-UPDATE/FileContentIndex/68013284-4aac-4b4d-a2a4-73e7b4bbddd4.vsidx 查看文件


.vs/HX-PGS-UPDATE/FileContentIndex/c74d1dbd-c66f-4834-a5b6-d24a84831c09.vsidx → .vs/HX-PGS-UPDATE/FileContentIndex/c20265a6-a57f-4bc7-a02d-6e0aea3ae7ba.vsidx 查看文件


.vs/HX-PGS-UPDATE/FileContentIndex/92f91bb6-f49a-415f-aa3f-3bd9b8d0c48d.vsidx → .vs/HX-PGS-UPDATE/FileContentIndex/c2088dc1-330b-497d-b3e0-91cf4a5be277.vsidx 查看文件


二进制
.vs/HX-PGS-UPDATE/FileContentIndex/e9e7fe1d-5ce4-4234-957a-e45d7198241a.vsidx 查看文件


二进制
.vs/HX-PGS-UPDATE/v17/.suo 查看文件


+ 14
- 0
HX-PGS-UPDATE/HX-PGS-UPDATE.vb 查看文件

223 
             Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
 223 
             Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
224 
         FS1 = "vulkan-1.dll" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
 224 
         FS1 = "vulkan-1.dll" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
225 
             Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
 225 
             Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
226 
+        FS1 = "PdfSharp.Charting.dll" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
227 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
228 
+        FS1 = "PdfSharp.Charting.xml" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
229 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
230 
+        FS1 = "PdfSharp.dll" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
231 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
232 
+        FS1 = "PdfSharp.xml" : MyModule1.進度條() : If File.Exists(Str & "\" & FS1) Then : Else
233 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/" & FS1, Str & "\" & FS1) : End If
234 
+
235 
+        MyModule1.進度條() : If Dir(Str + "\de", vbDirectory) <> "" Then : Else : MkDir(Str + "\de") : End If
236 
+        FS1 = "PdfSharp.Charting.resources.dll" : MyModule1.進度條() : If File.Exists(Str & "\de\" & FS1) Then : Else
237 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/de/" & FS1, Str & "\de\" & FS1) : End If
238 
+        FS1 = "PdfSharp.resources.dll" : MyModule1.進度條() : If File.Exists(Str & "\de\" & FS1) Then : Else
239 
+            Me.Text = "SYS-UPDATE........" & FS1 : My.Computer.Network.DownloadFile(Target & AA(0) & "/de/" & FS1, Str & "\de\" & FS1) : End If
226
240
227 
         MyModule1.進度條() : If Dir(Str + "\DawnCache", vbDirectory) <> "" Then : Else : MkDir(Str + "\DawnCache") : End If
 241 
         MyModule1.進度條() : If Dir(Str + "\DawnCache", vbDirectory) <> "" Then : Else : MkDir(Str + "\DawnCache") : End If
228 
         FS1 = "data_0" : MyModule1.進度條() : If File.Exists(Str & "\DawnCache\" & FS1) Then : Else
 242 
         FS1 = "data_0" : MyModule1.進度條() : If File.Exists(Str & "\DawnCache\" & FS1) Then : Else

二进制
HX-PGS-UPDATE/bin/Debug/HX-PGS-UPDATE.exe 查看文件


二进制
HX-PGS-UPDATE/bin/Debug/HX-PGS-UPDATE.pdb 查看文件


二进制
HX-PGS-UPDATE/obj/Debug/HX-PGS-UPDATE.exe 查看文件


二进制
HX-PGS-UPDATE/obj/Debug/HX-PGS-UPDATE.pdb 查看文件


撰写 预览
正在加载...
取消
保存