siu 3 dagen geleden
bovenliggende
commit
7cc9974a6f
26 gewijzigde bestanden met toevoegingen van 781 en 281 verwijderingen
  1. BIN
      .vs/HF-MIS-SYS/FileContentIndex/0856b374-c354-4e37-88b5-d48f53e45463.vsidx
  2. BIN
      .vs/HF-MIS-SYS/FileContentIndex/0b5bd304-9d83-4f98-9871-efd9e08e6a0d.vsidx
  3. BIN
      .vs/HF-MIS-SYS/FileContentIndex/2e42556d-01c1-45cb-8573-41294478dc44.vsidx
  4. BIN
      .vs/HF-MIS-SYS/FileContentIndex/50a16c5e-622d-4caf-816a-2f63b985d015.vsidx
  5. BIN
      .vs/HF-MIS-SYS/FileContentIndex/72aea312-22d1-4980-8fac-1dc024437ff5.vsidx
  6. BIN
      .vs/HF-MIS-SYS/FileContentIndex/d9cf269d-56e6-405c-8d2b-3e24755f8f56.vsidx
  7. BIN
      .vs/HF-MIS-SYS/v17/.suo
  8. 52
    149
      .vs/HF-MIS-SYS/v17/DocumentLayout.json
  9. 33
    0
      HF-MIS-SYS/00、MyModule/SQL_登入與主程式.vb
  10. 183
    0
      HF-MIS-SYS/99、未分類/RFID綁定.Designer.vb
  11. 120
    0
      HF-MIS-SYS/99、未分類/RFID綁定.resx
  12. 238
    0
      HF-MIS-SYS/99、未分類/RFID綁定.vb
  13. 136
    128
      HF-MIS-SYS/HF-MIS-SYS.Designer.vb
  14. 4
    0
      HF-MIS-SYS/HF-MIS-SYS.vb
  15. 11
    1
      HF-MIS-SYS/HF-MIS-SYS.vbproj
  16. BIN
      HF-MIS-SYS/bin/Debug/HF-MIS-SYS.exe
  17. BIN
      HF-MIS-SYS/bin/Debug/HF-MIS-SYS.pdb
  18. 2
    2
      HF-MIS-SYS/bin/Debug/LGRemember.txt
  19. BIN
      HF-MIS-SYS/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache
  20. BIN
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.exe
  21. BIN
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.pdb
  22. BIN
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.AssemblyReference.cache
  23. 1
    1
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.CoreCompileInputs.cache
  24. 1
    0
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.FileListAbsolute.txt
  25. BIN
      HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.GenerateResource.cache
  26. BIN
      HF-MIS-SYS/obj/Debug/HF_MIS_SYS.RFID綁定.resources

BIN
.vs/HF-MIS-SYS/FileContentIndex/0856b374-c354-4e37-88b5-d48f53e45463.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/FileContentIndex/0b5bd304-9d83-4f98-9871-efd9e08e6a0d.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/FileContentIndex/2e42556d-01c1-45cb-8573-41294478dc44.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/FileContentIndex/50a16c5e-622d-4caf-816a-2f63b985d015.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/FileContentIndex/72aea312-22d1-4980-8fac-1dc024437ff5.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/FileContentIndex/d9cf269d-56e6-405c-8d2b-3e24755f8f56.vsidx Bestand weergeven


BIN
.vs/HF-MIS-SYS/v17/.suo Bestand weergeven


+ 52
- 149
.vs/HF-MIS-SYS/v17/DocumentLayout.json Bestand weergeven

@@ -3,56 +3,32 @@
3 3
   "WorkspaceRootPath": "D:\\hf-mis-sys-leehsiehjui\\",
4 4
   "Documents": [
5 5
     {
6
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\form1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
7
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\form1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
6
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\00\u3001mymodule\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
7
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\00\u3001mymodule\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
8 8
     },
9 9
     {
10
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
11
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
10
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\99\u3001\u672A\u5206\u985E\\rfid\u7D81\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
11
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\99\u3001\u672A\u5206\u985E\\rfid\u7D81\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
12 12
     },
13 13
     {
14
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
15
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
14
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\99\u3001\u672A\u5206\u985E\\rfid\u7D81\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
15
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\99\u3001\u672A\u5206\u985E\\rfid\u7D81\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
16 16
     },
17 17
     {
18
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
19
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
20
-    },
21
-    {
22
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
23
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
24
-    },
25
-    {
26
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
27
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
18
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
19
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
28 20
     },
29 21
     {
30
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\frmlogin.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
31
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\frmlogin.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
22
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
23
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
32 24
     },
33 25
     {
34
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\frmlogin.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
35
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\frmlogin.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
26
+      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
27
+      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
36 28
     },
37 29
     {
38 30
       "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
39 31
       "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
40
-    },
41
-    {
42
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|d:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
43
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
44
-    },
45
-    {
46
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
47
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
48
-    },
49
-    {
50
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
51
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
52
-    },
53
-    {
54
-      "AbsoluteMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|D:\\hf-mis-sys-leehsiehjui\\hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
55
-      "RelativeMoniker": "D:0:0:{27BD9242-5438-46F9-8941-94CE7FBAD7D8}|HF-MIS-SYS\\HF-MIS-SYS.vbproj|solutionrelative:hf-mis-sys\\hf-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
56 32
     }
57 33
   ],
58 34
   "DocumentGroupContainers": [
@@ -62,167 +38,94 @@
62 38
       "DocumentGroups": [
63 39
         {
64 40
           "DockedWidth": 200,
65
-          "SelectedChildIndex": 6,
41
+          "SelectedChildIndex": 0,
66 42
           "Children": [
67 43
             {
68 44
               "$type": "Document",
69
-              "DocumentIndex": 2,
70
-              "Title": "\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
71
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
72
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
73
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
74
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
75
-              "ViewState": "AQIAABUAAAAAAAAAAAAIwEkAAAAjAAAA",
45
+              "DocumentIndex": 0,
46
+              "Title": "SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
47
+              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\00\u3001MyModule\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
48
+              "RelativeDocumentMoniker": "HF-MIS-SYS\\00\u3001MyModule\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
49
+              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\00\u3001MyModule\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
50
+              "RelativeToolTip": "HF-MIS-SYS\\00\u3001MyModule\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
51
+              "ViewState": "AQIAAB8AAAAAAAAAAAAAAB4AAAAbAAAA",
76 52
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
77
-              "WhenOpened": "2025-04-11T07:21:16.742Z",
53
+              "WhenOpened": "2025-04-21T06:08:15.127Z",
78 54
               "EditorCaption": ""
79 55
             },
80
-            {
81
-              "$type": "Document",
82
-              "DocumentIndex": 5,
83
-              "Title": "\u8ACB\u5047\u7533\u8ACB.vb [\u8A2D\u8A08]",
84
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb",
85
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb",
86
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb [\u8A2D\u8A08]",
87
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8ACB\u5047\u7533\u8ACB.vb [\u8A2D\u8A08]",
88
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
89
-              "WhenOpened": "2025-04-11T06:17:00.016Z",
90
-              "EditorCaption": " [\u8A2D\u8A08]"
91
-            },
92 56
             {
93 57
               "$type": "Document",
94 58
               "DocumentIndex": 3,
95
-              "Title": "\u8003\u52E4\u660E\u7D30\u8868.vb",
96
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
97
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
98
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
99
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
100
-              "ViewState": "AQIAAAAAAAAAAAAAAAAAAG0AAABIAAAA",
59
+              "Title": "\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
60
+              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
61
+              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
62
+              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
63
+              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
64
+              "ViewState": "AQIAAC8AAAAAAAAAAAA3wEkAAABEAAAA",
101 65
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
102
-              "WhenOpened": "2025-04-10T07:25:22.987Z",
66
+              "WhenOpened": "2025-04-21T05:11:05.634Z",
103 67
               "EditorCaption": ""
104 68
             },
105 69
             {
106 70
               "$type": "Document",
107 71
               "DocumentIndex": 4,
108
-              "Title": "\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
109
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
110
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
111
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
112
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
113
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
114
-              "WhenOpened": "2025-04-10T07:25:21.725Z",
115
-              "EditorCaption": " [\u8A2D\u8A08]"
116
-            },
117
-            {
118
-              "$type": "Document",
119
-              "DocumentIndex": 6,
120
-              "Title": "frmLogin.vb",
121
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\frmLogin.vb",
122
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\frmLogin.vb",
123
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\frmLogin.vb",
124
-              "RelativeToolTip": "HF-MIS-SYS\\frmLogin.vb",
125
-              "ViewState": "AQIAAAwAAAAAAAAAAAAzwB8AAAAyAAAA",
126
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
127
-              "WhenOpened": "2025-04-10T06:00:07.187Z",
128
-              "EditorCaption": ""
129
-            },
130
-            {
131
-              "$type": "Document",
132
-              "DocumentIndex": 7,
133
-              "Title": "frmLogin.vb [\u8A2D\u8A08]",
134
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\frmLogin.vb",
135
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\frmLogin.vb",
136
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\frmLogin.vb [\u8A2D\u8A08]",
137
-              "RelativeToolTip": "HF-MIS-SYS\\frmLogin.vb [\u8A2D\u8A08]",
138
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
139
-              "WhenOpened": "2025-04-10T06:00:06.236Z",
140
-              "EditorCaption": " [\u8A2D\u8A08]"
141
-            },
142
-            {
143
-              "$type": "Document",
144
-              "DocumentIndex": 0,
145
-              "Title": "Form1.vb [\u8A2D\u8A08]",
146
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\Form1.vb",
147
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\Form1.vb",
148
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\Form1.vb [\u8A2D\u8A08]",
149
-              "RelativeToolTip": "HF-MIS-SYS\\Form1.vb [\u8A2D\u8A08]",
72
+              "Title": "\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb [\u8A2D\u8A08]",
73
+              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
74
+              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb",
75
+              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb [\u8A2D\u8A08]",
76
+              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u570B\u5B9A\u5047\u65E5\u8A2D\u5B9A.vb [\u8A2D\u8A08]",
150 77
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
151
-              "WhenOpened": "2025-04-10T06:00:04.741Z",
78
+              "WhenOpened": "2025-04-21T05:11:03.12Z",
152 79
               "EditorCaption": " [\u8A2D\u8A08]"
153 80
             },
154 81
             {
155 82
               "$type": "Document",
156 83
               "DocumentIndex": 1,
157
-              "Title": "\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
158
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
159
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
160
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
161
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
162
-              "ViewState": "AQIAAAAAAAAAAAAAAABAwAUAAACGAAAA",
84
+              "Title": "RFID\u7D81\u5B9A.vb",
85
+              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
86
+              "RelativeDocumentMoniker": "HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
87
+              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
88
+              "RelativeToolTip": "HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
89
+              "ViewState": "AQIAADwAAAAAAAAAAAAIwO0AAAAJAAAA",
163 90
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
164
-              "WhenOpened": "2025-04-10T01:34:01.906Z",
91
+              "WhenOpened": "2025-04-21T03:12:38.366Z",
165 92
               "EditorCaption": ""
166 93
             },
167 94
             {
168 95
               "$type": "Document",
169
-              "DocumentIndex": 11,
170
-              "Title": "\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb [\u8A2D\u8A08]",
171
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
172
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb",
173
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb [\u8A2D\u8A08]",
174
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868_\u7DE8\u8F2F.vb [\u8A2D\u8A08]",
96
+              "DocumentIndex": 2,
97
+              "Title": "RFID\u7D81\u5B9A.vb [\u8A2D\u8A08]",
98
+              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
99
+              "RelativeDocumentMoniker": "HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb",
100
+              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb [\u8A2D\u8A08]",
101
+              "RelativeToolTip": "HF-MIS-SYS\\99\u3001\u672A\u5206\u985E\\RFID\u7D81\u5B9A.vb [\u8A2D\u8A08]",
175 102
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
176
-              "WhenOpened": "2025-04-10T01:33:58.878Z",
103
+              "WhenOpened": "2025-04-21T03:12:24.822Z",
177 104
               "EditorCaption": " [\u8A2D\u8A08]"
178 105
             },
179 106
             {
180 107
               "$type": "Document",
181
-              "DocumentIndex": 9,
182
-              "Title": "\u88DC\u6253\u5361\u7533\u8ACB.vb",
183
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
184
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
185
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
186
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
187
-              "ViewState": "AQIAAFIAAAAAAAAAAAAgwJgAAAAIAAAA",
188
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
189
-              "WhenOpened": "2025-04-10T01:32:57.278Z",
190
-              "EditorCaption": ""
191
-            },
192
-            {
193
-              "$type": "Document",
194
-              "DocumentIndex": 10,
195
-              "Title": "\u88DC\u6253\u5361\u7533\u8ACB.vb [\u8A2D\u8A08]",
196
-              "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
197
-              "RelativeDocumentMoniker": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb",
198
-              "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb [\u8A2D\u8A08]",
199
-              "RelativeToolTip": "HF-MIS-SYS\\09\u3001\u4EBA\u8CC7\u7BA1\u7406\\\u88DC\u6253\u5361\u7533\u8ACB.vb [\u8A2D\u8A08]",
200
-              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
201
-              "WhenOpened": "2025-04-10T01:32:40.837Z"
202
-            },
203
-            {
204
-              "$type": "Document",
205
-              "DocumentIndex": 12,
108
+              "DocumentIndex": 5,
206 109
               "Title": "HF-MIS-SYS.vb",
207 110
               "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\HF-MIS-SYS.vb",
208 111
               "RelativeDocumentMoniker": "HF-MIS-SYS\\HF-MIS-SYS.vb",
209 112
               "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\HF-MIS-SYS.vb",
210 113
               "RelativeToolTip": "HF-MIS-SYS\\HF-MIS-SYS.vb",
114
+              "ViewState": "AQIAAJwAAAAAAAAAAAApwL4AAAALAAAA",
211 115
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
212 116
               "WhenOpened": "2025-04-09T11:04:57.104Z",
213 117
               "EditorCaption": ""
214 118
             },
215 119
             {
216 120
               "$type": "Document",
217
-              "DocumentIndex": 8,
121
+              "DocumentIndex": 6,
218 122
               "Title": "HF-MIS-SYS.vb [\u8A2D\u8A08]",
219 123
               "DocumentMoniker": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\HF-MIS-SYS.vb",
220 124
               "RelativeDocumentMoniker": "HF-MIS-SYS\\HF-MIS-SYS.vb",
221 125
               "ToolTip": "D:\\hf-mis-sys-leehsiehjui\\HF-MIS-SYS\\HF-MIS-SYS.vb [\u8A2D\u8A08]",
222 126
               "RelativeToolTip": "HF-MIS-SYS\\HF-MIS-SYS.vb [\u8A2D\u8A08]",
223 127
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
224
-              "WhenOpened": "2025-04-09T10:57:43.311Z",
225
-              "EditorCaption": " [\u8A2D\u8A08]"
128
+              "WhenOpened": "2025-04-09T10:57:43.311Z"
226 129
             }
227 130
           ]
228 131
         }

+ 33
- 0
HF-MIS-SYS/00、MyModule/SQL_登入與主程式.vb Bestand weergeven

@@ -15,4 +15,37 @@
15 15
     Friend Sub SQL_系統版本號驗證()
16 16
         ConnOpen() : SQL1 = "SELECT 系統認證版本號 FROM 版本號管理 " : CmdSet_For_dr()
17 17
     End Sub
18
+
19
+    Friend Sub SQL_RFID卡號新增(卡號 As String)
20
+        ConnOpen() : SQL1 = "INSERT INTO  綁定RFID (RFID卡號,流程卡號) VALUES (N'" & 卡號 & "',N'')" : CmdSet_For_dr()
21
+    End Sub
22
+
23
+    Friend Sub SQL_RFID卡號查詢(卡號 As String)
24
+        ConnOpen() : SQL1 = "SELECT RFID卡號,流程卡號 FROM 綁定RFID WHERE (RFID卡號 = '" & 卡號 & "') " : CmdSet_For_dr()
25
+    End Sub
26
+
27
+    Friend Sub SQL_RFID卡號重製(卡號 As String)
28
+        ConnOpen() : SQL1 = "UPDATE 綁定RFID SET 流程卡號 = '' WHERE (RFID卡號 = '" & 卡號 & "') " : CmdSet_For_dr()
29
+    End Sub
30
+
31
+    Friend Sub SQL_RFID卡號綁定(RFID As String, 流程卡號 As String)
32
+        ConnOpen() : SQL1 = "UPDATE 綁定RFID SET 流程卡號 = '" & 流程卡號 & "' WHERE (RFID卡號 = '" & RFID & "') " : CmdSet_For_dr()
33
+    End Sub
34
+
35
+    Friend Sub SQL_流程卡號判斷(流程卡號 As String)
36
+        ConnOpen() : SQL1 = "SELECT     日期, 品名, 选级, 重量, 流程卡号, 片数, 开削, CASE WHEN 片数 <> 0 THEN CAST(重量 / 片数 AS numeric(10, 2)) ELSE 0 END AS 平均, 表格编号, QQ.Card_純卡號
37
+                 FROM     (SELECT    TOP (200) date AS 日期, name AS 品名, selection AS 选级, AVG(weight) AS 重量, 
38
+                                     CASE WHEN CHARINDEX(' ', no) > 0 THEN SUBSTRING(no, 1, CHARINDEX(' ', no) - 1) ELSE no END AS 流程卡号, 
39
+                                     CASE WHEN CHARINDEX(' ', no) > 0 THEN REPLACE(SUBSTRING(no, CHARINDEX(' ', no) + 1, LEN(no)), 'P', '') ELSE '' END AS 片数, 
40
+                                     spec AS 开削, rcp_no AS 表格编号
41
+                           FROM      HT_RetanRcp 
42
+                           GROUP BY  name, date, selection, rcp_no, no, spec
43
+                           ORDER BY  日期 DESC, 片数 DESC) AS z LEFT OUTER JOIN
44
+                          (SELECT    LEFT(Card, CASE WHEN CHARINDEX(' ', Card) > 0 THEN CHARINDEX(' ', Card) - 1 ELSE LEN(Card) END) AS Card_純卡號
45
+                           FROM      HT_Retan_Chem_Out
46
+                           GROUP BY  LEFT(Card, CASE WHEN CHARINDEX(' ', Card) > 0 THEN CHARINDEX(' ', Card) - 1 ELSE LEN(Card) END)) AS QQ ON z.流程卡号 = QQ.Card_純卡號
47
+                 WHERE    (日期 NOT LIKE N'1900-01-01') AND (流程卡号  LIKE N'" & 流程卡號 & "')
48
+                 ORDER BY  日期 DESC"
49
+        CmdSet_For_dr()
50
+    End Sub
18 51
 End Module

+ 183
- 0
HF-MIS-SYS/99、未分類/RFID綁定.Designer.vb Bestand weergeven

@@ -0,0 +1,183 @@
1
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
2
+Partial Class RFID綁定
3
+    Inherits System.Windows.Forms.Form
4
+
5
+    'Form 覆寫 Dispose 以清除元件清單。
6
+    <System.Diagnostics.DebuggerNonUserCode()> _
7
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
8
+        Try
9
+            If disposing AndAlso components IsNot Nothing Then
10
+                components.Dispose()
11
+            End If
12
+        Finally
13
+            MyBase.Dispose(disposing)
14
+        End Try
15
+    End Sub
16
+
17
+    '為 Windows Form 設計工具的必要項
18
+    Private components As System.ComponentModel.IContainer
19
+
20
+    '注意: 以下為 Windows Form 設計工具所需的程序
21
+    '可以使用 Windows Form 設計工具進行修改。
22
+    '請勿使用程式碼編輯器進行修改。
23
+    <System.Diagnostics.DebuggerStepThrough()> _
24
+    Private Sub InitializeComponent()
25
+        Me.ComboBox1 = New System.Windows.Forms.ComboBox()
26
+        Me.Label1 = New System.Windows.Forms.Label()
27
+        Me.開始_bt = New System.Windows.Forms.Button()
28
+        Me.停止_bt = New System.Windows.Forms.Button()
29
+        Me.RFID_tb = New System.Windows.Forms.TextBox()
30
+        Me.Label2 = New System.Windows.Forms.Label()
31
+        Me.Label3 = New System.Windows.Forms.Label()
32
+        Me.流程卡號_tb = New System.Windows.Forms.TextBox()
33
+        Me.重製_bt = New System.Windows.Forms.Button()
34
+        Me.綁定_bt = New System.Windows.Forms.Button()
35
+        Me.新增_bt = New System.Windows.Forms.Button()
36
+        Me.查詢_bt = New System.Windows.Forms.Button()
37
+        Me.SuspendLayout()
38
+        '
39
+        'ComboBox1
40
+        '
41
+        Me.ComboBox1.FormattingEnabled = True
42
+        Me.ComboBox1.Items.AddRange(New Object() {"COM1", "COM2", "COM3", "COM4", "COM5", "COM6", "COM7", "COM8", "COM9", "COM10", "COM11", "COM12"})
43
+        Me.ComboBox1.Location = New System.Drawing.Point(64, 24)
44
+        Me.ComboBox1.Name = "ComboBox1"
45
+        Me.ComboBox1.Size = New System.Drawing.Size(474, 24)
46
+        Me.ComboBox1.TabIndex = 0
47
+        '
48
+        'Label1
49
+        '
50
+        Me.Label1.AutoSize = True
51
+        Me.Label1.Location = New System.Drawing.Point(5, 28)
52
+        Me.Label1.Name = "Label1"
53
+        Me.Label1.Size = New System.Drawing.Size(55, 16)
54
+        Me.Label1.TabIndex = 2
55
+        Me.Label1.Text = "串        口"
56
+        '
57
+        '開始_bt
58
+        '
59
+        Me.開始_bt.Location = New System.Drawing.Point(544, 24)
60
+        Me.開始_bt.Name = "開始_bt"
61
+        Me.開始_bt.Size = New System.Drawing.Size(75, 24)
62
+        Me.開始_bt.TabIndex = 4
63
+        Me.開始_bt.Text = "開始"
64
+        Me.開始_bt.UseVisualStyleBackColor = True
65
+        '
66
+        '停止_bt
67
+        '
68
+        Me.停止_bt.Location = New System.Drawing.Point(625, 24)
69
+        Me.停止_bt.Name = "停止_bt"
70
+        Me.停止_bt.Size = New System.Drawing.Size(75, 24)
71
+        Me.停止_bt.TabIndex = 5
72
+        Me.停止_bt.Text = "停止"
73
+        Me.停止_bt.UseVisualStyleBackColor = True
74
+        '
75
+        'RFID_tb
76
+        '
77
+        Me.RFID_tb.Location = New System.Drawing.Point(64, 54)
78
+        Me.RFID_tb.Name = "RFID_tb"
79
+        Me.RFID_tb.ReadOnly = True
80
+        Me.RFID_tb.Size = New System.Drawing.Size(474, 23)
81
+        Me.RFID_tb.TabIndex = 6
82
+        '
83
+        'Label2
84
+        '
85
+        Me.Label2.AutoSize = True
86
+        Me.Label2.Location = New System.Drawing.Point(5, 59)
87
+        Me.Label2.Name = "Label2"
88
+        Me.Label2.Size = New System.Drawing.Size(57, 16)
89
+        Me.Label2.TabIndex = 7
90
+        Me.Label2.Text = "RFID卡號"
91
+        '
92
+        'Label3
93
+        '
94
+        Me.Label3.AutoSize = True
95
+        Me.Label3.Location = New System.Drawing.Point(5, 94)
96
+        Me.Label3.Name = "Label3"
97
+        Me.Label3.Size = New System.Drawing.Size(55, 16)
98
+        Me.Label3.TabIndex = 8
99
+        Me.Label3.Text = "流程卡號"
100
+        '
101
+        '流程卡號_tb
102
+        '
103
+        Me.流程卡號_tb.Location = New System.Drawing.Point(66, 87)
104
+        Me.流程卡號_tb.Name = "流程卡號_tb"
105
+        Me.流程卡號_tb.Size = New System.Drawing.Size(472, 23)
106
+        Me.流程卡號_tb.TabIndex = 9
107
+        '
108
+        '重製_bt
109
+        '
110
+        Me.重製_bt.Location = New System.Drawing.Point(625, 87)
111
+        Me.重製_bt.Name = "重製_bt"
112
+        Me.重製_bt.Size = New System.Drawing.Size(75, 24)
113
+        Me.重製_bt.TabIndex = 10
114
+        Me.重製_bt.Text = "重製"
115
+        Me.重製_bt.UseVisualStyleBackColor = True
116
+        '
117
+        '綁定_bt
118
+        '
119
+        Me.綁定_bt.Location = New System.Drawing.Point(544, 87)
120
+        Me.綁定_bt.Name = "綁定_bt"
121
+        Me.綁定_bt.Size = New System.Drawing.Size(75, 24)
122
+        Me.綁定_bt.TabIndex = 11
123
+        Me.綁定_bt.Text = "綁定"
124
+        Me.綁定_bt.UseVisualStyleBackColor = True
125
+        '
126
+        '新增_bt
127
+        '
128
+        Me.新增_bt.Location = New System.Drawing.Point(625, 54)
129
+        Me.新增_bt.Name = "新增_bt"
130
+        Me.新增_bt.Size = New System.Drawing.Size(75, 24)
131
+        Me.新增_bt.TabIndex = 12
132
+        Me.新增_bt.Text = "新增"
133
+        Me.新增_bt.UseVisualStyleBackColor = True
134
+        '
135
+        '查詢_bt
136
+        '
137
+        Me.查詢_bt.Location = New System.Drawing.Point(544, 54)
138
+        Me.查詢_bt.Name = "查詢_bt"
139
+        Me.查詢_bt.Size = New System.Drawing.Size(75, 24)
140
+        Me.查詢_bt.TabIndex = 13
141
+        Me.查詢_bt.Text = "查詢"
142
+        Me.查詢_bt.UseVisualStyleBackColor = True
143
+        '
144
+        'RFID綁定
145
+        '
146
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
147
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
148
+        Me.ClientSize = New System.Drawing.Size(708, 127)
149
+        Me.Controls.Add(Me.查詢_bt)
150
+        Me.Controls.Add(Me.新增_bt)
151
+        Me.Controls.Add(Me.綁定_bt)
152
+        Me.Controls.Add(Me.重製_bt)
153
+        Me.Controls.Add(Me.流程卡號_tb)
154
+        Me.Controls.Add(Me.Label3)
155
+        Me.Controls.Add(Me.Label2)
156
+        Me.Controls.Add(Me.RFID_tb)
157
+        Me.Controls.Add(Me.停止_bt)
158
+        Me.Controls.Add(Me.開始_bt)
159
+        Me.Controls.Add(Me.Label1)
160
+        Me.Controls.Add(Me.ComboBox1)
161
+        Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
162
+        Me.Margin = New System.Windows.Forms.Padding(4)
163
+        Me.Name = "RFID綁定"
164
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
165
+        Me.Text = "RFID綁定"
166
+        Me.ResumeLayout(False)
167
+        Me.PerformLayout()
168
+
169
+    End Sub
170
+
171
+    Friend WithEvents ComboBox1 As ComboBox
172
+    Friend WithEvents Label1 As Label
173
+    Friend WithEvents 開始_bt As Button
174
+    Friend WithEvents 停止_bt As Button
175
+    Friend WithEvents RFID_tb As TextBox
176
+    Friend WithEvents Label2 As Label
177
+    Friend WithEvents Label3 As Label
178
+    Friend WithEvents 流程卡號_tb As TextBox
179
+    Friend WithEvents 重製_bt As Button
180
+    Friend WithEvents 綁定_bt As Button
181
+    Friend WithEvents 新增_bt As Button
182
+    Friend WithEvents 查詢_bt As Button
183
+End Class

+ 120
- 0
HF-MIS-SYS/99、未分類/RFID綁定.resx Bestand weergeven

@@ -0,0 +1,120 @@
1
+<?xml version="1.0" encoding="utf-8"?>
2
+<root>
3
+  <!-- 
4
+    Microsoft ResX Schema 
5
+    
6
+    Version 2.0
7
+    
8
+    The primary goals of this format is to allow a simple XML format 
9
+    that is mostly human readable. The generation and parsing of the 
10
+    various data types are done through the TypeConverter classes 
11
+    associated with the data types.
12
+    
13
+    Example:
14
+    
15
+    ... ado.net/XML headers & schema ...
16
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
17
+    <resheader name="version">2.0</resheader>
18
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
19
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
20
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
21
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
22
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
23
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
24
+    </data>
25
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
26
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
27
+        <comment>This is a comment</comment>
28
+    </data>
29
+                
30
+    There are any number of "resheader" rows that contain simple 
31
+    name/value pairs.
32
+    
33
+    Each data row contains a name, and value. The row also contains a 
34
+    type or mimetype. Type corresponds to a .NET class that support 
35
+    text/value conversion through the TypeConverter architecture. 
36
+    Classes that don't support this are serialized and stored with the 
37
+    mimetype set.
38
+    
39
+    The mimetype is used for serialized objects, and tells the 
40
+    ResXResourceReader how to depersist the object. This is currently not 
41
+    extensible. For a given mimetype the value must be set accordingly:
42
+    
43
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
44
+    that the ResXResourceWriter will generate, however the reader can 
45
+    read any of the formats listed below.
46
+    
47
+    mimetype: application/x-microsoft.net.object.binary.base64
48
+    value   : The object must be serialized with 
49
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
50
+            : and then encoded with base64 encoding.
51
+    
52
+    mimetype: application/x-microsoft.net.object.soap.base64
53
+    value   : The object must be serialized with 
54
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
55
+            : and then encoded with base64 encoding.
56
+
57
+    mimetype: application/x-microsoft.net.object.bytearray.base64
58
+    value   : The object must be serialized into a byte array 
59
+            : using a System.ComponentModel.TypeConverter
60
+            : and then encoded with base64 encoding.
61
+    -->
62
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
63
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
64
+    <xsd:element name="root" msdata:IsDataSet="true">
65
+      <xsd:complexType>
66
+        <xsd:choice maxOccurs="unbounded">
67
+          <xsd:element name="metadata">
68
+            <xsd:complexType>
69
+              <xsd:sequence>
70
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
71
+              </xsd:sequence>
72
+              <xsd:attribute name="name" use="required" type="xsd:string" />
73
+              <xsd:attribute name="type" type="xsd:string" />
74
+              <xsd:attribute name="mimetype" type="xsd:string" />
75
+              <xsd:attribute ref="xml:space" />
76
+            </xsd:complexType>
77
+          </xsd:element>
78
+          <xsd:element name="assembly">
79
+            <xsd:complexType>
80
+              <xsd:attribute name="alias" type="xsd:string" />
81
+              <xsd:attribute name="name" type="xsd:string" />
82
+            </xsd:complexType>
83
+          </xsd:element>
84
+          <xsd:element name="data">
85
+            <xsd:complexType>
86
+              <xsd:sequence>
87
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
88
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
89
+              </xsd:sequence>
90
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
91
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
92
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
93
+              <xsd:attribute ref="xml:space" />
94
+            </xsd:complexType>
95
+          </xsd:element>
96
+          <xsd:element name="resheader">
97
+            <xsd:complexType>
98
+              <xsd:sequence>
99
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
100
+              </xsd:sequence>
101
+              <xsd:attribute name="name" type="xsd:string" use="required" />
102
+            </xsd:complexType>
103
+          </xsd:element>
104
+        </xsd:choice>
105
+      </xsd:complexType>
106
+    </xsd:element>
107
+  </xsd:schema>
108
+  <resheader name="resmimetype">
109
+    <value>text/microsoft-resx</value>
110
+  </resheader>
111
+  <resheader name="version">
112
+    <value>2.0</value>
113
+  </resheader>
114
+  <resheader name="reader">
115
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
116
+  </resheader>
117
+  <resheader name="writer">
118
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
119
+  </resheader>
120
+</root>

+ 238
- 0
HF-MIS-SYS/99、未分類/RFID綁定.vb Bestand weergeven

@@ -0,0 +1,238 @@
1
+
2
+
3
+Imports System.IO.Ports
4
+
5
+Imports System.Text
6
+Imports System.Threading
7
+Imports System.Management
8
+
9
+Public Class RFID綁定
10
+    Dim serialPort As SerialPort
11
+    Dim readThread As Thread
12
+    Dim keepReading As Boolean = False
13
+    Private Sub RFID綁定_Load(sender As Object, e As EventArgs) Handles MyBase.Load
14
+        ComboBox1.Items.Clear()
15
+
16
+        Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_PnPEntity WHERE Name LIKE '%(COM%'")
17
+
18
+        For Each obj As ManagementObject In searcher.Get()
19
+            Dim name As String = obj("Name").ToString() ' 例如:Prolific USB-to-Serial Comm Port (COM3)
20
+            ComboBox1.Items.Add(name)
21
+        Next
22
+
23
+        If ComboBox1.Items.Count > 0 Then
24
+            ComboBox1.SelectedIndex = 0
25
+        End If
26
+        開始_bt.Enabled = True
27
+        停止_bt.Enabled = False
28
+    End Sub
29
+    Private Sub Button_Open_Click(sender As Object, e As EventArgs) Handles 開始_bt.Click
30
+        Try
31
+            If ComboBox1.SelectedItem Is Nothing Then
32
+                MsgBox("請先選擇一個 COM Port")
33
+                Return
34
+            End If
35
+
36
+            Dim selectedText As String = ComboBox1.SelectedItem.ToString()
37
+
38
+            ' 從字串中擷取 COM Port(例如:從 "Prolific USB-to-Serial Comm Port (COM3)" 取出 "COM3")
39
+            Dim startIdx As Integer = selectedText.LastIndexOf("(COM")
40
+            Dim endIdx As Integer = selectedText.LastIndexOf(")")
41
+
42
+            If startIdx = -1 OrElse endIdx = -1 OrElse endIdx <= startIdx Then
43
+                MsgBox("無法解析 COM Port 名稱")
44
+                Return
45
+            End If
46
+
47
+            Dim comPort As String = selectedText.Substring(startIdx + 1, endIdx - startIdx - 1) ' 取出 COM3
48
+
49
+            serialPort = New SerialPort(comPort, 38400, Parity.None, 8, StopBits.One)
50
+            serialPort.ReadTimeout = 1000
51
+            serialPort.WriteTimeout = 1000
52
+            serialPort.Open()
53
+
54
+            SendCommand("Q")
55
+            Dim readerId As String = ReadResponse()
56
+
57
+            If readerId.Trim() = "" Then
58
+                MsgBox("連線失敗:選到的 COM port 不是 RFID 裝置")
59
+                serialPort.Close()
60
+                Return
61
+            End If
62
+
63
+            keepReading = True
64
+            readThread = New Thread(AddressOf ReadLoop)
65
+            readThread.IsBackground = True
66
+            readThread.Start()
67
+
68
+            開始_bt.Enabled = False
69
+            停止_bt.Enabled = True
70
+        Catch ex As Exception
71
+            MsgBox("連線失敗:" & ex.Message)
72
+        End Try
73
+    End Sub
74
+
75
+    Private Sub Button_Close_Click(sender As Object, e As EventArgs) Handles 停止_bt.Click
76
+        Try
77
+            keepReading = False
78
+
79
+            If readThread IsNot Nothing AndAlso readThread.IsAlive Then
80
+                ' 等最多1秒
81
+                If Not readThread.Join(1000) Then
82
+                    readThread.Abort() ' ⚠️ 避免卡住(.NET Framework 才能用)
83
+                End If
84
+            End If
85
+
86
+            If serialPort IsNot Nothing AndAlso serialPort.IsOpen Then
87
+                serialPort.Close()
88
+            End If
89
+
90
+            RFID_tb.Text = "" : 流程卡號_tb.Text = ""
91
+            開始_bt.Enabled = True
92
+            停止_bt.Enabled = False
93
+            MsgBox("已斷開連線")
94
+        Catch ex As Exception
95
+            MsgBox("關閉失敗:" & ex.Message)
96
+        End Try
97
+    End Sub
98
+
99
+    Sub SendCommand(ByVal command As String)
100
+        If serialPort Is Nothing OrElse Not serialPort.IsOpen Then Return
101
+
102
+        Dim cmdBytes As Byte() = Encoding.ASCII.GetBytes(command)
103
+        Dim fullCmd(cmdBytes.Length + 1) As Byte
104
+        fullCmd(0) = &HA
105
+        Array.Copy(cmdBytes, 0, fullCmd, 1, cmdBytes.Length)
106
+        fullCmd(fullCmd.Length - 1) = &HD
107
+
108
+        serialPort.Write(fullCmd, 0, fullCmd.Length)
109
+        Thread.Sleep(200)
110
+    End Sub
111
+
112
+    Function ReadResponse() As String
113
+        Dim sb As New StringBuilder()
114
+        Try
115
+            While serialPort.BytesToRead > 0
116
+                Dim buf(serialPort.BytesToRead - 1) As Byte
117
+                serialPort.Read(buf, 0, buf.Length)
118
+                sb.Append(Encoding.ASCII.GetString(buf))
119
+                Thread.Sleep(100)
120
+            End While
121
+        Catch
122
+            ' Timeout 時會進入這裡
123
+        End Try
124
+        Return sb.ToString()
125
+    End Function
126
+
127
+    Sub ReadLoop()
128
+        Try
129
+            While keepReading
130
+                Try
131
+                    SendCommand("Q")
132
+                    Dim response As String = ReadResponse().Trim()
133
+
134
+                    If response.StartsWith("Q") Then
135
+                        response = response.Substring(1).Trim()
136
+                    End If
137
+
138
+                    Me.Invoke(Sub()
139
+                                  If response = "" Then
140
+                                      RFID_tb.Text = "未讀取到卡片"
141
+                                  Else
142
+                                      RFID_tb.Text = response
143
+                                  End If
144
+                              End Sub)
145
+
146
+                Catch ex As Exception
147
+                    ' 忽略錯誤或寫 log
148
+                End Try
149
+                Thread.Sleep(1000)
150
+            End While
151
+        Catch ex As Exception
152
+            ' 如果執行緒真的出錯,也不要讓它卡住
153
+        End Try
154
+    End Sub
155
+
156
+    Private Sub 查詢_bt_Click(sender As Object, e As EventArgs) Handles 查詢_bt.Click
157
+        If RFID_tb.Text = "" Or RFID_tb.Text = "未讀取到卡片" Then
158
+            MsgBox("未讀取到卡片")
159
+        Else
160
+            SQL_RFID卡號查詢(RFID_tb.Text)
161
+            If dr.Read() Then
162
+                If dr("流程卡號").ToString() = "" Then
163
+                    流程卡號_tb.Text = "" : MsgBox("此RFID卡號無綁定流程卡號")
164
+                Else
165
+                    流程卡號_tb.Text = dr("流程卡號").ToString()
166
+                End If
167
+            Else
168
+                流程卡號_tb.Text = "" : MsgBox("資料庫中無此RFID卡號")
169
+            End If
170
+            conn.Close()
171
+        End If
172
+    End Sub
173
+
174
+    Private Sub 新增_bt_Click(sender As Object, e As EventArgs) Handles 新增_bt.Click
175
+        If RFID_tb.Text = "" Or RFID_tb.Text = "未讀取到卡片" Then
176
+            MsgBox("未讀取到卡片")
177
+        Else
178
+            SQL_RFID卡號查詢(RFID_tb.Text)
179
+            If dr.Read() Then
180
+                MsgBox("此RFID卡號已在資料庫中")
181
+            Else
182
+                SQL_RFID卡號新增(RFID_tb.Text) : 流程卡號_tb.Text = "" : MsgBox("RFID卡號成功加到資料庫")
183
+            End If
184
+            conn.Close()
185
+        End If
186
+    End Sub
187
+
188
+    Private Sub 綁定_bt_Click(sender As Object, e As EventArgs) Handles 綁定_bt.Click
189
+        If RFID_tb.Text = "" Or RFID_tb.Text = "未讀取到卡片" Then
190
+            MsgBox("未讀取到卡片")
191
+        Else
192
+            Dim card As String = ""
193
+            SQL_RFID卡號查詢(RFID_tb.Text)
194
+            If dr.Read() Then
195
+                card = dr("流程卡號").ToString()
196
+            Else
197
+                SQL_RFID卡號新增(RFID_tb.Text)
198
+            End If
199
+            conn.Close()
200
+            If 流程卡號_tb.Text = "" Then
201
+                MsgBox("流程卡號不能為空")
202
+            Else
203
+                SQL_流程卡號判斷(流程卡號_tb.Text)
204
+                If dr.Read() Then
205
+                    If card = "" Then
206
+                        SQL_RFID卡號綁定(RFID_tb.Text, 流程卡號_tb.Text)
207
+                        MsgBox("綁定成功")
208
+                    Else
209
+                        Dim result As DialogResult = MessageBox.Show("此RFID卡號已經有綁定流程卡號,是否進行覆蓋", "請選擇", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
210
+                        If result = DialogResult.Yes Then
211
+                            SQL_RFID卡號綁定(RFID_tb.Text, 流程卡號_tb.Text)
212
+                            MsgBox("綁定成功")
213
+                        End If
214
+                    End If
215
+                Else
216
+                    MsgBox("資料庫中無此流程卡號")
217
+                End If
218
+            End If
219
+            conn.Close()
220
+
221
+        End If
222
+    End Sub
223
+
224
+    Private Sub 重製_bt_Click(sender As Object, e As EventArgs) Handles 重製_bt.Click
225
+        If RFID_tb.Text = "" Or RFID_tb.Text = "未讀取到卡片" Then
226
+            MsgBox("未讀取到卡片")
227
+        Else
228
+            SQL_RFID卡號查詢(RFID_tb.Text)
229
+            If dr.Read() Then
230
+                SQL_RFID卡號重製(RFID_tb.Text) : 流程卡號_tb.Text = ""
231
+                MsgBox("將此RFID卡號的綁定的流程卡號重製")
232
+            Else
233
+                MsgBox("資料庫中無此RFID卡號")
234
+            End If
235
+            conn.Close()
236
+        End If
237
+    End Sub
238
+End Class

+ 136
- 128
HF-MIS-SYS/HF-MIS-SYS.Designer.vb Bestand weergeven

@@ -102,6 +102,16 @@ Partial Class FrmMDI
102 102
         Me.备查帐_tsm = New System.Windows.Forms.ToolStripMenuItem()
103 103
         Me.备查帐汇总_tsm = New System.Windows.Forms.ToolStripMenuItem()
104 104
         Me.人資管理_tsm = New System.Windows.Forms.ToolStripMenuItem()
105
+        Me.考勤明細表_tsm = New System.Windows.Forms.ToolStripMenuItem()
106
+        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
107
+        Me.補打卡申請_tsm = New System.Windows.Forms.ToolStripMenuItem()
108
+        Me.補打卡審核_tsm = New System.Windows.Forms.ToolStripMenuItem()
109
+        Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
110
+        Me.請假申請_tsm = New System.Windows.Forms.ToolStripMenuItem()
111
+        Me.請假核准_tsm = New System.Windows.Forms.ToolStripMenuItem()
112
+        Me.請假歷史資料_tsm = New System.Windows.Forms.ToolStripMenuItem()
113
+        Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
114
+        Me.國定假日設定_tsm = New System.Windows.Forms.ToolStripMenuItem()
105 115
         Me.考勤資料庫設定_tsm = New System.Windows.Forms.ToolStripMenuItem()
106 116
         Me.其他1_tsm = New System.Windows.Forms.ToolStripMenuItem()
107 117
         Me.汇入数据1_tsm = New System.Windows.Forms.ToolStripMenuItem()
@@ -123,16 +133,7 @@ Partial Class FrmMDI
123 133
         Me.ToolStripProgressBar1 = New System.Windows.Forms.ToolStripProgressBar()
124 134
         Me.Token_TSSL = New System.Windows.Forms.ToolStripStatusLabel()
125 135
         Me.參照更新 = New System.Windows.Forms.Timer(Me.components)
126
-        Me.考勤明細表_tsm = New System.Windows.Forms.ToolStripMenuItem()
127
-        Me.請假申請_tsm = New System.Windows.Forms.ToolStripMenuItem()
128
-        Me.請假核准_tsm = New System.Windows.Forms.ToolStripMenuItem()
129
-        Me.請假歷史資料_tsm = New System.Windows.Forms.ToolStripMenuItem()
130
-        Me.國定假日設定_tsm = New System.Windows.Forms.ToolStripMenuItem()
131
-        Me.補打卡申請_tsm = New System.Windows.Forms.ToolStripMenuItem()
132
-        Me.補打卡審核_tsm = New System.Windows.Forms.ToolStripMenuItem()
133
-        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
134
-        Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
135
-        Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
136
+        Me.測試ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
136 137
         Me.MenuStrip1.SuspendLayout()
137 138
         Me.StatusStrip.SuspendLayout()
138 139
         Me.SuspendLayout()
@@ -177,7 +178,7 @@ Partial Class FrmMDI
177 178
         '
178 179
         Me.CloseAllToolStripMenuItem.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
179 180
         Me.CloseAllToolStripMenuItem.Name = "CloseAllToolStripMenuItem"
180
-        Me.CloseAllToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
181
+        Me.CloseAllToolStripMenuItem.Size = New System.Drawing.Size(136, 22)
181 182
         Me.CloseAllToolStripMenuItem.Text = "全部關閉(&L)"
182 183
         '
183 184
         '业务管理_tsm
@@ -192,7 +193,7 @@ Partial Class FrmMDI
192 193
         '
193 194
         Me.订单控制表_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
194 195
         Me.订单控制表_tsm.Name = "订单控制表_tsm"
195
-        Me.订单控制表_tsm.Size = New System.Drawing.Size(184, 26)
196
+        Me.订单控制表_tsm.Size = New System.Drawing.Size(134, 22)
196 197
         Me.订单控制表_tsm.Text = "订单控制表"
197 198
         '
198 199
         '销货控制表_tsm
@@ -200,7 +201,7 @@ Partial Class FrmMDI
200 201
         Me.销货控制表_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
201 202
         Me.销货控制表_tsm.Name = "销货控制表_tsm"
202 203
         Me.销货控制表_tsm.RightToLeftAutoMirrorImage = True
203
-        Me.销货控制表_tsm.Size = New System.Drawing.Size(184, 26)
204
+        Me.销货控制表_tsm.Size = New System.Drawing.Size(134, 22)
204 205
         Me.销货控制表_tsm.Text = "销货控制表"
205 206
         '
206 207
         '皮料管理_tsm
@@ -214,104 +215,104 @@ Partial Class FrmMDI
214 215
         '蓝皮_tsm
215 216
         '
216 217
         Me.蓝皮_tsm.Name = "蓝皮_tsm"
217
-        Me.蓝皮_tsm.Size = New System.Drawing.Size(184, 26)
218
+        Me.蓝皮_tsm.Size = New System.Drawing.Size(151, 22)
218 219
         Me.蓝皮_tsm.Text = "蓝皮"
219 220
         '
220 221
         '在制品_tsm
221 222
         '
222 223
         Me.在制品_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.leather
223 224
         Me.在制品_tsm.Name = "在制品_tsm"
224
-        Me.在制品_tsm.Size = New System.Drawing.Size(184, 26)
225
+        Me.在制品_tsm.Size = New System.Drawing.Size(151, 22)
225 226
         Me.在制品_tsm.Text = "在制品"
226 227
         '
227 228
         '每日发货_tsm
228 229
         '
229 230
         Me.每日发货_tsm.Name = "每日发货_tsm"
230
-        Me.每日发货_tsm.Size = New System.Drawing.Size(184, 26)
231
+        Me.每日发货_tsm.Size = New System.Drawing.Size(151, 22)
231 232
         Me.每日发货_tsm.Text = "每日发货"
232 233
         '
233 234
         '每日发货1_tsm
234 235
         '
235 236
         Me.每日发货1_tsm.Name = "每日发货1_tsm"
236
-        Me.每日发货1_tsm.Size = New System.Drawing.Size(184, 26)
237
+        Me.每日发货1_tsm.Size = New System.Drawing.Size(151, 22)
237 238
         Me.每日发货1_tsm.Text = "每日发货1"
238 239
         '
239 240
         '蓝皮采购_tsm
240 241
         '
241 242
         Me.蓝皮采购_tsm.Name = "蓝皮采购_tsm"
242
-        Me.蓝皮采购_tsm.Size = New System.Drawing.Size(184, 26)
243
+        Me.蓝皮采购_tsm.Size = New System.Drawing.Size(151, 22)
243 244
         Me.蓝皮采购_tsm.Text = "蓝皮采购"
244 245
         '
245 246
         '皮胚中检_tsm
246 247
         '
247 248
         Me.皮胚中检_tsm.Name = "皮胚中检_tsm"
248
-        Me.皮胚中检_tsm.Size = New System.Drawing.Size(184, 26)
249
+        Me.皮胚中检_tsm.Size = New System.Drawing.Size(151, 22)
249 250
         Me.皮胚中检_tsm.Text = "皮胚中检"
250 251
         '
251 252
         '打尺发货_tsm
252 253
         '
253 254
         Me.打尺发货_tsm.Name = "打尺发货_tsm"
254
-        Me.打尺发货_tsm.Size = New System.Drawing.Size(184, 26)
255
+        Me.打尺发货_tsm.Size = New System.Drawing.Size(151, 22)
255 256
         Me.打尺发货_tsm.Text = "打尺发货"
256 257
         '
257 258
         '添梅_tsm
258 259
         '
259 260
         Me.添梅_tsm.Name = "添梅_tsm"
260
-        Me.添梅_tsm.Size = New System.Drawing.Size(184, 26)
261
+        Me.添梅_tsm.Size = New System.Drawing.Size(151, 22)
261 262
         Me.添梅_tsm.Text = "添梅"
262 263
         '
263 264
         '添梅喷台摔鼓_tsm
264 265
         '
265 266
         Me.添梅喷台摔鼓_tsm.Name = "添梅喷台摔鼓_tsm"
266
-        Me.添梅喷台摔鼓_tsm.Size = New System.Drawing.Size(184, 26)
267
+        Me.添梅喷台摔鼓_tsm.Size = New System.Drawing.Size(151, 22)
267 268
         Me.添梅喷台摔鼓_tsm.Text = "添梅_喷台摔鼓"
268 269
         '
269 270
         '皮胚盘点_tsm
270 271
         '
271 272
         Me.皮胚盘点_tsm.Name = "皮胚盘点_tsm"
272
-        Me.皮胚盘点_tsm.Size = New System.Drawing.Size(184, 26)
273
+        Me.皮胚盘点_tsm.Size = New System.Drawing.Size(151, 22)
273 274
         Me.皮胚盘点_tsm.Text = "皮胚盘点"
274 275
         '
275 276
         '反毛打尺入库_tsm
276 277
         '
277 278
         Me.反毛打尺入库_tsm.Name = "反毛打尺入库_tsm"
278
-        Me.反毛打尺入库_tsm.Size = New System.Drawing.Size(184, 26)
279
+        Me.反毛打尺入库_tsm.Size = New System.Drawing.Size(151, 22)
279 280
         Me.反毛打尺入库_tsm.Text = "反毛打尺入库"
280 281
         '
281 282
         '打尺入库_tsm
282 283
         '
283 284
         Me.打尺入库_tsm.Name = "打尺入库_tsm"
284
-        Me.打尺入库_tsm.Size = New System.Drawing.Size(184, 26)
285
+        Me.打尺入库_tsm.Size = New System.Drawing.Size(151, 22)
285 286
         Me.打尺入库_tsm.Text = "PU打尺入库"
286 287
         '
287 288
         '下鼓染色_tsm
288 289
         '
289 290
         Me.下鼓染色_tsm.Name = "下鼓染色_tsm"
290
-        Me.下鼓染色_tsm.Size = New System.Drawing.Size(184, 26)
291
+        Me.下鼓染色_tsm.Size = New System.Drawing.Size(151, 22)
291 292
         Me.下鼓染色_tsm.Text = "下鼓染色"
292 293
         '
293 294
         'PU主机_tsm
294 295
         '
295 296
         Me.PU主机_tsm.Name = "PU主机_tsm"
296
-        Me.PU主机_tsm.Size = New System.Drawing.Size(184, 26)
297
+        Me.PU主机_tsm.Size = New System.Drawing.Size(151, 22)
297 298
         Me.PU主机_tsm.Text = "PU主机"
298 299
         '
299 300
         '磨皮_tsm
300 301
         '
301 302
         Me.磨皮_tsm.Name = "磨皮_tsm"
302
-        Me.磨皮_tsm.Size = New System.Drawing.Size(184, 26)
303
+        Me.磨皮_tsm.Size = New System.Drawing.Size(151, 22)
303 304
         Me.磨皮_tsm.Text = "磨皮"
304 305
         '
305 306
         '水场在制_tsm
306 307
         '
307 308
         Me.水场在制_tsm.Name = "水场在制_tsm"
308
-        Me.水场在制_tsm.Size = New System.Drawing.Size(184, 26)
309
+        Me.水场在制_tsm.Size = New System.Drawing.Size(151, 22)
309 310
         Me.水场在制_tsm.Text = "水场在制"
310 311
         '
311 312
         '噴台_tsm
312 313
         '
313 314
         Me.噴台_tsm.Name = "噴台_tsm"
314
-        Me.噴台_tsm.Size = New System.Drawing.Size(184, 26)
315
+        Me.噴台_tsm.Size = New System.Drawing.Size(151, 22)
315 316
         Me.噴台_tsm.Text = "噴台"
316 317
         '
317 318
         '化料管理_tsm
@@ -326,14 +327,14 @@ Partial Class FrmMDI
326 327
         '
327 328
         Me.化料主档_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
328 329
         Me.化料主档_tsm.Name = "化料主档_tsm"
329
-        Me.化料主档_tsm.Size = New System.Drawing.Size(184, 26)
330
+        Me.化料主档_tsm.Size = New System.Drawing.Size(129, 22)
330 331
         Me.化料主档_tsm.Text = "化料主档"
331 332
         '
332 333
         '用量试算_tsm
333 334
         '
334 335
         Me.用量试算_tsm.Enabled = False
335 336
         Me.用量试算_tsm.Name = "用量试算_tsm"
336
-        Me.用量试算_tsm.Size = New System.Drawing.Size(184, 26)
337
+        Me.用量试算_tsm.Size = New System.Drawing.Size(129, 22)
337 338
         Me.用量试算_tsm.Text = "用量试算"
338 339
         Me.用量试算_tsm.Visible = False
339 340
         '
@@ -341,7 +342,7 @@ Partial Class FrmMDI
341 342
         '
342 343
         Me.盘点_tsm.Enabled = False
343 344
         Me.盘点_tsm.Name = "盘点_tsm"
344
-        Me.盘点_tsm.Size = New System.Drawing.Size(184, 26)
345
+        Me.盘点_tsm.Size = New System.Drawing.Size(129, 22)
345 346
         Me.盘点_tsm.Text = "盘点"
346 347
         Me.盘点_tsm.Visible = False
347 348
         '
@@ -349,7 +350,7 @@ Partial Class FrmMDI
349 350
         '
350 351
         Me.即时库存_tsm.Enabled = False
351 352
         Me.即时库存_tsm.Name = "即时库存_tsm"
352
-        Me.即时库存_tsm.Size = New System.Drawing.Size(184, 26)
353
+        Me.即时库存_tsm.Size = New System.Drawing.Size(129, 22)
353 354
         Me.即时库存_tsm.Text = "即时库存"
354 355
         Me.即时库存_tsm.Visible = False
355 356
         '
@@ -357,14 +358,14 @@ Partial Class FrmMDI
357 358
         '
358 359
         Me.呆料管理_tsm.Enabled = False
359 360
         Me.呆料管理_tsm.Name = "呆料管理_tsm"
360
-        Me.呆料管理_tsm.Size = New System.Drawing.Size(184, 26)
361
+        Me.呆料管理_tsm.Size = New System.Drawing.Size(129, 22)
361 362
         Me.呆料管理_tsm.Text = "呆料管理"
362 363
         '
363 364
         '染料用量_tsm
364 365
         '
365 366
         Me.染料用量_tsm.Enabled = False
366 367
         Me.染料用量_tsm.Name = "染料用量_tsm"
367
-        Me.染料用量_tsm.Size = New System.Drawing.Size(184, 26)
368
+        Me.染料用量_tsm.Size = New System.Drawing.Size(129, 22)
368 369
         Me.染料用量_tsm.Text = "染料用量"
369 370
         Me.染料用量_tsm.Visible = False
370 371
         '
@@ -372,21 +373,21 @@ Partial Class FrmMDI
372 373
         '
373 374
         Me.货柜采购_tsm.Enabled = False
374 375
         Me.货柜采购_tsm.Name = "货柜采购_tsm"
375
-        Me.货柜采购_tsm.Size = New System.Drawing.Size(184, 26)
376
+        Me.货柜采购_tsm.Size = New System.Drawing.Size(129, 22)
376 377
         Me.货柜采购_tsm.Text = "货柜采购"
377 378
         '
378 379
         '采购汇总_tsm
379 380
         '
380 381
         Me.采购汇总_tsm.Enabled = False
381 382
         Me.采购汇总_tsm.Name = "采购汇总_tsm"
382
-        Me.采购汇总_tsm.Size = New System.Drawing.Size(184, 26)
383
+        Me.采购汇总_tsm.Size = New System.Drawing.Size(129, 22)
383 384
         Me.采购汇总_tsm.Text = "采购汇总"
384 385
         '
385 386
         '其他_tsm
386 387
         '
387 388
         Me.其他_tsm.Enabled = False
388 389
         Me.其他_tsm.Name = "其他_tsm"
389
-        Me.其他_tsm.Size = New System.Drawing.Size(184, 26)
390
+        Me.其他_tsm.Size = New System.Drawing.Size(129, 22)
390 391
         Me.其他_tsm.Text = "其他"
391 392
         Me.其他_tsm.Visible = False
392 393
         '
@@ -394,7 +395,7 @@ Partial Class FrmMDI
394 395
         '
395 396
         Me.PU_tsm.Enabled = False
396 397
         Me.PU_tsm.Name = "PU_tsm"
397
-        Me.PU_tsm.Size = New System.Drawing.Size(184, 26)
398
+        Me.PU_tsm.Size = New System.Drawing.Size(129, 22)
398 399
         Me.PU_tsm.Text = "PU"
399 400
         Me.PU_tsm.Visible = False
400 401
         '
@@ -402,14 +403,14 @@ Partial Class FrmMDI
402 403
         '
403 404
         Me.化工用量_tsm.Enabled = False
404 405
         Me.化工用量_tsm.Name = "化工用量_tsm"
405
-        Me.化工用量_tsm.Size = New System.Drawing.Size(184, 26)
406
+        Me.化工用量_tsm.Size = New System.Drawing.Size(129, 22)
406 407
         Me.化工用量_tsm.Text = "化工用量"
407 408
         '
408 409
         '手册进口_tsm
409 410
         '
410 411
         Me.手册进口_tsm.Enabled = False
411 412
         Me.手册进口_tsm.Name = "手册进口_tsm"
412
-        Me.手册进口_tsm.Size = New System.Drawing.Size(184, 26)
413
+        Me.手册进口_tsm.Size = New System.Drawing.Size(129, 22)
413 414
         Me.手册进口_tsm.Text = "手册进口"
414 415
         Me.手册进口_tsm.Visible = False
415 416
         '
@@ -417,7 +418,7 @@ Partial Class FrmMDI
417 418
         '
418 419
         Me.化工领料_tsm.Enabled = False
419 420
         Me.化工领料_tsm.Name = "化工领料_tsm"
420
-        Me.化工领料_tsm.Size = New System.Drawing.Size(184, 26)
421
+        Me.化工领料_tsm.Size = New System.Drawing.Size(129, 22)
421 422
         Me.化工领料_tsm.Text = "化工领料"
422 423
         Me.化工领料_tsm.Visible = False
423 424
         '
@@ -425,14 +426,14 @@ Partial Class FrmMDI
425 426
         '
426 427
         Me.化工認証_tsm.Enabled = False
427 428
         Me.化工認証_tsm.Name = "化工認証_tsm"
428
-        Me.化工認証_tsm.Size = New System.Drawing.Size(184, 26)
429
+        Me.化工認証_tsm.Size = New System.Drawing.Size(129, 22)
429 430
         Me.化工認証_tsm.Text = "化工認証"
430 431
         '
431 432
         '化工认证1_tsm
432 433
         '
433 434
         Me.化工认证1_tsm.Enabled = False
434 435
         Me.化工认证1_tsm.Name = "化工认证1_tsm"
435
-        Me.化工认证1_tsm.Size = New System.Drawing.Size(184, 26)
436
+        Me.化工认证1_tsm.Size = New System.Drawing.Size(129, 22)
436 437
         Me.化工认证1_tsm.Text = "化工認証1"
437 438
         Me.化工认证1_tsm.Visible = False
438 439
         '
@@ -448,54 +449,54 @@ Partial Class FrmMDI
448 449
         '
449 450
         Me.染色工艺_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Colors
450 451
         Me.染色工艺_tsm.Name = "染色工艺_tsm"
451
-        Me.染色工艺_tsm.Size = New System.Drawing.Size(184, 26)
452
+        Me.染色工艺_tsm.Size = New System.Drawing.Size(146, 22)
452 453
         Me.染色工艺_tsm.Text = "染色工艺管理"
453 454
         '
454 455
         '染色领料记录_tsm
455 456
         '
456 457
         Me.染色领料记录_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
457 458
         Me.染色领料记录_tsm.Name = "染色领料记录_tsm"
458
-        Me.染色领料记录_tsm.Size = New System.Drawing.Size(184, 26)
459
+        Me.染色领料记录_tsm.Size = New System.Drawing.Size(146, 22)
459 460
         Me.染色领料记录_tsm.Text = "染色领料记录"
460 461
         '
461 462
         '染色记录_tsm
462 463
         '
463 464
         Me.染色记录_tsm.Name = "染色记录_tsm"
464
-        Me.染色记录_tsm.Size = New System.Drawing.Size(184, 26)
465
+        Me.染色记录_tsm.Size = New System.Drawing.Size(146, 22)
465 466
         Me.染色记录_tsm.Text = "染色记录"
466 467
         Me.染色记录_tsm.Visible = False
467 468
         '
468 469
         'ToolStripSeparator2
469 470
         '
470 471
         Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
471
-        Me.ToolStripSeparator2.Size = New System.Drawing.Size(181, 6)
472
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(143, 6)
472 473
         '
473 474
         '涂饰工艺_tsm
474 475
         '
475 476
         Me.涂饰工艺_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Colors
476 477
         Me.涂饰工艺_tsm.Name = "涂饰工艺_tsm"
477 478
         Me.涂饰工艺_tsm.RightToLeftAutoMirrorImage = True
478
-        Me.涂饰工艺_tsm.Size = New System.Drawing.Size(184, 26)
479
+        Me.涂饰工艺_tsm.Size = New System.Drawing.Size(146, 22)
479 480
         Me.涂饰工艺_tsm.Text = "涂饰工艺管理"
480 481
         '
481 482
         '涂饰配料记录_tsm
482 483
         '
483 484
         Me.涂饰配料记录_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
484 485
         Me.涂饰配料记录_tsm.Name = "涂饰配料记录_tsm"
485
-        Me.涂饰配料记录_tsm.Size = New System.Drawing.Size(184, 26)
486
+        Me.涂饰配料记录_tsm.Size = New System.Drawing.Size(146, 22)
486 487
         Me.涂饰配料记录_tsm.Text = "涂饰配料记录"
487 488
         '
488 489
         '涂饰领料记录_tsm
489 490
         '
490 491
         Me.涂饰领料记录_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
491 492
         Me.涂饰领料记录_tsm.Name = "涂饰领料记录_tsm"
492
-        Me.涂饰领料记录_tsm.Size = New System.Drawing.Size(184, 26)
493
+        Me.涂饰领料记录_tsm.Size = New System.Drawing.Size(146, 22)
493 494
         Me.涂饰领料记录_tsm.Text = "涂饰领料记录"
494 495
         '
495 496
         '工艺_tsm
496 497
         '
497 498
         Me.工艺_tsm.Name = "工艺_tsm"
498
-        Me.工艺_tsm.Size = New System.Drawing.Size(184, 26)
499
+        Me.工艺_tsm.Size = New System.Drawing.Size(146, 22)
499 500
         Me.工艺_tsm.Text = "工艺"
500 501
         Me.工艺_tsm.Visible = False
501 502
         '
@@ -686,11 +687,75 @@ Partial Class FrmMDI
686 687
         Me.人資管理_tsm.Size = New System.Drawing.Size(87, 20)
687 688
         Me.人資管理_tsm.Text = "人資管理"
688 689
         '
690
+        '考勤明細表_tsm
691
+        '
692
+        Me.考勤明細表_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
693
+        Me.考勤明細表_tsm.Name = "考勤明細表_tsm"
694
+        Me.考勤明細表_tsm.Size = New System.Drawing.Size(158, 22)
695
+        Me.考勤明細表_tsm.Text = "考勤明細表"
696
+        '
697
+        'ToolStripSeparator3
698
+        '
699
+        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
700
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(155, 6)
701
+        '
702
+        '補打卡申請_tsm
703
+        '
704
+        Me.補打卡申請_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.pen
705
+        Me.補打卡申請_tsm.Name = "補打卡申請_tsm"
706
+        Me.補打卡申請_tsm.Size = New System.Drawing.Size(158, 22)
707
+        Me.補打卡申請_tsm.Text = "補打卡申請"
708
+        '
709
+        '補打卡審核_tsm
710
+        '
711
+        Me.補打卡審核_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.check
712
+        Me.補打卡審核_tsm.Name = "補打卡審核_tsm"
713
+        Me.補打卡審核_tsm.Size = New System.Drawing.Size(158, 22)
714
+        Me.補打卡審核_tsm.Text = "補打卡審核"
715
+        '
716
+        'ToolStripSeparator4
717
+        '
718
+        Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
719
+        Me.ToolStripSeparator4.Size = New System.Drawing.Size(155, 6)
720
+        '
721
+        '請假申請_tsm
722
+        '
723
+        Me.請假申請_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.pen
724
+        Me.請假申請_tsm.Name = "請假申請_tsm"
725
+        Me.請假申請_tsm.Size = New System.Drawing.Size(158, 22)
726
+        Me.請假申請_tsm.Text = "請假申請"
727
+        '
728
+        '請假核准_tsm
729
+        '
730
+        Me.請假核准_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.check
731
+        Me.請假核准_tsm.Name = "請假核准_tsm"
732
+        Me.請假核准_tsm.Size = New System.Drawing.Size(158, 22)
733
+        Me.請假核准_tsm.Text = "請假核准"
734
+        '
735
+        '請假歷史資料_tsm
736
+        '
737
+        Me.請假歷史資料_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
738
+        Me.請假歷史資料_tsm.Name = "請假歷史資料_tsm"
739
+        Me.請假歷史資料_tsm.Size = New System.Drawing.Size(158, 22)
740
+        Me.請假歷史資料_tsm.Text = "請假歷史資料"
741
+        '
742
+        'ToolStripSeparator5
743
+        '
744
+        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
745
+        Me.ToolStripSeparator5.Size = New System.Drawing.Size(155, 6)
746
+        '
747
+        '國定假日設定_tsm
748
+        '
749
+        Me.國定假日設定_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
750
+        Me.國定假日設定_tsm.Name = "國定假日設定_tsm"
751
+        Me.國定假日設定_tsm.Size = New System.Drawing.Size(158, 22)
752
+        Me.國定假日設定_tsm.Text = "國定假日設定"
753
+        '
689 754
         '考勤資料庫設定_tsm
690 755
         '
691 756
         Me.考勤資料庫設定_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
692 757
         Me.考勤資料庫設定_tsm.Name = "考勤資料庫設定_tsm"
693
-        Me.考勤資料庫設定_tsm.Size = New System.Drawing.Size(184, 26)
758
+        Me.考勤資料庫設定_tsm.Size = New System.Drawing.Size(158, 22)
694 759
         Me.考勤資料庫設定_tsm.Text = "考勤資料庫設定"
695 760
         '
696 761
         '其他1_tsm
@@ -705,24 +770,24 @@ Partial Class FrmMDI
705 770
         '
706 771
         Me.汇入数据1_tsm.Enabled = False
707 772
         Me.汇入数据1_tsm.Name = "汇入数据1_tsm"
708
-        Me.汇入数据1_tsm.Size = New System.Drawing.Size(122, 22)
773
+        Me.汇入数据1_tsm.Size = New System.Drawing.Size(180, 22)
709 774
         Me.汇入数据1_tsm.Text = "汇入数据"
710 775
         '
711 776
         '水场水表_tsm
712 777
         '
713 778
         Me.水场水表_tsm.Name = "水场水表_tsm"
714
-        Me.水场水表_tsm.Size = New System.Drawing.Size(122, 22)
779
+        Me.水场水表_tsm.Size = New System.Drawing.Size(180, 22)
715 780
         Me.水场水表_tsm.Text = "水场水表"
716 781
         '
717 782
         '打印唛头_tsm
718 783
         '
719 784
         Me.打印唛头_tsm.Name = "打印唛头_tsm"
720
-        Me.打印唛头_tsm.Size = New System.Drawing.Size(122, 22)
785
+        Me.打印唛头_tsm.Size = New System.Drawing.Size(180, 22)
721 786
         Me.打印唛头_tsm.Text = "打印唛头"
722 787
         '
723 788
         '系统维护_tsm
724 789
         '
725
-        Me.系统维护_tsm.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.使用者权限管理_tsm, Me.系統執行檔版本管理_tsm, Me.ToolStripSeparator1, Me.资料库转换_tsm, Me.汇率管理_tsm, Me.资料库备份_tsm, Me.资料库回存_tsm, Me.汇入_tsm})
790
+        Me.系统维护_tsm.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.使用者权限管理_tsm, Me.系統執行檔版本管理_tsm, Me.ToolStripSeparator1, Me.资料库转换_tsm, Me.汇率管理_tsm, Me.资料库备份_tsm, Me.资料库回存_tsm, Me.汇入_tsm, Me.測試ToolStripMenuItem})
726 791
         Me.系统维护_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
727 792
         Me.系统维护_tsm.Name = "系统维护_tsm"
728 793
         Me.系统维护_tsm.Size = New System.Drawing.Size(87, 20)
@@ -732,51 +797,51 @@ Partial Class FrmMDI
732 797
         '
733 798
         Me.使用者权限管理_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
734 799
         Me.使用者权限管理_tsm.Name = "使用者权限管理_tsm"
735
-        Me.使用者权限管理_tsm.Size = New System.Drawing.Size(182, 22)
800
+        Me.使用者权限管理_tsm.Size = New System.Drawing.Size(186, 26)
736 801
         Me.使用者权限管理_tsm.Text = "使用者权限管理"
737 802
         '
738 803
         '系統執行檔版本管理_tsm
739 804
         '
740 805
         Me.系統執行檔版本管理_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
741 806
         Me.系統執行檔版本管理_tsm.Name = "系統執行檔版本管理_tsm"
742
-        Me.系統執行檔版本管理_tsm.Size = New System.Drawing.Size(182, 22)
807
+        Me.系統執行檔版本管理_tsm.Size = New System.Drawing.Size(186, 26)
743 808
         Me.系統執行檔版本管理_tsm.Text = "系統執行檔版本管理"
744 809
         '
745 810
         'ToolStripSeparator1
746 811
         '
747 812
         Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
748
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(179, 6)
813
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(183, 6)
749 814
         '
750 815
         '资料库转换_tsm
751 816
         '
752 817
         Me.资料库转换_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
753 818
         Me.资料库转换_tsm.Name = "资料库转换_tsm"
754
-        Me.资料库转换_tsm.Size = New System.Drawing.Size(182, 22)
819
+        Me.资料库转换_tsm.Size = New System.Drawing.Size(186, 26)
755 820
         Me.资料库转换_tsm.Text = "资料库转换"
756 821
         '
757 822
         '汇率管理_tsm
758 823
         '
759 824
         Me.汇率管理_tsm.Name = "汇率管理_tsm"
760
-        Me.汇率管理_tsm.Size = New System.Drawing.Size(182, 22)
825
+        Me.汇率管理_tsm.Size = New System.Drawing.Size(186, 26)
761 826
         Me.汇率管理_tsm.Text = "汇率管理"
762 827
         Me.汇率管理_tsm.Visible = False
763 828
         '
764 829
         '资料库备份_tsm
765 830
         '
766 831
         Me.资料库备份_tsm.Name = "资料库备份_tsm"
767
-        Me.资料库备份_tsm.Size = New System.Drawing.Size(182, 22)
832
+        Me.资料库备份_tsm.Size = New System.Drawing.Size(186, 26)
768 833
         Me.资料库备份_tsm.Text = "资料库备份"
769 834
         '
770 835
         '资料库回存_tsm
771 836
         '
772 837
         Me.资料库回存_tsm.Name = "资料库回存_tsm"
773
-        Me.资料库回存_tsm.Size = New System.Drawing.Size(182, 22)
838
+        Me.资料库回存_tsm.Size = New System.Drawing.Size(186, 26)
774 839
         Me.资料库回存_tsm.Text = "资料库回存"
775 840
         '
776 841
         '汇入_tsm
777 842
         '
778 843
         Me.汇入_tsm.Name = "汇入_tsm"
779
-        Me.汇入_tsm.Size = New System.Drawing.Size(182, 22)
844
+        Me.汇入_tsm.Size = New System.Drawing.Size(186, 26)
780 845
         Me.汇入_tsm.Text = "汇入"
781 846
         Me.汇入_tsm.Visible = False
782 847
         '
@@ -826,69 +891,11 @@ Partial Class FrmMDI
826 891
         '
827 892
         Me.參照更新.Interval = 1000
828 893
         '
829
-        '考勤明細表_tsm
830
-        '
831
-        Me.考勤明細表_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
832
-        Me.考勤明細表_tsm.Name = "考勤明細表_tsm"
833
-        Me.考勤明細表_tsm.Size = New System.Drawing.Size(184, 26)
834
-        Me.考勤明細表_tsm.Text = "考勤明細表"
835
-        '
836
-        '請假申請_tsm
837
-        '
838
-        Me.請假申請_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.pen
839
-        Me.請假申請_tsm.Name = "請假申請_tsm"
840
-        Me.請假申請_tsm.Size = New System.Drawing.Size(184, 26)
841
-        Me.請假申請_tsm.Text = "請假申請"
842
-        '
843
-        '請假核准_tsm
844
-        '
845
-        Me.請假核准_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.check
846
-        Me.請假核准_tsm.Name = "請假核准_tsm"
847
-        Me.請假核准_tsm.Size = New System.Drawing.Size(184, 26)
848
-        Me.請假核准_tsm.Text = "請假核准"
849
-        '
850
-        '請假歷史資料_tsm
894
+        '測試ToolStripMenuItem
851 895
         '
852
-        Me.請假歷史資料_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.Report
853
-        Me.請假歷史資料_tsm.Name = "請假歷史資料_tsm"
854
-        Me.請假歷史資料_tsm.Size = New System.Drawing.Size(184, 26)
855
-        Me.請假歷史資料_tsm.Text = "請假歷史資料"
856
-        '
857
-        '國定假日設定_tsm
858
-        '
859
-        Me.國定假日設定_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.system
860
-        Me.國定假日設定_tsm.Name = "國定假日設定_tsm"
861
-        Me.國定假日設定_tsm.Size = New System.Drawing.Size(184, 26)
862
-        Me.國定假日設定_tsm.Text = "國定假日設定"
863
-        '
864
-        '補打卡申請_tsm
865
-        '
866
-        Me.補打卡申請_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.pen
867
-        Me.補打卡申請_tsm.Name = "補打卡申請_tsm"
868
-        Me.補打卡申請_tsm.Size = New System.Drawing.Size(184, 26)
869
-        Me.補打卡申請_tsm.Text = "補打卡申請"
870
-        '
871
-        '補打卡審核_tsm
872
-        '
873
-        Me.補打卡審核_tsm.Image = Global.HF_MIS_SYS.My.Resources.Resources.check
874
-        Me.補打卡審核_tsm.Name = "補打卡審核_tsm"
875
-        Me.補打卡審核_tsm.Size = New System.Drawing.Size(184, 26)
876
-        Me.補打卡審核_tsm.Text = "補打卡審核"
877
-        '
878
-        'ToolStripSeparator3
879
-        '
880
-        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
881
-        Me.ToolStripSeparator3.Size = New System.Drawing.Size(181, 6)
882
-        '
883
-        'ToolStripSeparator4
884
-        '
885
-        Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
886
-        Me.ToolStripSeparator4.Size = New System.Drawing.Size(181, 6)
887
-        '
888
-        'ToolStripSeparator5
889
-        '
890
-        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
891
-        Me.ToolStripSeparator5.Size = New System.Drawing.Size(181, 6)
896
+        Me.測試ToolStripMenuItem.Name = "測試ToolStripMenuItem"
897
+        Me.測試ToolStripMenuItem.Size = New System.Drawing.Size(186, 26)
898
+        Me.測試ToolStripMenuItem.Text = "測試"
892 899
         '
893 900
         'FrmMDI
894 901
         '
@@ -1022,4 +1029,5 @@ Partial Class FrmMDI
1022 1029
     Friend WithEvents 請假歷史資料_tsm As ToolStripMenuItem
1023 1030
     Friend WithEvents ToolStripSeparator5 As ToolStripSeparator
1024 1031
     Friend WithEvents 國定假日設定_tsm As ToolStripMenuItem
1032
+    Friend WithEvents 測試ToolStripMenuItem As ToolStripMenuItem
1025 1033
 End Class

+ 4
- 0
HF-MIS-SYS/HF-MIS-SYS.vb Bestand weergeven

@@ -189,4 +189,8 @@ Public Class FrmMDI
189 189
             MsgBox(Target & FS & " 出現問題!!!")
190 190
         End Try
191 191
     End Sub
192
+    Private Sub 測試ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 測試ToolStripMenuItem.Click
193
+        For Each ChildForm As Form In Me.MdiChildren : ChildForm.Close() : Next
194
+        RFID綁定.Show()
195
+    End Sub
192 196
 End Class

+ 11
- 1
HF-MIS-SYS/HF-MIS-SYS.vbproj Bestand weergeven

@@ -1,4 +1,4 @@
1
-<?xml version="1.0" encoding="utf-8"?>
1
+<?xml version="1.0" encoding="utf-8"?>
2 2
 <Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
3 3
   <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
4 4
   <PropertyGroup>
@@ -102,6 +102,7 @@
102 102
     <Reference Include="System.Data" />
103 103
     <Reference Include="System.Deployment" />
104 104
     <Reference Include="System.Drawing" />
105
+    <Reference Include="System.Management" />
105 106
     <Reference Include="System.Memory, Version=4.0.1.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
106 107
       <HintPath>..\packages\System.Memory.4.5.5\lib\net461\System.Memory.dll</HintPath>
107 108
     </Reference>
@@ -330,6 +331,12 @@
330 331
     <Compile Include="98、系統維護\系統執行檔版本管理.vb">
331 332
       <SubType>Form</SubType>
332 333
     </Compile>
334
+    <Compile Include="99、未分類\RFID綁定.Designer.vb">
335
+      <DependentUpon>RFID綁定.vb</DependentUpon>
336
+    </Compile>
337
+    <Compile Include="99、未分類\RFID綁定.vb">
338
+      <SubType>Form</SubType>
339
+    </Compile>
333 340
     <Compile Include="99、未分類\資訊框.Designer.vb">
334 341
       <DependentUpon>資訊框.vb</DependentUpon>
335 342
     </Compile>
@@ -454,6 +461,9 @@
454 461
     <EmbeddedResource Include="98、系統維護\系統執行檔版本管理.resx">
455 462
       <DependentUpon>系統執行檔版本管理.vb</DependentUpon>
456 463
     </EmbeddedResource>
464
+    <EmbeddedResource Include="99、未分類\RFID綁定.resx">
465
+      <DependentUpon>RFID綁定.vb</DependentUpon>
466
+    </EmbeddedResource>
457 467
     <EmbeddedResource Include="99、未分類\資訊框.resx">
458 468
       <DependentUpon>資訊框.vb</DependentUpon>
459 469
     </EmbeddedResource>

BIN
HF-MIS-SYS/bin/Debug/HF-MIS-SYS.exe Bestand weergeven


BIN
HF-MIS-SYS/bin/Debug/HF-MIS-SYS.pdb Bestand weergeven


+ 2
- 2
HF-MIS-SYS/bin/Debug/LGRemember.txt Bestand weergeven

@@ -1,3 +1,3 @@
1 1
 1
2
-4b97J043K4R0
3
-4099J141K2R714J95960
2
+3b77N0Q3A480
3
+3079N1Q1A28724E999K0

BIN
HF-MIS-SYS/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache Bestand weergeven


BIN
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.exe Bestand weergeven


BIN
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.pdb Bestand weergeven


BIN
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.AssemblyReference.cache Bestand weergeven


+ 1
- 1
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.CoreCompileInputs.cache Bestand weergeven

@@ -1 +1 @@
1
-2b0c0d88e2e08a153b054a10be9f568b82d0fdf54e31d85dec6e3cf66ed945f5
1
+05bc3df8a9d979d6946e6ad375dabc9eddde229376b308a1c1beba0cff3e9c5b

+ 1
- 0
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.FileListAbsolute.txt Bestand weergeven

@@ -506,3 +506,4 @@ D:\hf-mis-sys-leehsiehjui\HF-MIS-SYS\obj\Debug\HF-MIS-SYS.vbproj.Up2Date
506 506
 D:\hf-mis-sys-leehsiehjui\HF-MIS-SYS\obj\Debug\HF-MIS-SYS.exe
507 507
 D:\hf-mis-sys-leehsiehjui\HF-MIS-SYS\obj\Debug\HF-MIS-SYS.xml
508 508
 D:\hf-mis-sys-leehsiehjui\HF-MIS-SYS\obj\Debug\HF-MIS-SYS.pdb
509
+D:\hf-mis-sys-leehsiehjui\HF-MIS-SYS\obj\Debug\HF_MIS_SYS.RFID綁定.resources

BIN
HF-MIS-SYS/obj/Debug/HF-MIS-SYS.vbproj.GenerateResource.cache Bestand weergeven


BIN
HF-MIS-SYS/obj/Debug/HF_MIS_SYS.RFID綁定.resources Bestand weergeven


Laden…
Annuleren
Opslaan