LEEHSIEHJUI 1年前
父节点
当前提交
4410ee2d4a
共有 27 个文件被更改,包括 620 次插入452 次删除
  1. 二进制
      .vs/GF00-ERP-SYS/FileContentIndex/16412083-db60-45f1-a990-d939f10d0633.vsidx
  2. 二进制
      .vs/GF00-ERP-SYS/FileContentIndex/86c014f7-89ca-46bc-a945-ea4e4d07410f.vsidx
  3. 二进制
      .vs/GF00-ERP-SYS/FileContentIndex/9eb44112-50f1-4073-aead-b33744f1a41a.vsidx
  4. 二进制
      .vs/GF00-ERP-SYS/FileContentIndex/c0090bbe-87be-4315-8ea3-a3686fb77509.vsidx
  5. 二进制
      .vs/GF00-ERP-SYS/v17/.suo
  6. 203
    41
      .vs/GF00-ERP-SYS/v17/DocumentLayout.json
  7. 3
    7
      GF00-ERP-SYS/0.MyModule/主資料庫/SQL_登入與主程式.vb
  8. 8
    0
      GF00-ERP-SYS/0.MyModule/主資料庫/SQL_資料庫管理系統.vb
  9. 3
    3
      GF00-ERP-SYS/0.MyModule/模組/SQL_Module.vb
  10. 5
    8
      GF00-ERP-SYS/0.MyModule/模組/SQL_連線字串.vb
  11. 1
    1
      GF00-ERP-SYS/0.MyModule/模組/全域變數.vb
  12. 150
    50
      GF00-ERP-SYS/09.資料庫系統管理/系統執行檔版本管理.Designer.vb
  13. 29
    8
      GF00-ERP-SYS/09.資料庫系統管理/系統執行檔版本管理.vb
  14. 7
    1
      GF00-ERP-SYS/GCM-CPV-ERP-SYS.vb
  15. 二进制
      GF00-ERP-SYS/bin/Debug/GF00-ERP-SYS.exe
  16. 二进制
      GF00-ERP-SYS/bin/Debug/GF00-ERP-SYS.pdb
  17. 0
    1
      GF00-ERP-SYS/bin/Debug/GF00UPDATE.txt
  18. 1
    0
      GF00-ERP-SYS/bin/Debug/NOTAUTO.txt
  19. 二进制
      GF00-ERP-SYS/obj/Debug/DesignTimeResolveAssemblyReferences.cache
  20. 二进制
      GF00-ERP-SYS/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache
  21. 二进制
      GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.exe
  22. 二进制
      GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.pdb
  23. 163
    163
      GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.FileListAbsolute.txt
  24. 二进制
      GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.GenerateResource.cache
  25. 二进制
      GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.ResolveComReference.cache
  26. 二进制
      GF00-ERP-SYS/obj/Debug/Interop.ACTIVEXLib.dll
  27. 47
    169
      GF00-ERP-SYS/登入畫面.vb

二进制
.vs/GF00-ERP-SYS/FileContentIndex/16412083-db60-45f1-a990-d939f10d0633.vsidx 查看文件


二进制
.vs/GF00-ERP-SYS/FileContentIndex/0bc54d91-35ec-4afb-98f4-1c93a92cde84.vsidx → .vs/GF00-ERP-SYS/FileContentIndex/86c014f7-89ca-46bc-a945-ea4e4d07410f.vsidx 查看文件


二进制
.vs/GF00-ERP-SYS/FileContentIndex/abb29f78-6640-4cdb-b21f-c1590f6bb7a9.vsidx → .vs/GF00-ERP-SYS/FileContentIndex/9eb44112-50f1-4073-aead-b33744f1a41a.vsidx 查看文件


二进制
.vs/GF00-ERP-SYS/FileContentIndex/c0090bbe-87be-4315-8ea3-a3686fb77509.vsidx 查看文件


二进制
.vs/GF00-ERP-SYS/v17/.suo 查看文件


+ 203
- 41
.vs/GF00-ERP-SYS/v17/DocumentLayout.json 查看文件

@@ -3,36 +3,56 @@
3 3
   "WorkspaceRootPath": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\",
4 4
   "Documents": [
5 5
     {
6
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\gf\u901A\u7528\u7CFB\u7D71\\gf00-erp-sys\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
7
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
6
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\gf\u901A\u7528\u7CFB\u7D71\\gf00-erp-sys\\gf00-erp-sys\\\u767B\u5165\u756B\u9762.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
7
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\\u767B\u5165\u756B\u9762.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
8 8
     },
9 9
     {
10
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
11
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
10
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
11
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
12 12
     },
13 13
     {
14
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
15
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
14
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
15
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
16 16
     },
17 17
     {
18
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
19
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
18
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\sql_module.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
19
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\sql_module.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
20 20
     },
21 21
     {
22
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
23
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
22
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
23
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
24 24
     },
25 25
     {
26
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
27
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
26
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
27
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
28 28
     },
29 29
     {
30
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
31
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
30
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\\u767B\u5165\u756B\u9762.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
31
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\\u767B\u5165\u756B\u9762.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
32 32
     },
33 33
     {
34
-      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
35
-      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\gcm-cpv-erp-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
34
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
35
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
36
+    },
37
+    {
38
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\sql_\u9023\u7DDA\u5B57\u4E32.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
39
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u6A21\u7D44\\sql_\u9023\u7DDA\u5B57\u4E32.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
40
+    },
41
+    {
42
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
43
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
44
+    },
45
+    {
46
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
47
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
48
+    },
49
+    {
50
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
51
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
52
+    },
53
+    {
54
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
55
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
36 56
     },
37 57
     {
38 58
       "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
@@ -41,6 +61,26 @@
41 61
     {
42 62
       "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
43 63
       "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
64
+    },
65
+    {
66
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
67
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
68
+    },
69
+    {
70
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
71
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
72
+    },
73
+    {
74
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
75
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\0.mymodule\\\u4E3B\u8CC7\u6599\u5EAB\\sql_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
76
+    },
77
+    {
78
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
79
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
80
+    },
81
+    {
82
+      "AbsoluteMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
83
+      "RelativeMoniker": "D:0:0:{FE513A1E-39BC-4D77-9C8F-00C243513418}|GF00-ERP-SYS\\GF00-ERP-SYS.vbproj|solutionrelative:gf00-erp-sys\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
44 84
     }
45 85
   ],
46 86
   "DocumentGroupContainers": [
@@ -52,9 +92,133 @@
52 92
           "DockedHeight": 200,
53 93
           "SelectedChildIndex": 1,
54 94
           "Children": [
95
+            {
96
+              "$type": "Bookmark",
97
+              "Name": "ST:0:0:{004be353-6879-467c-9d1e-9ac23cdf6d49}"
98
+            },
55 99
             {
56 100
               "$type": "Document",
57
-              "DocumentIndex": 2,
101
+              "DocumentIndex": 0,
102
+              "Title": "\u767B\u5165\u756B\u9762.vb",
103
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
104
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
105
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
106
+              "RelativeToolTip": "GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
107
+              "ViewState": "AQIAAAAAAAAAAAAAAAAAABgAAABZAAAA",
108
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
109
+              "WhenOpened": "2024-05-31T11:51:56.869Z",
110
+              "EditorCaption": ""
111
+            },
112
+            {
113
+              "$type": "Document",
114
+              "DocumentIndex": 6,
115
+              "Title": "\u767B\u5165\u756B\u9762.vb [\u8A2D\u8A08]",
116
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
117
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb",
118
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb [\u8A2D\u8A08]",
119
+              "RelativeToolTip": "GF00-ERP-SYS\\\u767B\u5165\u756B\u9762.vb [\u8A2D\u8A08]",
120
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
121
+              "WhenOpened": "2024-05-31T11:51:55.174Z"
122
+            },
123
+            {
124
+              "$type": "Document",
125
+              "DocumentIndex": 11,
126
+              "Title": "\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb",
127
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb",
128
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb",
129
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb",
130
+              "RelativeToolTip": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D44\u7E54\u67B6\u69CB\u8A2D\u5B9A.vb",
131
+              "ViewState": "AQIAAFUAAAAAAAAAAAAIwGgAAAA8AAAA",
132
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
133
+              "WhenOpened": "2024-05-31T11:29:17.801Z"
134
+            },
135
+            {
136
+              "$type": "Document",
137
+              "DocumentIndex": 8,
138
+              "Title": "SQL_\u9023\u7DDA\u5B57\u4E32.vb",
139
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_\u9023\u7DDA\u5B57\u4E32.vb",
140
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_\u9023\u7DDA\u5B57\u4E32.vb",
141
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_\u9023\u7DDA\u5B57\u4E32.vb",
142
+              "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_\u9023\u7DDA\u5B57\u4E32.vb",
143
+              "ViewState": "AQIAAAAAAAAAAAAAAAAwwA4AAAASAAAA",
144
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
145
+              "WhenOpened": "2024-05-31T11:18:13.419Z"
146
+            },
147
+            {
148
+              "$type": "Document",
149
+              "DocumentIndex": 3,
150
+              "Title": "SQL_Module.vb",
151
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_Module.vb",
152
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_Module.vb",
153
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_Module.vb",
154
+              "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\SQL_Module.vb",
155
+              "ViewState": "AQIAAAAAAAAAAAAAAAAAAC8AAAAEAAAA",
156
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
157
+              "WhenOpened": "2024-05-31T11:12:23.117Z",
158
+              "EditorCaption": ""
159
+            },
160
+            {
161
+              "$type": "Document",
162
+              "DocumentIndex": 12,
163
+              "Title": "SQL_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb",
164
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb",
165
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb",
166
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb",
167
+              "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u8CC7\u6599\u5EAB\u7BA1\u7406\u7CFB\u7D71.vb",
168
+              "ViewState": "AQIAALQBAAAAAAAAAAAuwMUBAAALAAAA",
169
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
170
+              "WhenOpened": "2024-05-31T10:57:14.4Z"
171
+            },
172
+            {
173
+              "$type": "Document",
174
+              "DocumentIndex": 5,
175
+              "Title": "SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
176
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
177
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
178
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
179
+              "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
180
+              "ViewState": "AQIAAAAAAAAAAAAAAAAwwAYAAAAEAAAA",
181
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
182
+              "WhenOpened": "2024-05-31T10:55:02.612Z"
183
+            },
184
+            {
185
+              "$type": "Document",
186
+              "DocumentIndex": 7,
187
+              "Title": "\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
188
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
189
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
190
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
191
+              "RelativeToolTip": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
192
+              "ViewState": "AQIAACEAAAAAAAAAAAAIwDEAAAAAAAAA",
193
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
194
+              "WhenOpened": "2024-05-31T10:54:57.81Z"
195
+            },
196
+            {
197
+              "$type": "Document",
198
+              "DocumentIndex": 10,
199
+              "Title": "\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb",
200
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb",
201
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb",
202
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb",
203
+              "RelativeToolTip": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u901A\u7528\u8B8A\u6578\u7BA1\u7406.vb",
204
+              "ViewState": "AQIAAAAAAAAAAAAAAAAAAAQAAAAIAAAA",
205
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
206
+              "WhenOpened": "2024-05-31T08:07:49.162Z"
207
+            },
208
+            {
209
+              "$type": "Document",
210
+              "DocumentIndex": 9,
211
+              "Title": "\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb [\u8A2D\u8A08]",
212
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
213
+              "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb",
214
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb [\u8A2D\u8A08]",
215
+              "RelativeToolTip": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u57F7\u884C\u6A94\u7248\u672C\u7BA1\u7406.vb [\u8A2D\u8A08]",
216
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
217
+              "WhenOpened": "2024-05-31T08:06:18.727Z"
218
+            },
219
+            {
220
+              "$type": "Document",
221
+              "DocumentIndex": 17,
58 222
               "Title": "SQL_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb",
59 223
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb",
60 224
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb",
@@ -62,12 +226,11 @@
62 226
               "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u4E3B\u8CC7\u6599\u5EAB\\SQL_\u9577\u7167\u62C6\u5E33\u5236\u8A08\u7B97.vb",
63 227
               "ViewState": "AQIAAG4AAAAAAAAAAADwv38AAAAuAAAA",
64 228
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
65
-              "WhenOpened": "2024-05-08T02:50:10.166Z",
66
-              "EditorCaption": ""
229
+              "WhenOpened": "2024-05-08T02:50:10.166Z"
67 230
             },
68 231
             {
69 232
               "$type": "Document",
70
-              "DocumentIndex": 0,
233
+              "DocumentIndex": 15,
71 234
               "Title": "\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
72 235
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
73 236
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
@@ -75,47 +238,45 @@
75 238
               "RelativeToolTip": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
76 239
               "ViewState": "AQIAAH4FAAAAAAAAAAAcwI4FAAALAAAA",
77 240
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
78
-              "WhenOpened": "2024-05-06T09:59:46.656Z",
79
-              "EditorCaption": ""
241
+              "WhenOpened": "2024-05-06T09:59:46.656Z"
80 242
             },
81 243
             {
82 244
               "$type": "Document",
83
-              "DocumentIndex": 1,
245
+              "DocumentIndex": 16,
84 246
               "Title": "\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb [\u8A2D\u8A08]",
85 247
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
86 248
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb",
87 249
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb [\u8A2D\u8A08]",
88 250
               "RelativeToolTip": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u85AA\u8CC7\u8A66\u7B97\u8868.vb [\u8A2D\u8A08]",
89 251
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
90
-              "WhenOpened": "2024-05-06T09:52:33.308Z",
91
-              "EditorCaption": " [\u8A2D\u8A08]"
252
+              "WhenOpened": "2024-05-06T09:52:33.308Z"
92 253
             },
93 254
             {
94 255
               "$type": "Document",
95
-              "DocumentIndex": 4,
256
+              "DocumentIndex": 19,
96 257
               "Title": "\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb [\u8A2D\u8A08]",
97 258
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
98 259
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
99 260
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb [\u8A2D\u8A08]",
100 261
               "RelativeToolTip": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb [\u8A2D\u8A08]",
101 262
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
102
-              "WhenOpened": "2024-05-06T09:52:12.906Z",
103
-              "EditorCaption": " [\u8A2D\u8A08]"
263
+              "WhenOpened": "2024-05-06T09:52:12.906Z"
104 264
             },
105 265
             {
106 266
               "$type": "Document",
107
-              "DocumentIndex": 7,
267
+              "DocumentIndex": 4,
108 268
               "Title": "GCM-CPV-ERP-SYS.vb [\u8A2D\u8A08]",
109 269
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
110 270
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
111 271
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb [\u8A2D\u8A08]",
112 272
               "RelativeToolTip": "GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb [\u8A2D\u8A08]",
113 273
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
114
-              "WhenOpened": "2024-05-06T10:17:41.747Z"
274
+              "WhenOpened": "2024-05-06T10:17:41.747Z",
275
+              "EditorCaption": " [\u8A2D\u8A08]"
115 276
             },
116 277
             {
117 278
               "$type": "Document",
118
-              "DocumentIndex": 3,
279
+              "DocumentIndex": 18,
119 280
               "Title": "\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
120 281
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
121 282
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
@@ -123,36 +284,37 @@
123 284
               "RelativeToolTip": "GF00-ERP-SYS\\01.\u4EBA\u4E8B\u7CFB\u7D71\u7BA1\u7406\\\u62C6\u5E33\u5236\u8003\u52E4\u6587\u4EF6\u5C0E\u5165.vb",
124 285
               "ViewState": "AQIAAFQAAAAAAAAAAAAiwHIAAACLAAAA",
125 286
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
126
-              "WhenOpened": "2024-05-06T09:59:40.817Z",
127
-              "EditorCaption": ""
287
+              "WhenOpened": "2024-05-06T09:59:40.817Z"
128 288
             },
129 289
             {
130 290
               "$type": "Document",
131
-              "DocumentIndex": 5,
291
+              "DocumentIndex": 1,
132 292
               "Title": "GCM-CPV-ERP-SYS.vb",
133 293
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
134 294
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
135 295
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
136 296
               "RelativeToolTip": "GF00-ERP-SYS\\GCM-CPV-ERP-SYS.vb",
137
-              "ViewState": "AQIAABsAAAAAAAAAAAAIwDMAAAAVAAAA",
297
+              "ViewState": "AQIAAB4AAAAAAAAAAAAIwDcAAABKAAAA",
138 298
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
139
-              "WhenOpened": "2024-03-09T14:25:37.609Z"
299
+              "WhenOpened": "2024-03-09T14:25:37.609Z",
300
+              "EditorCaption": ""
140 301
             },
141 302
             {
142 303
               "$type": "Document",
143
-              "DocumentIndex": 6,
304
+              "DocumentIndex": 2,
144 305
               "Title": "\u5168\u57DF\u8B8A\u6578.vb",
145 306
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb",
146 307
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb",
147 308
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb",
148 309
               "RelativeToolTip": "GF00-ERP-SYS\\0.MyModule\\\u6A21\u7D44\\\u5168\u57DF\u8B8A\u6578.vb",
149
-              "ViewState": "AQIAAAAAAAAAAAAAAABAwBEAAAAzAAAA",
310
+              "ViewState": "AQIAAAEAAAAAAAAAAAAuwAYAAAAlAAAA",
150 311
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
151
-              "WhenOpened": "2024-05-10T11:37:36.845Z"
312
+              "WhenOpened": "2024-05-10T11:37:36.845Z",
313
+              "EditorCaption": ""
152 314
             },
153 315
             {
154 316
               "$type": "Document",
155
-              "DocumentIndex": 8,
317
+              "DocumentIndex": 13,
156 318
               "Title": "\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb",
157 319
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb",
158 320
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb",
@@ -164,7 +326,7 @@
164 326
             },
165 327
             {
166 328
               "$type": "Document",
167
-              "DocumentIndex": 9,
329
+              "DocumentIndex": 14,
168 330
               "Title": "\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb [\u8A2D\u8A08]",
169 331
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\GF\u901A\u7528\u7CFB\u7D71\\GF00-ERP-SYS\\GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb",
170 332
               "RelativeDocumentMoniker": "GF00-ERP-SYS\\09.\u8CC7\u6599\u5EAB\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u4F7F\u7528\u8005\u7BA1\u7406.vb",

+ 3
- 7
GF00-ERP-SYS/0.MyModule/主資料庫/SQL_登入與主程式.vb 查看文件

@@ -1,7 +1,9 @@
1 1
 Module SQL_登入與主程式
2 2
     '---------------------LoginForm1-----------------------------------------------------------------------------------------------------------------
3 3
     Friend Sub SQL_系統認證版本號查詢()
4
-        ConnOpen() : SQL1 = "SELECT 系統認證版本號, 小更新1, 小更新2, 小更新3, 小更新4, 小更新5, 中更新1, 中更新2, 中更新3, 中更新4, 中更新5 FROM 版本號管理 " : CmdSet_For_dr()
4
+        ConnOpen()
5
+        SQL1 = "SELECT 系統認證版本號, 小更新1, 小更新2, 小更新3, 小更新4, 小更新5, 中更新1, 中更新2, 中更新3, 中更新4, 中更新5, 手機認證版本號, IOS認證版本號, IOS送審版本號 FROM 版本號管理 "
6
+        CmdSet_For_dr()
5 7
     End Sub
6 8
     Friend Sub SQL_FTP伺服器登入位置()
7 9
         ConnOpen() : SQL1 = "SELECT  FTP地址, FTP帳號, FTP密碼, FTP物理位置 FROM FTP資料庫管理 WHERE 地區 LIKE N'" & 登入畫面.伺服器區域_cb.Text & "'" : CmdSet_For_dr()
@@ -185,10 +187,4 @@
185 187
     Friend Sub SQL_使用者資料()
186 188
         ConnOpen() : SQL1 = "SELECT 姓名, 帳號, 密碼, 密碼日期 FROM 使用者權限管理表 WHERE (姓名 = N'" & gUserName & "')" : CmdSet_For_dr()
187 189
     End Sub
188
-    'Friend Sub SQL_使用者資料修改()
189
-    '    ConnOpen()
190
-    '    SQL1 = "UPDATE 使用者權限管理表 SET 帳號 = N'" & 個人帳號管理.帳號_rtb.Text & "', 密碼 = N'" & 個人帳號管理.密碼_rtb.Text & "', 密碼日期 = N'" & DTP & "' 
191
-    '            WHERE (姓名 = N'" & 個人帳號管理.姓名_rtb.Text & "')"
192
-    '    CmdSet_For_dr()
193
-    'End Sub
194 190
 End Module

+ 8
- 0
GF00-ERP-SYS/0.MyModule/主資料庫/SQL_資料庫管理系統.vb 查看文件

@@ -447,6 +447,14 @@
447 447
                 GROUP BY DB_NAME(database_id) ORDER BY DB_NAME(database_id)"
448 448
         CmdSet_For_DGV()
449 449
     End Sub
450
+    Friend Sub SQL_伺服器2清單()
451
+        SQL_連線字串_管理SQL() : ConnOpen_資料庫SQL()
452
+        SQL1 = "SELECT  資料庫, 資料庫 AS 系統認證版本號, 資料庫 AS 手機認證版本號, 資料庫 AS IOS認證版本號, 資料庫 AS IOS送審版本號  FROM  GF資料庫清單 ORDER BY 資料庫"
453
+        CmdSet_For_DGV()
454
+    End Sub
455
+    Friend Sub SQL_系統認證版本號查詢1()
456
+        ConnOpen_更新SQL() : SQL1 = "SELECT 系統認證版本號, 手機認證版本號, IOS認證版本號, IOS送審版本號 FROM 版本號管理 " : CmdSet_For_dr()
457
+    End Sub
450 458
     Friend Sub SQL_主資料庫LOG檔案截斷()
451 459
         ConnOpen() : SQL1 = "USE [" & PA & "] ALTER DATABASE [" & PA & "]
452 460
                              SET RECOVERY SIMPLE; DBCC SHRINKFILE([" & PA & "_Log], 1); 

+ 3
- 3
GF00-ERP-SYS/0.MyModule/模組/SQL_Module.vb 查看文件

@@ -31,11 +31,11 @@ Module SQL_Module
31 31
     Friend Sub ConnOpen_管理SQL()
32 32
         conn.Close() : If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString3 : conn.Open() : End If
33 33
     End Sub
34
-    Friend Sub ConnOpen_工程SQL()
34
+    Friend Sub ConnOpen_資料庫SQL()
35 35
         conn.Close() : If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString1 : conn.Open() : End If
36 36
     End Sub
37
-    Friend Sub ConnOpen_物料資料庫SQL()
38
-        conn.Close() : If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString2 : conn.Open() : End If
37
+    Friend Sub ConnOpen_更新SQL()
38
+        conn.Close() : If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString4 : conn.Open() : End If
39 39
     End Sub
40 40
     Friend Sub ConnOpen_倉儲資料庫SQL()
41 41
         conn.Close() : If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString3 : conn.Open() : End If

+ 5
- 8
GF00-ERP-SYS/0.MyModule/模組/SQL_連線字串.vb 查看文件

@@ -1,20 +1,18 @@
1 1
 Module SQL_連線字串
2 2
     Friend Sub SQL_連線字串_正式()
3
-
4 3
         Dim catalogName As String = "GF" & 資料庫編號 & "-ERP-SYS"
5 4
         If Strings.Left(登入人IP, 3) = "106" Then
6 5
             ConString = "Data Source=" & 登入人IP & ";Initial Catalog=GF00-ERP-SYS;Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200;Connection Timeout=0"
7 6
         Else
8 7
             ConString = "Data Source=" & 登入人IP & ";Initial Catalog=" & catalogName & ";Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200;Connection Timeout=0"
9 8
         End If
10
-
11
-
12 9
     End Sub
13
-    Friend Sub SQL_連線字串_正式_管理SQL()
14
-        ConString3 = "Data Source=" & 登入人IP & ";Initial Catalog=GCM-CPV-MSN;Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200; Connection Timeout=0"
10
+    Friend Sub SQL_連線字串_管理SQL()
11
+        ConString1 = "Data Source=" & 登入人IP & ";Initial Catalog=GCM-IP-DATE02;Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200; Connection Timeout=0"
15 12
     End Sub
16
-    Friend Sub SQL_連線字串_正式_工程SQL()
17
-        ConString1 = "Data Source=" & 登入人IP & ";Initial Catalog=GCM-CPV-PROJECT-SYS;Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200; Connection Timeout=0"
13
+    Friend Sub SQL_連線字串_版本SQL()
14
+        Dim catalogName As String = PA50
15
+        ConString4 = "Data Source=" & 登入人IP & ";Initial Catalog=" & catalogName & ";Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200;Connection Timeout=0"
18 16
     End Sub
19 17
     Friend Sub SQL_連線字串_圖片資料庫()
20 18
         ConString2 = "Data Source=" & 登入人IP & ";Initial Catalog=" & 圖片庫 & ";Persist Security Info=True;User ID=b70340;Password=Lee0911274990;Max pool size = 200;Connection Timeout=0"
@@ -23,5 +21,4 @@
23 21
         Dim Str As String = Application.StartupPath
24 22
         AccessConString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Str & "/HabitData.mdb;Jet OLEDB:Database Password=Qaz!@#123;Persist Security Info=False;User ID=Admin"
25 23
     End Sub
26
-
27 24
 End Module

+ 1
- 1
GF00-ERP-SYS/0.MyModule/模組/全域變數.vb 查看文件

@@ -4,7 +4,7 @@
4 4
     '-----系統通用變數------
5 5
     Public 系統語言, 進度條後墜, 登入人IP, 登入人級別, 介面, 行政採購簽核級別基數, 建築採購簽核級別基數, Target, Target1, Target2, AA(99), FTP帳號, FTP密碼, gUserName,
6 6
                  電腦識別碼, 版本號, 資料庫版本, g_conn_type, FTP物理位置, 圖片庫 As String
7
-    Public 版本 As String = "2024042301"
7
+    Public 版本 As String = "2024053101"
8 8
     Public 比例1, 比例2, 比例3, 分母, 密碼時限, 工程圖庫限制, NN1, 帳本數量, 行, 列 As Integer
9 9
     Public 分段1, 分段2, 分段3, 分段4 As Double
10 10
     Public BBL1, BBL2, BBL3, BBL4, BBL5, BBL6 As String

+ 150
- 50
GF00-ERP-SYS/09.資料庫系統管理/系統執行檔版本管理.Designer.vb 查看文件

@@ -22,6 +22,8 @@ Partial Class 系統執行檔版本管理
22 22
     '請勿使用程式碼編輯器進行修改。
23 23
     <System.Diagnostics.DebuggerStepThrough()>
24 24
     Private Sub InitializeComponent()
25
+        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
26
+        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
25 27
         Me.中更5 = New System.Windows.Forms.TextBox()
26 28
         Me.中更4 = New System.Windows.Forms.TextBox()
27 29
         Me.中更3 = New System.Windows.Forms.TextBox()
@@ -51,13 +53,21 @@ Partial Class 系統執行檔版本管理
51 53
         Me.Button1 = New System.Windows.Forms.Button()
52 54
         Me.Label3 = New System.Windows.Forms.Label()
53 55
         Me.版本號_tb = New System.Windows.Forms.TextBox()
56
+        Me.資料庫清單1_dgv = New System.Windows.Forms.DataGridView()
57
+        Me.Label2 = New System.Windows.Forms.Label()
58
+        Me.版本號1_tb = New System.Windows.Forms.TextBox()
59
+        Me.Label5 = New System.Windows.Forms.Label()
60
+        Me.版本號2_tb = New System.Windows.Forms.TextBox()
61
+        Me.Label6 = New System.Windows.Forms.Label()
62
+        Me.版本號3_tb = New System.Windows.Forms.TextBox()
54 63
         Me.Panel1.SuspendLayout()
64
+        CType(Me.資料庫清單1_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
55 65
         Me.SuspendLayout()
56 66
         '
57 67
         '中更5
58 68
         '
59 69
         Me.中更5.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
60
-        Me.中更5.Location = New System.Drawing.Point(598, 27)
70
+        Me.中更5.Location = New System.Drawing.Point(512, 28)
61 71
         Me.中更5.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
62 72
         Me.中更5.Name = "中更5"
63 73
         Me.中更5.Size = New System.Drawing.Size(80, 23)
@@ -66,7 +76,7 @@ Partial Class 系統執行檔版本管理
66 76
         '中更4
67 77
         '
68 78
         Me.中更4.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
69
-        Me.中更4.Location = New System.Drawing.Point(514, 27)
79
+        Me.中更4.Location = New System.Drawing.Point(428, 28)
70 80
         Me.中更4.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
71 81
         Me.中更4.Name = "中更4"
72 82
         Me.中更4.Size = New System.Drawing.Size(80, 23)
@@ -75,7 +85,7 @@ Partial Class 系統執行檔版本管理
75 85
         '中更3
76 86
         '
77 87
         Me.中更3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
78
-        Me.中更3.Location = New System.Drawing.Point(430, 27)
88
+        Me.中更3.Location = New System.Drawing.Point(344, 28)
79 89
         Me.中更3.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
80 90
         Me.中更3.Name = "中更3"
81 91
         Me.中更3.Size = New System.Drawing.Size(80, 23)
@@ -84,7 +94,7 @@ Partial Class 系統執行檔版本管理
84 94
         '中更2
85 95
         '
86 96
         Me.中更2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
87
-        Me.中更2.Location = New System.Drawing.Point(346, 27)
97
+        Me.中更2.Location = New System.Drawing.Point(260, 28)
88 98
         Me.中更2.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
89 99
         Me.中更2.Name = "中更2"
90 100
         Me.中更2.Size = New System.Drawing.Size(80, 23)
@@ -93,7 +103,7 @@ Partial Class 系統執行檔版本管理
93 103
         '中更1
94 104
         '
95 105
         Me.中更1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
96
-        Me.中更1.Location = New System.Drawing.Point(262, 27)
106
+        Me.中更1.Location = New System.Drawing.Point(176, 28)
97 107
         Me.中更1.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
98 108
         Me.中更1.Name = "中更1"
99 109
         Me.中更1.Size = New System.Drawing.Size(80, 23)
@@ -102,7 +112,7 @@ Partial Class 系統執行檔版本管理
102 112
         '小更5
103 113
         '
104 114
         Me.小更5.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
105
-        Me.小更5.Location = New System.Drawing.Point(598, 3)
115
+        Me.小更5.Location = New System.Drawing.Point(512, 4)
106 116
         Me.小更5.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
107 117
         Me.小更5.Name = "小更5"
108 118
         Me.小更5.Size = New System.Drawing.Size(80, 23)
@@ -111,7 +121,7 @@ Partial Class 系統執行檔版本管理
111 121
         '小更4
112 122
         '
113 123
         Me.小更4.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
114
-        Me.小更4.Location = New System.Drawing.Point(514, 3)
124
+        Me.小更4.Location = New System.Drawing.Point(428, 4)
115 125
         Me.小更4.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
116 126
         Me.小更4.Name = "小更4"
117 127
         Me.小更4.Size = New System.Drawing.Size(80, 23)
@@ -120,7 +130,7 @@ Partial Class 系統執行檔版本管理
120 130
         '小更3
121 131
         '
122 132
         Me.小更3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
123
-        Me.小更3.Location = New System.Drawing.Point(430, 3)
133
+        Me.小更3.Location = New System.Drawing.Point(344, 4)
124 134
         Me.小更3.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
125 135
         Me.小更3.Name = "小更3"
126 136
         Me.小更3.Size = New System.Drawing.Size(80, 23)
@@ -129,7 +139,7 @@ Partial Class 系統執行檔版本管理
129 139
         '小更2
130 140
         '
131 141
         Me.小更2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
132
-        Me.小更2.Location = New System.Drawing.Point(346, 3)
142
+        Me.小更2.Location = New System.Drawing.Point(260, 4)
133 143
         Me.小更2.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
134 144
         Me.小更2.Name = "小更2"
135 145
         Me.小更2.Size = New System.Drawing.Size(80, 23)
@@ -139,16 +149,16 @@ Partial Class 系統執行檔版本管理
139 149
         '
140 150
         Me.Label1.AutoSize = True
141 151
         Me.Label1.BackColor = System.Drawing.SystemColors.Control
142
-        Me.Label1.Location = New System.Drawing.Point(218, 6)
152
+        Me.Label1.Location = New System.Drawing.Point(132, 7)
143 153
         Me.Label1.Name = "Label1"
144
-        Me.Label1.Size = New System.Drawing.Size(44, 16)
154
+        Me.Label1.Size = New System.Drawing.Size(43, 16)
145 155
         Me.Label1.TabIndex = 695
146 156
         Me.Label1.Text = "小更新"
147 157
         '
148 158
         '小更1
149 159
         '
150 160
         Me.小更1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
151
-        Me.小更1.Location = New System.Drawing.Point(262, 3)
161
+        Me.小更1.Location = New System.Drawing.Point(176, 4)
152 162
         Me.小更1.Margin = New System.Windows.Forms.Padding(6, 7, 6, 7)
153 163
         Me.小更1.Name = "小更1"
154 164
         Me.小更1.Size = New System.Drawing.Size(80, 23)
@@ -158,7 +168,7 @@ Partial Class 系統執行檔版本管理
158 168
         '
159 169
         Me.TextBox3.AllowDrop = True
160 170
         Me.TextBox3.ForeColor = System.Drawing.Color.Black
161
-        Me.TextBox3.Location = New System.Drawing.Point(2, 3)
171
+        Me.TextBox3.Location = New System.Drawing.Point(6, 5)
162 172
         Me.TextBox3.Multiline = True
163 173
         Me.TextBox3.Name = "TextBox3"
164 174
         Me.TextBox3.Size = New System.Drawing.Size(25, 23)
@@ -167,7 +177,7 @@ Partial Class 系統執行檔版本管理
167 177
         'TextBox1
168 178
         '
169 179
         Me.TextBox1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
170
-        Me.TextBox1.Location = New System.Drawing.Point(35, 3)
180
+        Me.TextBox1.Location = New System.Drawing.Point(35, 5)
171 181
         Me.TextBox1.Margin = New System.Windows.Forms.Padding(5)
172 182
         Me.TextBox1.Name = "TextBox1"
173 183
         Me.TextBox1.Size = New System.Drawing.Size(89, 23)
@@ -176,44 +186,53 @@ Partial Class 系統執行檔版本管理
176 186
         'Label9
177 187
         '
178 188
         Me.Label9.AutoSize = True
179
-        Me.Label9.Location = New System.Drawing.Point(3, 38)
189
+        Me.Label9.Location = New System.Drawing.Point(3, 35)
180 190
         Me.Label9.Name = "Label9"
181
-        Me.Label9.Size = New System.Drawing.Size(56, 16)
191
+        Me.Label9.Size = New System.Drawing.Size(55, 16)
182 192
         Me.Label9.TabIndex = 624
183 193
         Me.Label9.Text = "檔案名稱"
184 194
         '
185 195
         'Panel1
186 196
         '
187 197
         Me.Panel1.Controls.Add(Me.TextBox3)
198
+        Me.Panel1.Controls.Add(Me.中更5)
188 199
         Me.Panel1.Controls.Add(Me.Button3)
200
+        Me.Panel1.Controls.Add(Me.中更4)
189 201
         Me.Panel1.Controls.Add(Me.TextBox1)
202
+        Me.Panel1.Controls.Add(Me.中更3)
190 203
         Me.Panel1.Controls.Add(Me.Label9)
204
+        Me.Panel1.Controls.Add(Me.中更2)
191 205
         Me.Panel1.Controls.Add(Me.TextBox4)
192
-        Me.Panel1.Location = New System.Drawing.Point(457, 195)
206
+        Me.Panel1.Controls.Add(Me.中更1)
207
+        Me.Panel1.Controls.Add(Me.小更1)
208
+        Me.Panel1.Controls.Add(Me.小更5)
209
+        Me.Panel1.Controls.Add(Me.Label4)
210
+        Me.Panel1.Controls.Add(Me.小更4)
211
+        Me.Panel1.Controls.Add(Me.Label1)
212
+        Me.Panel1.Controls.Add(Me.小更3)
213
+        Me.Panel1.Controls.Add(Me.小更2)
214
+        Me.Panel1.Location = New System.Drawing.Point(113, 195)
193 215
         Me.Panel1.Name = "Panel1"
194
-        Me.Panel1.Size = New System.Drawing.Size(200, 100)
216
+        Me.Panel1.Size = New System.Drawing.Size(609, 100)
195 217
         Me.Panel1.TabIndex = 693
196 218
         '
197 219
         'Button3
198 220
         '
199
-        Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
200
-        Me.Button3.Location = New System.Drawing.Point(81, 64)
221
+        Me.Button3.Location = New System.Drawing.Point(6, 55)
201 222
         Me.Button3.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
202 223
         Me.Button3.Name = "Button3"
203
-        Me.Button3.Size = New System.Drawing.Size(105, 24)
224
+        Me.Button3.Size = New System.Drawing.Size(118, 24)
204 225
         Me.Button3.TabIndex = 626
205 226
         Me.Button3.Text = "上傳"
206 227
         '
207 228
         'TextBox4
208 229
         '
209 230
         Me.TextBox4.AllowDrop = True
210
-        Me.TextBox4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
211
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
212 231
         Me.TextBox4.ForeColor = System.Drawing.Color.Black
213
-        Me.TextBox4.Location = New System.Drawing.Point(60, 34)
232
+        Me.TextBox4.Location = New System.Drawing.Point(60, 31)
214 233
         Me.TextBox4.Multiline = True
215 234
         Me.TextBox4.Name = "TextBox4"
216
-        Me.TextBox4.Size = New System.Drawing.Size(126, 23)
235
+        Me.TextBox4.Size = New System.Drawing.Size(64, 23)
217 236
         Me.TextBox4.TabIndex = 623
218 237
         '
219 238
         'SaveFileDialog1
@@ -231,22 +250,19 @@ Partial Class 系統執行檔版本管理
231 250
         '
232 251
         Me.Label4.AutoSize = True
233 252
         Me.Label4.BackColor = System.Drawing.SystemColors.Control
234
-        Me.Label4.Location = New System.Drawing.Point(218, 30)
253
+        Me.Label4.Location = New System.Drawing.Point(132, 31)
235 254
         Me.Label4.Name = "Label4"
236
-        Me.Label4.Size = New System.Drawing.Size(44, 16)
255
+        Me.Label4.Size = New System.Drawing.Size(43, 16)
237 256
         Me.Label4.TabIndex = 701
238 257
         Me.Label4.Text = "中更新"
239 258
         '
240 259
         'Label12
241 260
         '
242
-        Me.Label12.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
243
-            Or System.Windows.Forms.AnchorStyles.Left) _
244
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
245 261
         Me.Label12.AutoSize = True
246 262
         Me.Label12.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
247 263
         Me.Label12.Location = New System.Drawing.Point(13, 358)
248 264
         Me.Label12.Name = "Label12"
249
-        Me.Label12.Size = New System.Drawing.Size(80, 16)
265
+        Me.Label12.Size = New System.Drawing.Size(79, 16)
250 266
         Me.Label12.TabIndex = 692
251 267
         Me.Label12.Text = "執行檔放置區"
252 268
         '
@@ -257,7 +273,7 @@ Partial Class 系統執行檔版本管理
257 273
         Me.WebBrowser2.Location = New System.Drawing.Point(4, 53)
258 274
         Me.WebBrowser2.MinimumSize = New System.Drawing.Size(20, 20)
259 275
         Me.WebBrowser2.Name = "WebBrowser2"
260
-        Me.WebBrowser2.Size = New System.Drawing.Size(1341, 299)
276
+        Me.WebBrowser2.Size = New System.Drawing.Size(780, 299)
261 277
         Me.WebBrowser2.TabIndex = 691
262 278
         Me.WebBrowser2.Url = New System.Uri("", System.UriKind.Relative)
263 279
         '
@@ -275,11 +291,12 @@ Partial Class 系統執行檔版本管理
275 291
         '
276 292
         '資料庫版本號_lb
277 293
         '
294
+        Me.資料庫版本號_lb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
278 295
         Me.資料庫版本號_lb.AutoSize = True
279 296
         Me.資料庫版本號_lb.BackColor = System.Drawing.SystemColors.Control
280
-        Me.資料庫版本號_lb.Location = New System.Drawing.Point(798, 29)
297
+        Me.資料庫版本號_lb.Location = New System.Drawing.Point(626, 357)
281 298
         Me.資料庫版本號_lb.Name = "資料庫版本號_lb"
282
-        Me.資料庫版本號_lb.Size = New System.Drawing.Size(159, 16)
299
+        Me.資料庫版本號_lb.Size = New System.Drawing.Size(158, 16)
283 300
         Me.資料庫版本號_lb.TabIndex = 689
284 301
         Me.資料庫版本號_lb.Text = "資料庫版本號 : 2018110801"
285 302
         '
@@ -289,7 +306,7 @@ Partial Class 系統執行檔版本管理
289 306
         Me.Label13.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
290 307
         Me.Label13.Location = New System.Drawing.Point(13, 7)
291 308
         Me.Label13.Name = "Label13"
292
-        Me.Label13.Size = New System.Drawing.Size(56, 16)
309
+        Me.Label13.Size = New System.Drawing.Size(55, 16)
293 310
         Me.Label13.TabIndex = 688
294 311
         Me.Label13.Text = "我的電腦"
295 312
         '
@@ -306,7 +323,7 @@ Partial Class 系統執行檔版本管理
306 323
         '
307 324
         'Button1
308 325
         '
309
-        Me.Button1.Location = New System.Drawing.Point(687, 2)
326
+        Me.Button1.Location = New System.Drawing.Point(679, 2)
310 327
         Me.Button1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
311 328
         Me.Button1.Name = "Button1"
312 329
         Me.Button1.Size = New System.Drawing.Size(105, 48)
@@ -319,9 +336,9 @@ Partial Class 系統執行檔版本管理
319 336
         Me.Label3.BackColor = System.Drawing.SystemColors.Control
320 337
         Me.Label3.Location = New System.Drawing.Point(110, 8)
321 338
         Me.Label3.Name = "Label3"
322
-        Me.Label3.Size = New System.Drawing.Size(44, 16)
339
+        Me.Label3.Size = New System.Drawing.Size(70, 16)
323 340
         Me.Label3.TabIndex = 685
324
-        Me.Label3.Text = "版本號"
341
+        Me.Label3.Text = "PC - 版本號"
325 342
         '
326 343
         '版本號_tb
327 344
         '
@@ -332,24 +349,99 @@ Partial Class 系統執行檔版本管理
332 349
         Me.版本號_tb.Size = New System.Drawing.Size(101, 23)
333 350
         Me.版本號_tb.TabIndex = 684
334 351
         '
352
+        '資料庫清單1_dgv
353
+        '
354
+        DataGridViewCellStyle1.BackColor = System.Drawing.Color.White
355
+        Me.資料庫清單1_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
356
+        Me.資料庫清單1_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
357
+        Me.資料庫清單1_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
358
+        Me.資料庫清單1_dgv.BackgroundColor = System.Drawing.Color.White
359
+        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
360
+        DataGridViewCellStyle2.BackColor = System.Drawing.Color.White
361
+        DataGridViewCellStyle2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
362
+        DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
363
+        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
364
+        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
365
+        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
366
+        Me.資料庫清單1_dgv.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
367
+        Me.資料庫清單1_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
368
+        Me.資料庫清單1_dgv.Location = New System.Drawing.Point(790, 3)
369
+        Me.資料庫清單1_dgv.Name = "資料庫清單1_dgv"
370
+        Me.資料庫清單1_dgv.RowHeadersWidth = 5
371
+        Me.資料庫清單1_dgv.RowTemplate.Height = 24
372
+        Me.資料庫清單1_dgv.Size = New System.Drawing.Size(555, 371)
373
+        Me.資料庫清單1_dgv.TabIndex = 1519
374
+        '
375
+        'Label2
376
+        '
377
+        Me.Label2.AutoSize = True
378
+        Me.Label2.BackColor = System.Drawing.SystemColors.Control
379
+        Me.Label2.Location = New System.Drawing.Point(215, 9)
380
+        Me.Label2.Name = "Label2"
381
+        Me.Label2.Size = New System.Drawing.Size(79, 16)
382
+        Me.Label2.TabIndex = 1521
383
+        Me.Label2.Text = "APK - 版本號"
384
+        '
385
+        '版本號1_tb
386
+        '
387
+        Me.版本號1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
388
+        Me.版本號1_tb.Location = New System.Drawing.Point(214, 27)
389
+        Me.版本號1_tb.Margin = New System.Windows.Forms.Padding(5)
390
+        Me.版本號1_tb.Name = "版本號1_tb"
391
+        Me.版本號1_tb.Size = New System.Drawing.Size(101, 23)
392
+        Me.版本號1_tb.TabIndex = 1520
393
+        '
394
+        'Label5
395
+        '
396
+        Me.Label5.AutoSize = True
397
+        Me.Label5.BackColor = System.Drawing.SystemColors.Control
398
+        Me.Label5.Location = New System.Drawing.Point(319, 9)
399
+        Me.Label5.Name = "Label5"
400
+        Me.Label5.Size = New System.Drawing.Size(99, 16)
401
+        Me.Label5.TabIndex = 1523
402
+        Me.Label5.Text = "IOS測試 - 版本號"
403
+        '
404
+        '版本號2_tb
405
+        '
406
+        Me.版本號2_tb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
407
+        Me.版本號2_tb.Location = New System.Drawing.Point(318, 27)
408
+        Me.版本號2_tb.Margin = New System.Windows.Forms.Padding(5)
409
+        Me.版本號2_tb.Name = "版本號2_tb"
410
+        Me.版本號2_tb.Size = New System.Drawing.Size(101, 23)
411
+        Me.版本號2_tb.TabIndex = 1522
412
+        '
413
+        'Label6
414
+        '
415
+        Me.Label6.AutoSize = True
416
+        Me.Label6.BackColor = System.Drawing.SystemColors.Control
417
+        Me.Label6.Location = New System.Drawing.Point(423, 9)
418
+        Me.Label6.Name = "Label6"
419
+        Me.Label6.Size = New System.Drawing.Size(99, 16)
420
+        Me.Label6.TabIndex = 1525
421
+        Me.Label6.Text = "IOS正式 - 版本號"
422
+        '
423
+        '版本號3_tb
424
+        '
425
+        Me.版本號3_tb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
426
+        Me.版本號3_tb.Location = New System.Drawing.Point(422, 27)
427
+        Me.版本號3_tb.Margin = New System.Windows.Forms.Padding(5)
428
+        Me.版本號3_tb.Name = "版本號3_tb"
429
+        Me.版本號3_tb.Size = New System.Drawing.Size(101, 23)
430
+        Me.版本號3_tb.TabIndex = 1524
431
+        '
335 432
         '系統執行檔版本管理
336 433
         '
337 434
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
338 435
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
339 436
         Me.ClientSize = New System.Drawing.Size(1350, 681)
340
-        Me.Controls.Add(Me.中更5)
341
-        Me.Controls.Add(Me.中更4)
342
-        Me.Controls.Add(Me.中更3)
343
-        Me.Controls.Add(Me.中更2)
344
-        Me.Controls.Add(Me.中更1)
345
-        Me.Controls.Add(Me.小更5)
346
-        Me.Controls.Add(Me.小更4)
347
-        Me.Controls.Add(Me.小更3)
348
-        Me.Controls.Add(Me.小更2)
349
-        Me.Controls.Add(Me.Label1)
350
-        Me.Controls.Add(Me.小更1)
437
+        Me.Controls.Add(Me.Label6)
438
+        Me.Controls.Add(Me.版本號3_tb)
439
+        Me.Controls.Add(Me.Label5)
440
+        Me.Controls.Add(Me.版本號2_tb)
441
+        Me.Controls.Add(Me.Label2)
442
+        Me.Controls.Add(Me.版本號1_tb)
443
+        Me.Controls.Add(Me.資料庫清單1_dgv)
351 444
         Me.Controls.Add(Me.Panel1)
352
-        Me.Controls.Add(Me.Label4)
353 445
         Me.Controls.Add(Me.Label12)
354 446
         Me.Controls.Add(Me.WebBrowser2)
355 447
         Me.Controls.Add(Me.WebBrowser1)
@@ -365,6 +457,7 @@ Partial Class 系統執行檔版本管理
365 457
         Me.Text = "系統執行檔版本管理"
366 458
         Me.Panel1.ResumeLayout(False)
367 459
         Me.Panel1.PerformLayout()
460
+        CType(Me.資料庫清單1_dgv, System.ComponentModel.ISupportInitialize).EndInit()
368 461
         Me.ResumeLayout(False)
369 462
         Me.PerformLayout()
370 463
 
@@ -399,4 +492,11 @@ Partial Class 系統執行檔版本管理
399 492
     Friend WithEvents Button1 As Button
400 493
     Friend WithEvents Label3 As Label
401 494
     Friend WithEvents 版本號_tb As TextBox
495
+    Friend WithEvents 資料庫清單1_dgv As DataGridView
496
+    Friend WithEvents Label2 As Label
497
+    Friend WithEvents 版本號1_tb As TextBox
498
+    Friend WithEvents Label5 As Label
499
+    Friend WithEvents 版本號2_tb As TextBox
500
+    Friend WithEvents Label6 As Label
501
+    Friend WithEvents 版本號3_tb As TextBox
402 502
 End Class

+ 29
- 8
GF00-ERP-SYS/09.資料庫系統管理/系統執行檔版本管理.vb 查看文件

@@ -3,17 +3,34 @@ Imports System.Data.SqlClient
3 3
 Imports System.Net
4 4
 Imports System.IO
5 5
 Public Class 系統執行檔版本管理
6
-
6
+    Private Sub Set_伺服器狀態()
7
+        Dim ds7 As New DataSet : 資料庫清單1_dgv.DataSource = Nothing : ds7.Clear()
8
+        資料庫清單1_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
9
+        資料庫清單1_dgv.ColumnHeadersHeight = 25 : 資料庫清單1_dgv.AllowUserToAddRows = False
10
+        SQL_伺服器2清單()
11
+        da.Fill(ds7) : 資料庫清單1_dgv.DataSource = ds7.Tables(0) : conn.Close()
12
+        For i As Integer = 0 To 資料庫清單1_dgv.Rows.Count - 1
13
+            PA50 = 資料庫清單1_dgv.Rows(i).Cells(0).Value.ToString : SQL_連線字串_版本SQL()
14
+            SQL_系統認證版本號查詢1()
15
+            If dr.Read() Then
16
+                資料庫清單1_dgv.Rows(i).Cells(1).Value = dr("系統認證版本號").ToString
17
+                資料庫清單1_dgv.Rows(i).Cells(2).Value = dr("手機認證版本號").ToString
18
+                資料庫清單1_dgv.Rows(i).Cells(3).Value = dr("IOS認證版本號").ToString
19
+                資料庫清單1_dgv.Rows(i).Cells(4).Value = dr("IOS送審版本號").ToString
20
+            End If
21
+        Next
22
+    End Sub
7 23
     Private Sub 系統執行檔版本管理_Load(sender As Object, e As EventArgs) Handles MyBase.Load
8 24
         Me.MdiParent = ICS_ASMS_ERP_SYS : Me.WindowState = 2 : Me.AutoScroll = True
9 25
         TextBox3.Visible = False : TextBox1.Visible = False : Panel1.SendToBack()
10
-
26
+        Set_伺服器狀態()
11 27
         SQL_系統認證版本號查詢()
12 28
         If dr.Read() Then
13 29
             資料庫版本號_lb.Text = "資料庫版本號 : " & dr("系統認證版本號") : 小更1.Text = dr("小更新1").ToString : 小更2.Text = dr("小更新2").ToString
14 30
             小更3.Text = dr("小更新3").ToString : 中更1.Text = dr("中更新1").ToString : 中更2.Text = dr("中更新2").ToString
15 31
             版本號_tb.Text = dr("系統認證版本號") : 小更4.Text = dr("小更新4").ToString : 小更5.Text = dr("小更新5").ToString
16 32
             中更3.Text = dr("中更新3").ToString : 中更4.Text = dr("中更新4").ToString : 中更5.Text = dr("中更新5").ToString
33
+            版本號1_tb.Text = dr("手機認證版本號") : 版本號2_tb.Text = dr("IOS認證版本號") : 版本號3_tb.Text = dr("IOS送審版本號")
17 34
         End If : conn.Close()
18 35
         Target1 = Target & AA(0) & "/" : Target2 = Target & AA(1) & "/"
19 36
         WebBrowser1.Url = New Uri(Target1)
@@ -22,11 +39,14 @@ Public Class 系統執行檔版本管理
22 39
         End If
23 40
     End Sub
24 41
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
25
-        If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString : conn.Open() : End If
26
-        SQL1 = "UPDATE 版本號管理 SET 系統認證版本號 = N'" & 版本號_tb.Text & "', 小更新1 = N'" & 小更1.Text & "', 小更新2 = N'" & 小更2.Text & "', 小更新3 = N'" & 小更3.Text & "', 
27
-                小更新4 = N'" & 小更4.Text & "', 小更新5 = N'" & 小更5.Text & "', 中更新1 = N'" & 中更1.Text & "', 中更新2 = N'" & 中更2.Text & "', 中更新3 = N'" & 中更3.Text & "', 
28
-                中更新4 = N'" & 中更4.Text & "', 中更新5 = N'" & 中更5.Text & "' WHERE (系統認證版本號 = N'" & Strings.Right(資料庫版本號_lb.Text, 10) & "')"
29
-        cmd.Connection = conn : cmd.CommandText = SQL1 : cmd.ExecuteNonQuery() : conn.Close()
42
+        For i As Integer = 0 To 資料庫清單1_dgv.Rows.Count - 1
43
+            PA50 = 資料庫清單1_dgv.Rows(i).Cells(0).Value.ToString : SQL_連線字串_版本SQL()
44
+            If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString4 : conn.Open() : End If
45
+            SQL1 = "UPDATE 版本號管理 SET 系統認證版本號 = N'" & 版本號_tb.Text & "', 手機認證版本號 = N'" & 版本號1_tb.Text & "', 
46
+                IOS認證版本號 = N'" & 版本號2_tb.Text & "', IOS送審版本號 = N'" & 版本號3_tb.Text & "' 
47
+                WHERE (系統認證版本號 = N'" & Strings.Right(資料庫版本號_lb.Text, 10) & "')"
48
+            cmd.Connection = conn : cmd.CommandText = SQL1 : cmd.ExecuteNonQuery() : conn.Close()
49
+        Next
30 50
 
31 51
         If conn.State = ConnectionState.Closed Then : conn.ConnectionString = ConString : conn.Open() : End If
32 52
         SQL1 = "SELECT 系統認證版本號 FROM 版本號管理 "
@@ -34,7 +54,8 @@ Public Class 系統執行檔版本管理
34 54
         If dr.Read() Then
35 55
             資料庫版本號_lb.Text = "資料庫版本號 : " & dr("系統認證版本號")
36 56
             版本號_tb.Text = dr("系統認證版本號")
37
-        End If : conn.Close() : If 系統語言 = "繁體中文" Then : 通知訊息 = "修改完成!!" : Else : 通知訊息 = "Modifikasi selesai!!" : End If : 訊息類型 = "1" : 通知視窗.ShowDialog()
57
+        End If : conn.Close() : If 系統語言 = "繁體中文" Then : 通知訊息 = "修改完成!!" : Else : 通知訊息 = "Modifikasi selesai!!" : End If : 訊息類型 = "1"
58
+        Set_伺服器狀態() : 通知視窗.ShowDialog()
38 59
     End Sub
39 60
     Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
40 61
         If FolderBrowserDialog1.ShowDialog = DialogResult.OK Then

+ 7
- 1
GF00-ERP-SYS/GCM-CPV-ERP-SYS.vb 查看文件

@@ -57,7 +57,13 @@ Public Class ICS_ASMS_ERP_SYS
57 57
         '------------------------人事管理系統-------------------------------------------------------------------------------------------------------------------------------------------------
58 58
         人事管理系統_tsm.Visible = CC(114) : 考勤文件導入_tsm.Visible = CC(18) : 薪資試算表_tsm.Visible = CC(32)
59 59
         '----
60
-        載入系統語言() : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS"
60
+        載入系統語言()
61
+        Dim filePath As String = Path.Combine(Application.StartupPath, "NOTAUTO.txt")
62
+        If File.Exists(filePath) Then
63
+            Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  版本號 : " & 版本
64
+        Else
65
+            Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : M"
66
+        End If
61 67
     End Sub
62 68
     Private Sub ICS_ASMS_ERP_SYS_Unload(sender As Object, e As EventArgs) Handles MyBase.Closing
63 69
         系統關閉 = True : If 判斷重登 = True Then : 判斷重登 = False : Else : 判斷重登 = False : 系統選擇.Close() : End If

二进制
GF00-ERP-SYS/bin/Debug/GF00-ERP-SYS.exe 查看文件


二进制
GF00-ERP-SYS/bin/Debug/GF00-ERP-SYS.pdb 查看文件


+ 0
- 1
GF00-ERP-SYS/bin/Debug/GF00UPDATE.txt 查看文件

@@ -1 +0,0 @@
1
-1

+ 1
- 0
GF00-ERP-SYS/bin/Debug/NOTAUTO.txt 查看文件

@@ -0,0 +1 @@
1
+

二进制
GF00-ERP-SYS/obj/Debug/DesignTimeResolveAssemblyReferences.cache 查看文件


二进制
GF00-ERP-SYS/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache 查看文件


二进制
GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.exe 查看文件


二进制
GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.pdb 查看文件


+ 163
- 163
GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.FileListAbsolute.txt 查看文件

@@ -161,169 +161,6 @@ D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.排序選
161 161
 D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.查看燈位.resources
162 162
 D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.自動點燈系統.resources
163 163
 D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.快速加入.resources
164
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_100_percent.pak
165
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_200_percent.pak
166
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_elf.dll
167
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\d3dcompiler_47.dll
168
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\icudtl.dat
169
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libcef.dll
170
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libEGL.dll
171
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libGLESv2.dll
172
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\LICENSE.txt
173
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\af.pak
174
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\am.pak
175
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ar.pak
176
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\bg.pak
177
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\bn.pak
178
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ca.pak
179
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\cs.pak
180
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\da.pak
181
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\de.pak
182
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\el.pak
183
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\en-GB.pak
184
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\en-US.pak
185
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\es-419.pak
186
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\es.pak
187
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\et.pak
188
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fa.pak
189
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fi.pak
190
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fil.pak
191
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fr.pak
192
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\gu.pak
193
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\he.pak
194
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hi.pak
195
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hr.pak
196
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hu.pak
197
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\id.pak
198
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\it.pak
199
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ja.pak
200
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\kn.pak
201
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ko.pak
202
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\lt.pak
203
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\lv.pak
204
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ml.pak
205
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\mr.pak
206
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ms.pak
207
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\nb.pak
208
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\nl.pak
209
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pl.pak
210
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pt-BR.pak
211
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pt-PT.pak
212
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ro.pak
213
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ru.pak
214
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sk.pak
215
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sl.pak
216
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sr.pak
217
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sv.pak
218
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sw.pak
219
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ta.pak
220
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\te.pak
221
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\th.pak
222
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\tr.pak
223
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\uk.pak
224
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ur.pak
225
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\vi.pak
226
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\zh-CN.pak
227
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\zh-TW.pak
228
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\README.txt
229
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\resources.pak
230
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\snapshot_blob.bin
231
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\v8_context_snapshot.bin
232
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vk_swiftshader.dll
233
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vk_swiftshader_icd.json
234
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vulkan-1.dll
235
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.Core.dll
236
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.Core.pdb
237
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.exe
238
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.pdb
239
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.dll
240
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.pdb
241
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.xml
242
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.exe.config
243
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.exe
244
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.pdb
245
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.xml
246
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.dll
247
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.dll
248
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.dll
249
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\DotNetBarcode.dll
250
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\MediaFoundation.dll
251
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\Microsoft.Toolkit.Uwp.Notifications.dll
252
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\System.ValueTuple.dll
253
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.pdb
254
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.xml
255
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.pdb
256
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.xml
257
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.pdb
258
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.xml
259
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.AssemblyReference.cache
260
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\Interop.ACTIVEXLib.dll
261
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.ResolveComReference.cache
262
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.供應商類別管理.resources
263
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料供應商.resources
264
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.倉儲對帳表.resources
265
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.倉儲明細表查詢.resources
266
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料入庫系統.resources
267
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料資料庫.resources
268
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.匯率管理.resources
269
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.會計科目管理.resources
270
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_對帳表.resources
271
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單一覽表.resources
272
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單審核.resources
273
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單申請.resources
274
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_決算表.resources
275
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_流動資產申請.resources
276
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_選擇帳本.resources
277
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.信眾燈位編輯.resources
278
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.快速加入.resources
279
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.排序選擇.resources
280
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.查看燈位.resources
281
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.燈位基本資料.resources
282
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.燈種編輯.resources
283
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.自動點燈系統.resources
284
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.估價單.resources
285
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.信眾資料表.resources
286
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.車輛銷售報表.resources
287
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.客戶資料表.resources
288
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.車輛銷售管理.resources
289
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.連動模組.resources
290
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.點燈系統.resources
291
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.公告.resources
292
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.文件.resources
293
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.疏文.resources
294
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.簽呈.resources
295
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.公函.resources
296
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.簽名檔管理.resources
297
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統使用者管理.resources
298
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統執行檔版本管理.resources
299
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統對應電腦註冊.resources
300
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統權限預設表.resources
301
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統組織架構設定.resources
302
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統編碼規則.resources
303
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統通用變數管理.resources
304
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.部門權限設定.resources
305
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.下拉清單_1.resources
306
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.下拉清單_2.resources
307
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.個人帳號管理.resources
308
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.圖片放大視窗.resources
309
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.查詢視窗.resources
310
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.測試頁面.resources
311
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.線路選擇.resources
312
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.輸入密碼.resources
313
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.輸入視窗.resources
314
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.退出.resources
315
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.通知視窗.resources
316
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.鎖定視窗.resources
317
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.ICS_ASMS_ERP_SYS.resources
318
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.Resources.resources
319
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.登入畫面.resources
320
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統選擇.resources
321
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.GenerateResource.cache
322
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.exe.licenses
323
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.CoreCompileInputs.cache
324
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.exe
325
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.xml
326
-D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.pdb
327 164
 D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP.CC31A059.Up2Date
328 165
 D:\GF00-ERP-SYS\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.感謝狀.resources
329 166
 D:\USER\Downloads\GF00-ERP-SYS-Siu-master\gf00-erp-sys-siu\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_100_percent.pak
@@ -493,7 +330,170 @@ D:\USER\Downloads\GF00-ERP-SYS-Siu-master\gf00-erp-sys-siu\GF00-ERP-SYS\GF00-ERP
493 330
 D:\USER\Downloads\GF00-ERP-SYS-Siu-master\gf00-erp-sys-siu\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.exe
494 331
 D:\USER\Downloads\GF00-ERP-SYS-Siu-master\gf00-erp-sys-siu\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.xml
495 332
 D:\USER\Downloads\GF00-ERP-SYS-Siu-master\gf00-erp-sys-siu\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.pdb
333
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.dll
334
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.pdb
335
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.Runtime.xml
336
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_100_percent.pak
337
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_200_percent.pak
338
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\chrome_elf.dll
339
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\d3dcompiler_47.dll
340
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\icudtl.dat
341
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libcef.dll
342
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libEGL.dll
343
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\libGLESv2.dll
344
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\LICENSE.txt
345
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\af.pak
346
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\am.pak
347
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ar.pak
348
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\bg.pak
349
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\bn.pak
350
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ca.pak
351
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\cs.pak
352
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\da.pak
353
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\de.pak
354
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\el.pak
355
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\en-GB.pak
356
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\en-US.pak
357
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\es-419.pak
358
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\es.pak
359
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\et.pak
360
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fa.pak
361
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fi.pak
362
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fil.pak
363
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\fr.pak
364
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\gu.pak
365
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\he.pak
366
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hi.pak
367
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hr.pak
368
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\hu.pak
369
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\id.pak
370
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\it.pak
371
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ja.pak
372
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\kn.pak
373
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ko.pak
374
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\lt.pak
375
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\lv.pak
376
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ml.pak
377
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\mr.pak
378
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ms.pak
379
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\nb.pak
380
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\nl.pak
381
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pl.pak
382
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pt-BR.pak
383
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\pt-PT.pak
384
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ro.pak
385
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ru.pak
386
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sk.pak
387
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sl.pak
388
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sr.pak
389
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sv.pak
390
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\sw.pak
391
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ta.pak
392
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\te.pak
393
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\th.pak
394
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\tr.pak
395
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\uk.pak
396
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\ur.pak
397
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\vi.pak
398
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\zh-CN.pak
399
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\locales\zh-TW.pak
400
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\README.txt
401
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\resources.pak
402
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\snapshot_blob.bin
403
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\v8_context_snapshot.bin
404
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vk_swiftshader.dll
405
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vk_swiftshader_icd.json
406
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\vulkan-1.dll
407
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.Core.dll
408
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.Core.pdb
409
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.exe
410
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.BrowserSubprocess.pdb
411
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.exe.config
412
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.exe
413
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.pdb
414
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\GF00-ERP-SYS.xml
415
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.dll
416
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.dll
417
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.dll
418
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\DotNetBarcode.dll
419
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\MediaFoundation.dll
420
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\Microsoft.Toolkit.Uwp.Notifications.dll
421
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\System.ValueTuple.dll
422
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.pdb
423
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.xml
424
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.pdb
425
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.Core.xml
426
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.pdb
427
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\bin\Debug\CefSharp.WinForms.xml
428
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.AssemblyReference.cache
429
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\Interop.ACTIVEXLib.dll
430
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.ResolveComReference.cache
496 431
 D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.拆帳制考勤文件導入.resources
497 432
 D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.拆帳制薪資試算表.resources
433
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.供應商類別管理.resources
434
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料供應商.resources
435
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.倉儲對帳表.resources
436
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.倉儲明細表查詢.resources
437
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料入庫系統.resources
438
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.物料資料庫.resources
439
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.匯率管理.resources
440
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.會計科目管理.resources
441
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_對帳表.resources
442
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單一覽表.resources
443
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單審核.resources
444
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_收支單申請.resources
445
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_決算表.resources
446
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_流動資產申請.resources
447
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.財務_選擇帳本.resources
448
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.信眾燈位編輯.resources
449
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.快速加入.resources
498 450
 D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.感謝狀.resources
451
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.排序選擇.resources
452
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.查看燈位.resources
453
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.燈位基本資料.resources
454
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.燈種編輯.resources
455
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.自動點燈系統.resources
456
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.估價單.resources
457
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.信眾資料表.resources
458
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.車輛銷售報表.resources
459
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.客戶資料表.resources
460
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.車輛銷售管理.resources
461
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.連動模組.resources
462
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.點燈系統.resources
463
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.公告.resources
464
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.文件.resources
465
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.疏文.resources
466
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.簽呈.resources
467
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.公函.resources
468
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.簽名檔管理.resources
469
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統使用者管理.resources
470
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統執行檔版本管理.resources
471
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統對應電腦註冊.resources
472
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統權限預設表.resources
473
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統組織架構設定.resources
474
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統編碼規則.resources
475
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統通用變數管理.resources
476
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.部門權限設定.resources
477
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.下拉清單_1.resources
478
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.下拉清單_2.resources
479
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.個人帳號管理.resources
480
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.圖片放大視窗.resources
481
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.查詢視窗.resources
482
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.測試頁面.resources
483
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.線路選擇.resources
484
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.輸入密碼.resources
485
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.輸入視窗.resources
486
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.退出.resources
487
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.通知視窗.resources
488
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.鎖定視窗.resources
489
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.ICS_ASMS_ERP_SYS.resources
490
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.Resources.resources
491
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.登入畫面.resources
492
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\ICS_ASMS_ERP_SYS.系統選擇.resources
493
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.GenerateResource.cache
494
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.exe.licenses
495
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.vbproj.CoreCompileInputs.cache
499 496
 D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP.CC31A059.Up2Date
497
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.exe
498
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.xml
499
+D:\工巧明\GF通用系統\GF00-ERP-SYS\GF00-ERP-SYS\obj\Debug\GF00-ERP-SYS.pdb

二进制
GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.GenerateResource.cache 查看文件


二进制
GF00-ERP-SYS/obj/Debug/GF00-ERP-SYS.vbproj.ResolveComReference.cache 查看文件


二进制
GF00-ERP-SYS/obj/Debug/Interop.ACTIVEXLib.dll 查看文件


+ 47
- 169
GF00-ERP-SYS/登入畫面.vb 查看文件

@@ -1,11 +1,5 @@
1 1
 Imports System.IO
2
-Imports System.Net
3 2
 Imports System.Text
4
-Imports System.Net.NetworkInformation
5
-Imports System.Threading
6
-Imports CefSharp.WinForms
7
-Imports System.Data.SqlClient
8
-
9 3
 Public Class 登入畫面
10 4
     Dim MACKK, diskId, diskSerialNumber, diskModel As String 'MAC碼
11 5
     Dim Str As String = Application.StartupPath
@@ -14,9 +8,11 @@ Public Class 登入畫面
14 8
     ReadOnly 對話框(15) As String
15 9
     ReadOnly ds2, ds3 As New DataSet
16 10
     Private Sub 登入畫面_Load(sender As Object, e As EventArgs) Handles MyBase.Load
17
-
11
+        Dim strDirNam As String = Path.Combine(Application.StartupPath, "GF00-ERP-UPDATE.EXE")
12
+        If File.Exists(strDirNam) Then : File.Delete(strDirNam) : End If
18 13
         執行檔版本號_lb.Text = "執行檔版本號 : " & 版本
19
-        Timer1.Enabled = True : IP公 = False : IP測1 = False : IP測2 = False ': Panel1.SendToBack()
14
+        'Timer1.Enabled = True
15
+        IP公 = False : IP測1 = False : IP測2 = False ': Panel1.SendToBack()
20 16
         系統登入_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
21 17
         '-----------------------控件基本設定-----------------------------------------------------------------------------------------------------------------------------------------------
22 18
         深色風格_ch.Visible = 風格啟用 : 系統語言_cb.Visible = 多國語言啟用 : 系統語言_lb.Visible = 多國語言啟用
@@ -26,8 +22,9 @@ Public Class 登入畫面
26 22
         刷卡登入_ch.Visible = False : 登入綁定_ch.Visible = False : Panel1.SendToBack()
27 23
 
28 24
         If 風格啟用 = True Then
29
-            If File.Exists(Str + "\HXSTYLE.txt") Then
30
-                Dim filereader = My.Computer.FileSystem.OpenTextFileReader(Str + "\HXSTYLE.txt", System.Text.Encoding.Default)
25
+            Dim filePath As String = Path.Combine(Application.StartupPath, "HXSTYLE.txt")
26
+            If File.Exists(filePath) Then
27
+                Dim filereader = My.Computer.FileSystem.OpenTextFileReader(filePath, System.Text.Encoding.Default)
31 28
                 Dim Text As String = "" : Dim line As String = filereader.ReadLine()
32 29
                 While Not (line Is Nothing) : Text = Text & line & vbCrLf : line = filereader.ReadLine() : End While : filereader.Close()
33 30
                 If Strings.Left(Text, 1) = "B" Then : 深色風格_ch.Checked = False : 深色風格 = False
@@ -35,42 +32,35 @@ Public Class 登入畫面
35 32
             Else : 深色風格_ch.Checked = False : 深色風格 = False : End If
36 33
             風格()
37 34
         End If
38
-        If File.Exists(Str + "\TEST.txt") Then
35
+        Dim filePath1 As String = Path.Combine(Application.StartupPath, "TEST.txt")
36
+        If File.Exists(filePath1) Then
39 37
             Dim fileContent As String = File.ReadAllText(Str + "\TEST.txt")
40 38
             txt = fileContent
41
-            ' 檢查內容是否符合特定格式
42 39
             If fileContent.Length >= 10 AndAlso fileContent(2) = "G" AndAlso fileContent(9) = "F" Then
43
-                ' 從內容中提取資料庫編號
44 40
                 Dim databaseID As String = fileContent(4) & fileContent(7)
45 41
                 資料庫編號 = databaseID
46
-
47 42
             Else
48
-                ' 內容不符合格式,顯示錯誤訊息並關閉程式
49 43
                 MGB("錯誤,請通知系管理員", 1) : Me.Close()
50 44
             End If
51 45
         Else
52 46
             輸入密碼.ShowDialog()
53 47
             If PA = "0003065795" Then
54 48
                 PA = InputBox("請輸入啟動碼!!", "啟用系統")
55
-                Dim strDirName As String : Dim Strs As String = Application.StartupPath
56
-                If File.Exists(Strs & "\TEST.txt") Then : File.Delete(Strs & "\TEST.txt") : End If
57
-                strDirName = Strs & "\TEST.txt"
49
+                Dim strDirName As String : Dim filePath2 As String = Path.Combine(Application.StartupPath, "TEST.txt")
50
+                If File.Exists(filePath2) Then : File.Delete(filePath2) : End If
51
+                strDirName = filePath2
58 52
                 Try
59 53
                     Using fs As IO.FileStream = New IO.FileStream(strDirName, FileMode.Append)
60 54
                         Using sw As StreamWriter = New StreamWriter(fs, Encoding.Default)
61 55
                             Dim str As String = PA
62 56
                             sw.WriteLine(str)   '插入一整行
63 57
                             sw.Flush()
64
-
65 58
                         End Using
66 59
                     End Using
67 60
                 Catch ex As Exception
68 61
                 End Try
69 62
                 Application.Restart()
70
-            Else
71
-                MGB("驗證碼錯誤", 1) : Me.Close()
72
-            End If
73
-
63
+            Else : MGB("驗證碼錯誤", 1) : Me.Close() : End If
74 64
         End If
75 65
         '-----------------------調整視窗大小-----------------------------------------------------------------------------------------------------------------------------------------------
76 66
         Me.Size = New Size(460, 280)
@@ -86,7 +76,7 @@ Public Class 登入畫面
86 76
         Next
87 77
         Dim cmicWmi As New Management.ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
88 78
         For Each cmicWmiObj As Management.ManagementObject In cmicWmi.Get
89
-            diskId = cmicWmiObj("size")             'diskId = cmicWmiObj("signature")
79
+            diskId = cmicWmiObj("size")
90 80
             diskSerialNumber = cmicWmiObj("serialnumber")
91 81
             diskModel = cmicWmiObj("Model")
92 82
             Exit For
@@ -94,10 +84,10 @@ Public Class 登入畫面
94 84
         '-----電腦預設值------------------------------------------------------------------------------------------------------------------------------------------------------------------
95 85
         SQL_連線字串_本機()
96 86
         電腦識別碼 = diskId & "_" & diskSerialNumber & "_" & diskModel : 電腦識別碼 = Replace(電腦識別碼, "'", "_")
97
-        SQL_電腦預設值查詢()  'If Acdr.Read() Then : 系統語言 = Acdr("系統語言") : Else : 系統語言 = "繁體中文" : End If : Access1.Close()
98
-        帳號_rtb.ImeMode = 2
87
+        SQL_電腦預設值查詢() : 帳號_rtb.ImeMode = 2
99 88
         '-----不啟用WEB------------------------------------------------------------------------------------------------------------------------------------------------------------------
100
-        If File.Exists(Str + "\NOPWEB.txt") Then
89
+        Dim filePath3 As String = Path.Combine(Application.StartupPath, "NOPWEB.txt")
90
+        If File.Exists(filePath3) Then
101 91
             Dim filereader = My.Computer.FileSystem.OpenTextFileReader(Str + "\NOPWEB.txt", System.Text.Encoding.Default)
102 92
             Dim Text As String = "" : Dim line As String = filereader.ReadLine()
103 93
             While Not (line Is Nothing) : Text = Text & line & vbCrLf : line = filereader.ReadLine() : End While : filereader.Close()
@@ -105,11 +95,6 @@ Public Class 登入畫面
105 95
             ElseIf Strings.Left(Text, 3) = "YES" Then : 不啟用WEB_cb.Checked = True : End If
106 96
         Else : 不啟用WEB_cb.Checked = False : End If
107 97
         If 不啟用WEB_cb.Checked = False Then : 不用WEB = False : Else : 不用WEB = True : End If
108
-        計算分流1.Enabled = True
109
-    End Sub
110
-    Private Sub 計算分流1_Tick(sender As Object, e As EventArgs) Handles 計算分流1.Tick
111
-        '-----------------------系統版本號驗證-----------------------------------------------------------------------------------------------------------------------------------------------
112
-        計算分流1.Enabled = False : 介面 = "H000"
113 98
 
114 99
         PA49 = "mssql-147629-0.cloudclusters.net,12711"
115 100
         IP公 = True : IP測1 = True : IP測2 = True : 伺服器區域_cb.Text = "正式" : 公司線路_rb.Checked = True : 測試線路_rb.Checked = False : 內網線路 = True
@@ -121,7 +106,6 @@ Public Class 登入畫面
121 106
             登入() : 自動更新2()
122 107
         Else : End If
123 108
     End Sub
124
-
125 109
     Private Function ScaleImage(ByVal img As Image, ByVal size As Size) As Image
126 110
         Dim newImage As New Bitmap(size.Width, size.Height)
127 111
         Using graphics As Graphics = Graphics.FromImage(newImage)
@@ -136,7 +120,6 @@ Public Class 登入畫面
136 120
             PA49 = "mssql-147629-0.cloudclusters.net,12711"
137 121
             IP公 = True : IP測1 = True : IP測2 = True : 伺服器區域_cb.Text = "正式" : 公司線路_rb.Checked = True : 測試線路_rb.Checked = False : 內網線路 = True
138 122
             確定_rbt.Enabled = True : 取消_rbt.Enabled = True : 刷卡登入_ch.Checked = True
139
-
140 123
         Else
141 124
             If SQL_連線狀態模組2.ConnectTest2("106.1.48.106,4567") = True Then
142 125
                 '---主伺服器導通-------------------------------------------
@@ -145,12 +128,10 @@ Public Class 登入畫面
145 128
                 PA49 = "106.1.48.106,4567"
146 129
                 IP公 = True : IP測1 = True : IP測2 = True : 伺服器區域_cb.Text = "測試" : 公司線路_rb.Checked = True : 測試線路_rb.Checked = False : 內網線路 = True
147 130
                 確定_rbt.Enabled = True : 取消_rbt.Enabled = True : 刷卡登入_ch.Checked = True
148
-
149 131
             Else
150 132
                 對話框(1) = "正式及測試資料庫皆無法連線,請通知系統管理員!!"
151 133
                 MGB(對話框(1), 1) : Me.Close()
152 134
             End If
153
-
154 135
         End If
155 136
     End Sub
156 137
     Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles 伺服器區域_cb.SelectedIndexChanged
@@ -158,34 +139,25 @@ Public Class 登入畫面
158 139
         If 伺服器區域_cb.Text = "正式" Then
159 140
             If IP公 = True Then : 登入人IP = "mssql-147629-0.cloudclusters.net,12711"
160 141
                 登入() : 確定_rbt.Enabled = True : 取消_rbt.Enabled = True : 刷卡登入_ch.Checked = True
161
-                If File.Exists(Str + "\NOTAUTO.txt") Then : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : M " : Else : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : M" : End If
142
+                Dim filePath As String = Path.Combine(Application.StartupPath, "NOTAUTO.txt")
143
+                If File.Exists(filePath) Then : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : M " : Else : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : M" : End If
162 144
             Else : MGB(對話框(11), 1) : Me.Close() : End If
163
-
164 145
         ElseIf 伺服器區域_cb.Text = "測試" Then
165 146
             If IP公 = True Then : 登入人IP = "mssql-147629-0.cloudclusters.net,12711" : 資料庫編號 = "99"
166 147
                 登入() : 確定_rbt.Enabled = True : 取消_rbt.Enabled = True : 刷卡登入_ch.Checked = True
167
-                If File.Exists(Str + "\NOTAUTO.txt") Then : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : T " : Else : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : T" : End If
148
+                Dim filePath As String = Path.Combine(Application.StartupPath, "NOTAUTO.txt")
149
+                If File.Exists(filePath) Then : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : T " : Else : Me.Text = "GF" & 資料庫編號 & "-ERP-SYS  Line : T" : End If
168 150
             Else : MGB(對話框(11), 1) : Me.Close() : End If
169 151
         End If : 帳號_rtb.Focus()
170 152
     End Sub
171 153
     Private Sub 登入()
172
-
173 154
         '-----------------------寫入連線字串-----------------------------------------------------------------------------------------------------------------------------------------------
174
-        If Strings.Left(伺服器區域_cb.Text, 2) = "正式" Or Strings.Left(伺服器區域_cb.Text, 2) = "正式" Then
175
-            SQL_連線字串_正式() ': SQL_連線字串_正式_工程SQL() : SQL_連線字串_正式_管理SQL()'
176
-        Else
177
-            'SQL_連線字串_測試() : SQL_連線字串_測試_工程SQL() : SQL_連線字串_測試_管理SQL()
178
-            SQL_連線字串_正式() ': SQL_連線字串_正式_工程SQL() : SQL_連線字串_正式_管理SQL()'
179
-        End If
155
+        If Strings.Left(伺服器區域_cb.Text, 2) = "正式" Or Strings.Left(伺服器區域_cb.Text, 2) = "正式" Then : SQL_連線字串_正式() : Else : SQL_連線字串_正式() : End If
180 156
         驗證_tb.Text = "1" : g_conn_type = 伺服器區域_cb.Text & "伺服器"
181 157
         '-----------------------系統是否鎖定-----------------------------------------------------------------------------------------------------------------------------------------------
182 158
         SQL_讀取鎖定()
183 159
         If dr.Read() Then
184
-            Dim ch As Boolean = dr("系統鎖定")
185
-            If ch = True Then
186
-                退出.ShowDialog() : 退出.BringToFront()
187
-                Return
188
-            End If
160
+            Dim ch As Boolean = dr("系統鎖定") : If ch = True Then : 退出.ShowDialog() : 退出.BringToFront() : Return : End If
189 161
         End If : conn.Close()
190 162
         '-----------------------讀取圖片------------
191 163
         SQL_取得登入圖檔()
@@ -209,81 +181,48 @@ Public Class 登入畫面
209 181
             If i < 10 Then : HH = "0" & i : ElseIf i >= 10 Then : HH = i : End If
210 182
             If ftp清單_dgv("指定", i).Value.ToString = "AA" & HH Then : AA(i) = ftp清單_dgv("資料夾名稱", i).Value.ToString : End If
211 183
         Next
212
-        If 多國語言啟用 = True Then
213
-            'Set_語言導入() : conn.Close() : 語言轉換讀取()
214
-            'SQL_系統語言() : 系統語言_cb.Items.Clear() : While (dr.Read()) : 系統語言_cb.Items.Add(dr("語言")) : End While : conn.Close()
215
-        Else
216
-            語言轉換讀取()
217
-            資料庫版本號_lb.Text = "資料庫版本號 : " & 資料庫版本
218
-        End If
184
+        If 多國語言啟用 = True Then : Else : 語言轉換讀取() : 資料庫版本號_lb.Text = "資料庫版本號 : " & 資料庫版本 : End If
219 185
         '-----MAC碼與硬碟資料-------------------------------------------------------------------------------------------------------------------------------------------------------------
220 186
         Dim Wmi As New Management.ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")
221 187
         For Each WmiObj As Management.ManagementObject In Wmi.Get
222
-            If CBool(WmiObj("IPEnabled")) Then
223
-                MACKK = WmiObj("MACAddress")
224
-            End If
188
+            If CBool(WmiObj("IPEnabled")) Then : MACKK = WmiObj("MACAddress") : End If
225 189
         Next
226 190
         Dim cmicWmi As New Management.ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
227 191
         For Each cmicWmiObj As Management.ManagementObject In cmicWmi.Get
228
-            diskId = cmicWmiObj("size")             'diskId = cmicWmiObj("signature")
192
+            diskId = cmicWmiObj("size")
229 193
             diskSerialNumber = cmicWmiObj("serialnumber")
230 194
             diskModel = cmicWmiObj("Model")
231 195
             Exit For
232 196
         Next
233
-        '-----電腦預設值------------------------------------------------------------------------------------------------------------------------------------------------------------------
234
-        'SQL_連線字串_本機()
235
-        '電腦識別碼 = diskId & "_" & diskSerialNumber & "_" & diskModel
236
-        '電腦識別碼 = Replace(電腦識別碼, "'", "_")
237
-        'SQL_電腦預設值查詢()
238
-        'If Acdr.Read() Then
239
-        '    低網速模式_ch.Checked = Acdr("低網速模式") : 低網速模式 = Acdr("低網速模式")
240
-        '    系統語言_cb.Text = Acdr("系統語言")
241
-        'Else
242
-        '    SQL_電腦預設值建檔() : Access1.Close() : 系統語言_cb.Text = "繁體中文" : Access1.Close() : Exit Sub
243
-        'End If : Access1.Close()
244 197
     End Sub
245 198
     Private Sub ConnectToDatabase()
246
-        ' 连接数据库的代码
247
-        ' ...
248
-
249
-        ' 进行 SQL 语句执行或其他操作
250
-        SQL_系統版本號驗證()
251
-
252
-        ' 如果读取成功,则获取版本号
253
-        If dr.Read() Then
254
-            資料庫版本 = dr("系統認證版本號")
255
-            版本號 = dr("系統認證版本號")
256
-        End If
257
-
258
-        ' 关闭数据库连接
259
-        conn.Close()
199
+        SQL_系統版本號驗證() : If dr.Read() Then : 資料庫版本 = dr("系統認證版本號") : 版本號 = dr("系統認證版本號") : End If : conn.Close()
260 200
     End Sub
261 201
     Private Sub Set_清單1()
262 202
         ftp清單_dgv.DataSource = Nothing : ds2.Clear()
263 203
         ftp清單_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
264
-        ftp清單_dgv.ColumnHeadersHeight = 25
265
-        ftp清單_dgv.AllowUserToAddRows = False
204
+        ftp清單_dgv.ColumnHeadersHeight = 25 : ftp清單_dgv.AllowUserToAddRows = False
266 205
         SQL_FTP資料夾路徑分配()
267 206
         da.Fill(ds2) : ftp清單_dgv.DataSource = ds2.Tables(0) : conn.Close()
268 207
     End Sub
269 208
     Private Sub 自動更新2()
270
-        Dim Str As String = Application.StartupPath
271
-        If File.Exists(Str + "\NOTAUTO.txt") Then
209
+        Dim filePath As String = Path.Combine(Application.StartupPath, "NOTAUTO.txt")
210
+        If File.Exists(filePath) Then
272 211
             If 帳號_rtb.Text = "b70340" Or 帳號_rtb.Text = "B70340" Then : Else : End If
273 212
         Else
274 213
             SQL_系統認證版本號查詢()
275 214
             If dr.Read() Then
276 215
                 If Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新1").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新2").ToString Or
277
-               Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新3").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新4").ToString Or
278
-               Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新5").ToString Then : PA = "1"
216
+                   Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新3").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新4").ToString Or
217
+                   Strings.Right(執行檔版本號_lb.Text, 10) = dr("小更新5").ToString Then : PA = "1"
279 218
                 ElseIf Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新1").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新2").ToString Or
280
-                   Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新3").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新4").ToString Or
281
-                   Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新5").ToString Then : PA = "2"
219
+                       Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新3").ToString Or Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新4").ToString Or
220
+                       Strings.Right(執行檔版本號_lb.Text, 10) = dr("中更新5").ToString Then : PA = "2"
282 221
                 Else : PA = "3" : End If
283 222
             End If : conn.Close() : PA = "1"
284
-            Dim strDirName As String : Dim Strs As String = Application.StartupPath
285
-            If File.Exists(Strs & "\GF00UPDATE.txt") Then : File.Delete(Strs & "\GF00UPDATE.txt") : End If
286
-            strDirName = Strs & "\GF00UPDATE.txt"
223
+            Dim strDirName As String : filePath = Path.Combine(Application.StartupPath, "GF00UPDATE.txt")
224
+            If File.Exists(filePath) Then : File.Delete(filePath) : End If
225
+            strDirName = filePath
287 226
             Try
288 227
                 Using fs As IO.FileStream = New IO.FileStream(strDirName, FileMode.Append)
289 228
                     Using sw As StreamWriter = New StreamWriter(fs, Encoding.Default)
@@ -300,24 +239,15 @@ Public Class 登入畫面
300 239
     End Sub
301 240
     Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 確定_rbt.Click
302 241
         系統語言_cb.Text = "繁體中文"
303
-        If 系統語言_cb.Text = " " Or 系統語言_cb.Text = "" Then : MGB(對話框(9), 1)
304
-        Else
242
+        If 系統語言_cb.Text = " " Or 系統語言_cb.Text = "" Then : MGB(對話框(9), 1) : Else
305 243
             '-----電腦綁定判斷-------------------------------------------------------------------------------------------------------------------------------------------------------------
306 244
             If 登入綁定_ch.Checked = True Then
307 245
                 PA1 = MACKK : PA2 = diskId : PA3 = diskSerialNumber : PA4 = diskModel
308 246
                 SQL_電腦綁定()
309
-                If dr.Read() Then
310
-                    conn.Close() : 登入第一層()
311
-                Else
312
-                    If 帳號_rtb.Text = "b70340" Or 帳號_rtb.Text = "B70340" Then
313
-                        conn.Close() : 登入第一層()
314
-                    Else
315
-                        conn.Close() : MGB(對話框(6), 1) : Me.Close()
316
-                    End If
247
+                If dr.Read() Then : conn.Close() : 登入第一層() : Else
248
+                    If 帳號_rtb.Text = "b70340" Or 帳號_rtb.Text = "B70340" Then : conn.Close() : 登入第一層() : Else : conn.Close() : MGB(對話框(6), 1) : Me.Close() : End If
317 249
                 End If
318
-            Else
319
-                conn.Close() : 登入第一層()
320
-            End If
250
+            Else : conn.Close() : 登入第一層() : End If
321 251
         End If
322 252
     End Sub
323 253
     Private Sub 登入第一層()
@@ -327,7 +257,6 @@ Public Class 登入畫面
327 257
                     自動更新2()
328 258
                     登入程序() : 判斷重登 = False
329 259
                 Else
330
-                    MGB(對話框(1), 1)
331 260
                     登入程序() : 判斷重登 = False
332 261
                 End If
333 262
             Else
@@ -345,17 +274,11 @@ Public Class 登入畫面
345 274
             End If
346 275
         End If
347 276
     End Sub
348
-
349 277
     Private Sub 登入程序()
350 278
         If 帳號_rtb.Text = "" Then : MGB(對話框(2), 1) : ElseIf 帳號_rtb.Text <> "" Then
351 279
             If 帳號_rtb.Text = "" Then : MGB(對話框(3), 1) : ElseIf 帳號_rtb.Text <> "" Then
352 280
                 If 驗證_tb.Text = "1" Then
353 281
                     SQL_使用者級別宣告() : If dr.Read() Then : 登入人級別 = dr("級別").ToString : End If
354
-                    'SQL_系統預設值()
355
-                    'If dr.Read() Then
356
-                    '密碼時限 = dr("密碼重設天數") : 行政採購簽核級別基數 = dr("行政採購二級") : 建築採購簽核級別基數 = dr("建築採購二級")
357
-                    '比例1 = dr("比例1") : 比例2 = dr("比例2") : 比例3 = dr("比例3") : 分母 = dr("圖片伺服器上限") : 工程圖庫限制 = dr("圖片伺服器上限")
358
-                    'End If
359 282
                     SQL_使用者權限宣告()
360 283
                     If dr.Read() Then
361 284
                         密碼驗證_tb.Text = dr("密碼").ToString : 密碼日期_tb.Text = dr("密碼日期").ToString
@@ -374,35 +297,27 @@ Public Class 登入畫面
374 297
         End If
375 298
         conn.Close()
376 299
     End Sub
377
-
378 300
     Private Sub 進行下載_lb_Click(sender As Object, e As EventArgs) Handles 進行下載_lb.Click
379 301
         自動更新2()
380 302
     End Sub
381
-
382 303
     Private Sub 隱藏開關_lb_Click(sender As Object, e As EventArgs) Handles 隱藏開關_lb.Click
383 304
         輸入密碼.ShowDialog()
384 305
         If PA = "0003065795" Then
385 306
             PA = InputBox("請輸入啟動碼!!", "啟用系統", txt)
386
-            Dim strDirName As String : Dim Strs As String = Application.StartupPath
387
-            If File.Exists(Strs & "\TEST.txt") Then : File.Delete(Strs & "\TEST.txt") : End If
388
-            strDirName = Strs & "\TEST.txt"
307
+            Dim strDirName As String : Dim filePath As String = Path.Combine(Application.StartupPath, "TEST.txt")
308
+            If File.Exists(filePath) Then : File.Delete(filePath) : End If : strDirName = filePath
389 309
             Try
390 310
                 Using fs As IO.FileStream = New IO.FileStream(strDirName, FileMode.Append)
391 311
                     Using sw As StreamWriter = New StreamWriter(fs, Encoding.Default)
392 312
                         Dim str As String = PA
393 313
                         sw.WriteLine(str)   '插入一整行
394 314
                         sw.Flush()
395
-
396 315
                     End Using
397 316
                 End Using
398
-            Catch ex As Exception
399
-            End Try
317
+            Catch ex As Exception : End Try
400 318
             Application.Restart()
401
-        Else
402
-
403
-        End If
319
+        Else : End If
404 320
     End Sub
405
-
406 321
     Private Sub 登入第二層()
407 322
         If 密碼_rtb.Text = 密碼驗證_tb.Text Then
408 323
             If 密碼驗證_tb.Text = "" Then : MGB(對話框(5), 1)
@@ -414,53 +329,17 @@ Public Class 登入畫面
414 329
         End If
415 330
     End Sub
416 331
     Private Sub UsernameTextBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles 帳號_rtb.KeyPress
417
-        If e.KeyChar = ChrW(13) Then
418
-            Me.確定_rbt.PerformClick()
419
-        End If
332
+        If e.KeyChar = ChrW(13) Then : Me.確定_rbt.PerformClick() : End If
420 333
     End Sub
421 334
     Private Sub PasswordTextBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles 密碼_rtb.KeyPress
422
-        If e.KeyChar = ChrW(13) Then
423
-            Me.確定_rbt.PerformClick()
424
-        End If
425
-    End Sub
426
-    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
427
-        '-----------------------刪除自動更新項目-------------------------------------------------------------------------------------------------------------------------------------------
428
-        Dim 已開啟 As Boolean = False
429
-        Dim Strs As String = Application.StartupPath
430
-        If File.Exists(My.Computer.FileSystem.SpecialDirectories.Desktop & "\GF00-ERP-UPDATE.exe") Then
431
-            Dim pro() As Process = System.Diagnostics.Process.GetProcesses()
432
-            ' 判斷是否有符合的Process
433
-            For Each process As Process In pro
434
-                If ("GF00-ERP-UPDATE").Equals(process.ProcessName) Then
435
-                    已開啟 = True
436
-                End If
437
-            Next
438
-            If 已開啟 = False Then
439
-                Timer1.Enabled = False
440
-                If File.Exists(Str + "\GF00-ERP-UPDATE.exe") Then : File.Delete(Str + "\GF00-ERP-UPDATE.exe") : End If
441
-            End If
442
-        ElseIf File.Exists(Strs & "\GF00-ERP-UPDATE.exe") Then
443
-            Dim pro() As Process = System.Diagnostics.Process.GetProcesses()
444
-            ' 判斷是否有符合的Process
445
-            For Each process As Process In pro
446
-                If ("GF00-ERP-UPDATE").Equals(process.ProcessName) Then
447
-                    已開啟 = True
448
-                End If
449
-            Next
450
-            If 已開啟 = False Then
451
-                Timer1.Enabled = False
452
-                If File.Exists(Str + "\GF00-ERP-UPDATE.exe") Then : File.Delete(Str + "\GF00-ERP-UPDATE.exe") : End If
453
-            End If
454
-        End If
335
+        If e.KeyChar = ChrW(13) Then : Me.確定_rbt.PerformClick() : End If
455 336
     End Sub
456 337
     Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 取消_rbt.Click
457 338
         Me.Close()
458 339
     End Sub
459 340
     Private Sub 風格()
460
-
461 341
     End Sub
462 342
     Private Sub UsernameTextBox_TextChanged(sender As Object, e As EventArgs) Handles 帳號_rtb.TextChanged
463
-
464 343
         If IsNumeric(帳號_rtb.Text) = True Then
465 344
             If 帳號_rtb.Text.Length = 10 Then
466 345
                 SQL_刷卡登入()
@@ -472,7 +351,6 @@ Public Class 登入畫面
472 351
                 Me.確定_rbt.PerformClick() : Exit Sub
473 352
             End If
474 353
         End If
475
-
476 354
     End Sub
477 355
     Private Sub 語言轉換讀取()
478 356
         對話框(0) = "所選擇服務器不是台灣服務器,請連線該服務器所在網域的VPN,確保連線正常後重新選擇伺服器!"

正在加载...
取消
保存