20241013備份

.vs/HSKIN-MIS-SYS/v17/DocumentLayout.json

@@ -3,8 +3,20 @@
   "WorkspaceRootPath": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\",
   "Documents": [
     {
-      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\00\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\00\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
       "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\grams-sys\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
@@ -18,6 +30,30 @@
       "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\grams-sys\\00\u3001module\\sql_\u8003\u52E4\u7CFB\u7D71.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
       "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\00\u3001module\\sql_\u8003\u52E4\u7CFB\u7D71.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\hskin-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\hskin-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\hskin-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\hskin-mis-sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\00\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\00\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\hskin\\hskin-mis-sys\\grams-sys\\00\u3001module\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\00\u3001module\\sql_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
     {
       "AbsoluteMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\grams-sys\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
       "RelativeMoniker": "D:0:0:{F92A9C18-49EF-4972-978C-2BB60F1EA759}|GRAMS-SYS\\HSKIN-MIS-SYS.vbproj|solutionrelative:grams-sys\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
@@ -46,63 +82,179 @@
       "DocumentGroups": [
         {
           "DockedWidth": 200,
-          "SelectedChildIndex": 1,
+          "SelectedChildIndex": 5,
           "Children": [
             {
               "$type": "Bookmark",
               "Name": "ST:0:0:{004be353-6879-467c-9d1e-9ac23cdf6d49}"
             },
+            {
+              "$type": "Document",
+              "DocumentIndex": 2,
+              "Title": "\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "RelativeToolTip": "GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "ViewState": "AQIAACEAAAAAAAAAAAAYwDsAAAAMAAAA",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:38:54.01Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 3,
+              "Title": "\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "GRAMS-SYS\\10\u3001\u7CFB\u7D71\u7BA1\u7406\\\u7CFB\u7D71\u7D81\u5B9A\u96FB\u8166\u8CC7\u8A0A.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:37:33.584Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 8,
+              "Title": "HSKIN-MIS-SYS.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "RelativeToolTip": "GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "ViewState": "AQIAAJ4AAAAAAAAAAAAlwLIAAAAIAAAA",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:37:24.854Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 9,
+              "Title": "HSKIN-MIS-SYS.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\HSKIN-MIS-SYS.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\HSKIN-MIS-SYS.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "GRAMS-SYS\\HSKIN-MIS-SYS.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:37:18.948Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
             {
               "$type": "Document",
               "DocumentIndex": 0,
+              "Title": "\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "RelativeToolTip": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "ViewState": "AQIAAAAAAAAAAAAAAAAAABkAAAAJAAAA",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:33:06.98Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 1,
+              "Title": "\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u6253\u5361\u4E3B\u6A5F.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:32:59.495Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 12,
+              "Title": "SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\00\u3001Module\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
+              "RelativeToolTip": "GRAMS-SYS\\00\u3001Module\\SQL_\u767B\u5165\u8207\u4E3B\u7A0B\u5F0F.vb",
+              "ViewState": "AQIAAAUAAAAAAAAAAAAlwBsAAAAhAAAA",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:25:10.207Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 10,
+              "Title": "LoginForm1.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\LoginForm1.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\LoginForm1.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\LoginForm1.vb",
+              "RelativeToolTip": "GRAMS-SYS\\LoginForm1.vb",
+              "ViewState": "AQIAAF8AAAAAAAAAAAAcwHUAAAAWAAAA",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:24:54.135Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 7,
+              "Title": "LoginForm1.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\LoginForm1.vb",
+              "RelativeDocumentMoniker": "GRAMS-SYS\\LoginForm1.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\LoginForm1.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "GRAMS-SYS\\LoginForm1.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2024-10-13T12:24:46.449Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 11,
               "Title": "\u5168\u57DF\u8B8A\u6578.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\00\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "RelativeToolTip": "GRAMS-SYS\\00\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
-              "ViewState": "AQIAAAAAAAAAAAAAAABAwAkAAAAlAAAA",
+              "ViewState": "AQIAAAAAAAAAAAAAAAAAAA8AAAA5AAAA",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
               "WhenOpened": "2024-10-09T11:38:20.386Z",
               "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 3,
+              "DocumentIndex": 6,
               "Title": "SQL_\u8003\u52E4\u7CFB\u7D71.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\SQL_\u8003\u52E4\u7CFB\u7D71.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\00\u3001Module\\SQL_\u8003\u52E4\u7CFB\u7D71.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\SQL_\u8003\u52E4\u7CFB\u7D71.vb",
               "RelativeToolTip": "GRAMS-SYS\\00\u3001Module\\SQL_\u8003\u52E4\u7CFB\u7D71.vb",
-              "ViewState": "AQIAAAsAAAAAAAAAAADwvxMAAAA2AAAA",
+              "ViewState": "AQIAAMsAAAAAAAAAAAAYwMgAAAAWAAAA",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2024-10-08T01:33:24.51Z"
+              "WhenOpened": "2024-10-08T01:33:24.51Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 1,
+              "DocumentIndex": 4,
               "Title": "\u8003\u52E4\u660E\u7D30\u8868.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
               "RelativeToolTip": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
-              "ViewState": "AQIAABwCAAAAAAAAAAAMwHMCAAAOAAAA",
+              "ViewState": "AQIAAE4CAAAAAAAAAAAlwF8CAABuAAAA",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2024-10-08T01:33:01.846Z"
+              "WhenOpened": "2024-10-08T01:33:01.846Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 2,
+              "DocumentIndex": 5,
               "Title": "\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb",
-              "ToolTip": "D:\\\u4F7F\u7528\u8005\\\u4E0B\u8F09\\HSKIN-MIS-SYS-SIU-master\\hskin-mis-sys-siu\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
-              "RelativeToolTip": "..\\..\\..\\\u4F7F\u7528\u8005\\\u4E0B\u8F09\\HSKIN-MIS-SYS-SIU-master\\hskin-mis-sys-siu\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "GRAMS-SYS\\04\u3001\u8003\u52E4\u7BA1\u7406\\\u8003\u52E4\u660E\u7D30\u8868.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2024-10-08T01:32:59.173Z"
+              "WhenOpened": "2024-10-08T01:32:59.173Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 6,
+              "DocumentIndex": 15,
               "Title": "SQL_\u7E3D\u52D9\u7CFB\u7D71.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\00\u3001Module\\SQL_\u7E3D\u52D9\u7CFB\u7D71.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\00\u3001Module\\SQL_\u7E3D\u52D9\u7CFB\u7D71.vb",
@@ -114,7 +266,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 5,
+              "DocumentIndex": 14,
               "Title": "\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb",
@@ -126,7 +278,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 4,
+              "DocumentIndex": 13,
               "Title": "\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u63D0\u6848.vb",
@@ -137,7 +289,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 8,
+              "DocumentIndex": 17,
               "Title": "\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb",
@@ -148,7 +300,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 7,
+              "DocumentIndex": 16,
               "Title": "\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\HSKIN\\HSKIN-MIS-SYS\\GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb",
               "RelativeDocumentMoniker": "GRAMS-SYS\\06\u3001\u7E3D\u52D9\u7BA1\u7406\\\u5C08\u6848\u53CA\u6703\u8B70\u57F7\u884C.vb",

GRAMS-SYS/00、Module/SQL_登入與主程式.vb

@@ -25,7 +25,7 @@
     End Sub
     Friend Sub SQL_電腦綁定()
         ConnOpen_ERP()
-        SQL1 = "SELECT MAC碼 FROM 系統綁定電腦資訊 WHERE 硬碟ID LIKE N'" & PA2 & "' AND 硬碟序列 LIKE N'" & PA3 & "' AND 磁盘型態 LIKE N'" & PA4 & "'"
+        SQL1 = "SELECT MAC碼, 考勤綁定 FROM 系統綁定電腦資訊 WHERE 硬碟ID LIKE N'" & PA2 & "' AND 硬碟序列 LIKE N'" & PA3 & "' AND 磁盘型態 LIKE N'" & PA4 & "'"
         CmdSet_For_dr()
     End Sub
 End Module

GRAMS-SYS/00、Module/全域變數.vb

@@ -13,7 +13,7 @@
            PA31, PA32, PA33, PA34, PA35, PA36, PA37, PA38, PA39, PA40, PA41, PA42, PA49, PA50, PA54, PA55, PA56, PA57, PA58 As String
     Public NU1 As Integer
     Public Do1, Do2, Do3 As Double
-    Public BL1, BL2, BL3, 不刪除檔案, 非第一次, 重新計算, 首次開啟, 在職 As Boolean
+    Public BL1, BL2, BL3, 不刪除檔案, 非第一次, 重新計算, 首次開啟, 在職, 打卡 As Boolean
     Public 平均數, lastFoundRowIndex, lastFoundColIndex, NN1 As Integer : Public 最終數 As Integer = 0 : Public 資料數 As Integer = 0
     Public DTPS(5), 圖片庫, PDF路徑 As String
     Public 圖片傳遞 As Image

GRAMS-SYS/04、考勤管理/考勤打卡主機.Designer.vb

@@ -0,0 +1,146 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class 考勤打卡主機
+    Inherits System.Windows.Forms.Form
+
+    'Form 覆寫 Dispose 以清除元件清單。
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    '為 Windows Form 設計工具的必要項
+    Private components As System.ComponentModel.IContainer
+
+    '注意: 以下為 Windows Form 設計工具所需的程序
+    '可以使用 Windows Form 設計工具進行修改。
+    '請勿使用程式碼編輯器進行修改。
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Me.QRCode_pb = New System.Windows.Forms.PictureBox()
+        Me.重讀_bt = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.讀秒 = New System.Windows.Forms.Timer(Me.components)
+        Me.日期_DTP = New System.Windows.Forms.DateTimePicker()
+        Me.時間_DTP = New System.Windows.Forms.DateTimePicker()
+        Me.Label3 = New System.Windows.Forms.Label()
+        CType(Me.QRCode_pb, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'QRCode_pb
+        '
+        Me.QRCode_pb.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
+        Me.QRCode_pb.Location = New System.Drawing.Point(4, 54)
+        Me.QRCode_pb.Name = "QRCode_pb"
+        Me.QRCode_pb.Size = New System.Drawing.Size(500, 500)
+        Me.QRCode_pb.TabIndex = 984
+        Me.QRCode_pb.TabStop = False
+        '
+        '重讀_bt
+        '
+        Me.重讀_bt.BackgroundImage = Global.HSKIN_MIS_SYS.My.Resources.Resources.renew
+        Me.重讀_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.重讀_bt.Location = New System.Drawing.Point(455, 3)
+        Me.重讀_bt.Name = "重讀_bt"
+        Me.重讀_bt.Size = New System.Drawing.Size(50, 50)
+        Me.重讀_bt.TabIndex = 985
+        Me.重讀_bt.UseVisualStyleBackColor = True
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.Label1.Location = New System.Drawing.Point(7, 32)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(178, 17)
+        Me.Label1.TabIndex = 986
+        Me.Label1.Text = "QR Code 重新讀取剩餘時間 : "
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.Label2.ForeColor = System.Drawing.Color.Red
+        Me.Label2.Location = New System.Drawing.Point(191, 32)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(26, 17)
+        Me.Label2.TabIndex = 987
+        Me.Label2.Text = "5 S"
+        '
+        '讀秒
+        '
+        Me.讀秒.Interval = 1000
+        '
+        '日期_DTP
+        '
+        Me.日期_DTP.CalendarFont = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.日期_DTP.CustomFormat = "yyyy/MM/dd"
+        Me.日期_DTP.Enabled = False
+        Me.日期_DTP.Format = System.Windows.Forms.DateTimePickerFormat.Custom
+        Me.日期_DTP.Location = New System.Drawing.Point(68, 3)
+        Me.日期_DTP.Name = "日期_DTP"
+        Me.日期_DTP.Size = New System.Drawing.Size(92, 23)
+        Me.日期_DTP.TabIndex = 988
+        '
+        '時間_DTP
+        '
+        Me.時間_DTP.CalendarFont = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.時間_DTP.CustomFormat = "hh:mm:ss"
+        Me.時間_DTP.Enabled = False
+        Me.時間_DTP.Format = System.Windows.Forms.DateTimePickerFormat.Custom
+        Me.時間_DTP.Location = New System.Drawing.Point(159, 3)
+        Me.時間_DTP.Name = "時間_DTP"
+        Me.時間_DTP.Size = New System.Drawing.Size(70, 23)
+        Me.時間_DTP.TabIndex = 989
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.Label3.Location = New System.Drawing.Point(7, 6)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(60, 17)
+        Me.Label3.TabIndex = 990
+        Me.Label3.Text = "現在時間"
+        '
+        '考勤打卡主機
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(507, 559)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.時間_DTP)
+        Me.Controls.Add(Me.日期_DTP)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.重讀_bt)
+        Me.Controls.Add(Me.QRCode_pb)
+        Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.Margin = New System.Windows.Forms.Padding(4)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "考勤打卡主機"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "考勤打卡主機"
+        CType(Me.QRCode_pb, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents QRCode_pb As PictureBox
+    Friend WithEvents 重讀_bt As Button
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents 讀秒 As Timer
+    Friend WithEvents 日期_DTP As DateTimePicker
+    Friend WithEvents 時間_DTP As DateTimePicker
+    Friend WithEvents Label3 As Label
+End Class

GRAMS-SYS/04、考勤管理/考勤打卡主機.resx

@@ -0,0 +1,126 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="讀秒.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>32, 11</value>
+  </metadata>
+  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>51</value>
+  </metadata>
+</root>

GRAMS-SYS/04、考勤管理/考勤打卡主機.vb

@@ -0,0 +1,26 @@
+Public Class 考勤打卡主機
+    ReadOnly QRCODE As DotNetBarcode = New DotNetBarcode
+    Private Sub 考勤打卡主機_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        重讀_bt.PerformClick() : 讀秒.Enabled = True
+    End Sub
+    Private Sub 考勤打卡主機_Closed(sender As Object, e As EventArgs) Handles MyBase.Closed
+        讀秒.Enabled = False : LoginForm1.Close()
+    End Sub
+    Private Sub 讀秒_Tick(sender As Object, e As EventArgs) Handles 讀秒.Tick
+        If Label2.Text = "5 S" Then : Label2.Text = "4 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1)
+        ElseIf Label2.Text = "4 S" Then : Label2.Text = "3 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1)
+        ElseIf Label2.Text = "3 S" Then : Label2.Text = "2 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1)
+        ElseIf Label2.Text = "2 S" Then : Label2.Text = "1 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1)
+        ElseIf Label2.Text = "1 S" Then : Label2.Text = "0 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1)
+        ElseIf Label2.Text = "0 S" Then : Label2.Text = "5 S" : 時間_DTP.Value = 時間_DTP.Value.AddSeconds(1) : 重讀_bt.PerformClick() : End If
+    End Sub
+    Private Sub 重讀_bt_Click(sender As Object, e As EventArgs) Handles 重讀_bt.Click
+        QRCode_pb.Image = Nothing
+        QRCode_pb.Image = New Bitmap(QRCode_pb.Width, QRCode_pb.Height)
+        Dim GP As Graphics = Graphics.FromImage(QRCode_pb.Image)
+        QRCODE.Type = DotNetBarcode.Types.QRCode : QRCODE.QRQuitZone = 0
+        Dim 驗證 As String = "HKIN/ " & Strings.Format(日期_DTP.Value, "yyyy/MM/dd") & " " & Strings.Format(時間_DTP.Value, "hh:mm;ss") & " /重複打卡驗證碼"
+        QRCODE.QRWriteBar(驗證, 5, 5, 17, GP)
+        QRCode_pb.SizeMode = 4
+    End Sub
+End Class

GRAMS-SYS/10、系統管理/系統綁定電腦資訊.Designer.vb

@@ -32,14 +32,17 @@ Partial Class 系統綁定電腦資訊
         Me.硬碟ID_tb = New System.Windows.Forms.TextBox()
         Me.取得本地電腦訊息_bt = New System.Windows.Forms.Button()
         Me.MAC碼_tb = New System.Windows.Forms.TextBox()
+        Me.清單_dgv = New System.Windows.Forms.DataGridView()
+        Me.考勤綁定_ch = New System.Windows.Forms.CheckBox()
+        CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         '電腦註冊_tb
         '
         Me.電腦註冊_tb.ForeColor = System.Drawing.Color.Red
-        Me.電腦註冊_tb.Location = New System.Drawing.Point(189, 122)
+        Me.電腦註冊_tb.Location = New System.Drawing.Point(832, 6)
         Me.電腦註冊_tb.Name = "電腦註冊_tb"
-        Me.電腦註冊_tb.Size = New System.Drawing.Size(183, 52)
+        Me.電腦註冊_tb.Size = New System.Drawing.Size(73, 52)
         Me.電腦註冊_tb.TabIndex = 41
         Me.電腦註冊_tb.Text = "電腦註冊" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
         Me.電腦註冊_tb.UseVisualStyleBackColor = True
@@ -48,7 +51,7 @@ Partial Class 系統綁定電腦資訊
         '
         Me.Label4.AutoSize = True
         Me.Label4.ForeColor = System.Drawing.Color.Blue
-        Me.Label4.Location = New System.Drawing.Point(3, 96)
+        Me.Label4.Location = New System.Drawing.Point(288, 38)
         Me.Label4.Name = "Label4"
         Me.Label4.Size = New System.Drawing.Size(55, 16)
         Me.Label4.TabIndex = 40
@@ -58,7 +61,7 @@ Partial Class 系統綁定電腦資訊
         '
         Me.Label3.AutoSize = True
         Me.Label3.ForeColor = System.Drawing.Color.Blue
-        Me.Label3.Location = New System.Drawing.Point(3, 67)
+        Me.Label3.Location = New System.Drawing.Point(288, 9)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(55, 16)
         Me.Label3.TabIndex = 39
@@ -87,7 +90,7 @@ Partial Class 系統綁定電腦資訊
         '磁盘型態_tb
         '
         Me.磁盘型態_tb.ForeColor = System.Drawing.Color.Blue
-        Me.磁盘型態_tb.Location = New System.Drawing.Point(65, 93)
+        Me.磁盘型態_tb.Location = New System.Drawing.Point(350, 35)
         Me.磁盘型態_tb.Name = "磁盘型態_tb"
         Me.磁盘型態_tb.Size = New System.Drawing.Size(307, 23)
         Me.磁盘型態_tb.TabIndex = 36
@@ -95,7 +98,7 @@ Partial Class 系統綁定電腦資訊
         '硬碟序列_tb
         '
         Me.硬碟序列_tb.ForeColor = System.Drawing.Color.Blue
-        Me.硬碟序列_tb.Location = New System.Drawing.Point(65, 64)
+        Me.硬碟序列_tb.Location = New System.Drawing.Point(350, 6)
         Me.硬碟序列_tb.Name = "硬碟序列_tb"
         Me.硬碟序列_tb.Size = New System.Drawing.Size(307, 23)
         Me.硬碟序列_tb.TabIndex = 35
@@ -105,15 +108,15 @@ Partial Class 系統綁定電腦資訊
         Me.硬碟ID_tb.ForeColor = System.Drawing.Color.Blue
         Me.硬碟ID_tb.Location = New System.Drawing.Point(65, 35)
         Me.硬碟ID_tb.Name = "硬碟ID_tb"
-        Me.硬碟ID_tb.Size = New System.Drawing.Size(307, 23)
+        Me.硬碟ID_tb.Size = New System.Drawing.Size(221, 23)
         Me.硬碟ID_tb.TabIndex = 34
         '
         '取得本地電腦訊息_bt
         '
         Me.取得本地電腦訊息_bt.ForeColor = System.Drawing.Color.Green
-        Me.取得本地電腦訊息_bt.Location = New System.Drawing.Point(1, 122)
+        Me.取得本地電腦訊息_bt.Location = New System.Drawing.Point(753, 6)
         Me.取得本地電腦訊息_bt.Name = "取得本地電腦訊息_bt"
-        Me.取得本地電腦訊息_bt.Size = New System.Drawing.Size(183, 52)
+        Me.取得本地電腦訊息_bt.Size = New System.Drawing.Size(73, 52)
         Me.取得本地電腦訊息_bt.TabIndex = 33
         Me.取得本地電腦訊息_bt.Text = "取得本地電腦訊息"
         Me.取得本地電腦訊息_bt.UseVisualStyleBackColor = True
@@ -123,14 +126,41 @@ Partial Class 系統綁定電腦資訊
         Me.MAC碼_tb.ForeColor = System.Drawing.Color.Blue
         Me.MAC碼_tb.Location = New System.Drawing.Point(65, 6)
         Me.MAC碼_tb.Name = "MAC碼_tb"
-        Me.MAC碼_tb.Size = New System.Drawing.Size(307, 23)
+        Me.MAC碼_tb.Size = New System.Drawing.Size(221, 23)
         Me.MAC碼_tb.TabIndex = 32
         '
+        '清單_dgv
+        '
+        Me.清單_dgv.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.清單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
+        Me.清單_dgv.BackgroundColor = System.Drawing.Color.White
+        Me.清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.清單_dgv.Location = New System.Drawing.Point(4, 62)
+        Me.清單_dgv.Name = "清單_dgv"
+        Me.清單_dgv.RowHeadersWidth = 5
+        Me.清單_dgv.RowTemplate.Height = 24
+        Me.清單_dgv.Size = New System.Drawing.Size(901, 297)
+        Me.清單_dgv.TabIndex = 688
+        '
+        '考勤綁定_ch
+        '
+        Me.考勤綁定_ch.AutoSize = True
+        Me.考勤綁定_ch.Location = New System.Drawing.Point(663, 37)
+        Me.考勤綁定_ch.Name = "考勤綁定_ch"
+        Me.考勤綁定_ch.Size = New System.Drawing.Size(74, 20)
+        Me.考勤綁定_ch.TabIndex = 689
+        Me.考勤綁定_ch.Text = "考勤綁定"
+        Me.考勤綁定_ch.UseVisualStyleBackColor = True
+        '
         '系統綁定電腦資訊
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(377, 180)
+        Me.ClientSize = New System.Drawing.Size(912, 364)
+        Me.Controls.Add(Me.考勤綁定_ch)
+        Me.Controls.Add(Me.清單_dgv)
         Me.Controls.Add(Me.電腦註冊_tb)
         Me.Controls.Add(Me.Label4)
         Me.Controls.Add(Me.Label3)
@@ -142,12 +172,13 @@ Partial Class 系統綁定電腦資訊
         Me.Controls.Add(Me.取得本地電腦訊息_bt)
         Me.Controls.Add(Me.MAC碼_tb)
         Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        Me.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4)
+        Me.Margin = New System.Windows.Forms.Padding(4)
         Me.MaximizeBox = False
         Me.MinimizeBox = False
         Me.Name = "系統綁定電腦資訊"
         Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
         Me.Text = "系統綁定電腦資訊"
+        CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -163,4 +194,6 @@ Partial Class 系統綁定電腦資訊
     Friend WithEvents 硬碟ID_tb As TextBox
     Friend WithEvents 取得本地電腦訊息_bt As Button
     Friend WithEvents MAC碼_tb As TextBox
+    Friend WithEvents 清單_dgv As DataGridView
+    Friend WithEvents 考勤綁定_ch As CheckBox
 End Class

GRAMS-SYS/10、系統管理/系統綁定電腦資訊.vb

@@ -1,9 +1,27 @@
 Public Class 系統綁定電腦資訊
+    Private Sub Set_清單()
+        Dim ds As New DataSet
+        清單_dgv.DataSource = Nothing : ds.Clear()
+        清單_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
+        清單_dgv.ColumnHeadersHeight = 25
+        清單_dgv.AllowUserToAddRows = False
+        ConnOpen_ERP()
+        SQL1 = "SELECT MAC碼, 硬碟ID, 硬碟序列, 磁盘型態, 考勤綁定 FROM 系統綁定電腦資訊"
+        CmdSet_For_DGV()
+        da.Fill(ds) : 清單_dgv.DataSource = ds.Tables(0) : conn.Close()
+    End Sub
     Private Sub 系統綁定電腦資訊_Load(sender As Object, e As EventArgs) Handles MyBase.Load
     End Sub
     Private Sub 系統綁定電腦資訊_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
         取得本地電腦訊息_bt.PerformClick()
     End Sub
+    Private Sub 清單_dgv_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles 清單_dgv.CellClick
+        If e.RowIndex = -1 Then : Else
+            MAC碼_tb.Text = 清單_dgv("MAC碼", e.RowIndex).Value.ToString : 硬碟ID_tb.Text = 清單_dgv("硬碟ID", e.RowIndex).Value.ToString
+            硬碟序列_tb.Text = 清單_dgv("硬碟序列", e.RowIndex).Value.ToString : 磁盘型態_tb.Text = 清單_dgv("磁盘型態", e.RowIndex).Value.ToString
+            考勤綁定_ch.Checked = 清單_dgv("考勤綁定", e.RowIndex).Value
+        End If
+    End Sub
     Private Sub 取得本地電腦訊息_bt_Click(sender As Object, e As EventArgs) Handles 取得本地電腦訊息_bt.Click
         '-----MAC碼----------------------------------------------------------------------------------------------
         Dim Wmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")
@@ -26,18 +44,26 @@
             磁盘型態_tb.Text = diskModel
             Exit For
         Next
+        Set_清單()
     End Sub
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles 電腦註冊_tb.Click
         ConnOpen_ERP()
         SQL1 = "SELECT MAC碼 FROM 系統綁定電腦資訊 
                 WHERE  硬碟ID LIKE N'" & 硬碟ID_tb.Text & "' AND 硬碟序列 LIKE N'" & 硬碟序列_tb.Text & "' AND 磁盘型態 LIKE N'" & 磁盘型態_tb.Text & "'"
         CmdSet_For_dr()
-        If dr.Read() Then : conn.Close() : MsgBox("該電腦以綁定過") : Else
+        If dr.Read() Then
+            ConnOpen_ERP()
+            SQL1 = "UPDATE 系統綁定電腦資訊  SET  考勤綁定 = N'" & 考勤綁定_ch.Checked & "'
+                    WHERE (MAC碼 LIKE N'" & MAC碼_tb.Text & "' AND 硬碟ID LIKE N'" & 硬碟ID_tb.Text & "' AND 
+                          硬碟序列 LIKE N'" & 硬碟序列_tb.Text & "'AND 磁盘型態 LIKE N'" & 磁盘型態_tb.Text & "')"
+            CmdSet_For_dr() : conn.Close()
+            MsgBox("修改完成") : Set_清單()
+        Else
             ConnOpen_ERP()
-            SQL1 = "INSERT INTO 系統綁定電腦資訊 (MAC碼, 硬碟ID, 硬碟序列, 磁盘型態) " &
-                  "VALUES (N'" & MAC碼_tb.Text & "',N'" & 硬碟ID_tb.Text & "',N'" & 硬碟序列_tb.Text & "',N'" & 磁盘型態_tb.Text & "')"
+            SQL1 = "INSERT INTO 系統綁定電腦資訊 (MAC碼, 硬碟ID, 硬碟序列, 磁盘型態, 考勤綁定) " &
+                  "VALUES (N'" & MAC碼_tb.Text & "',N'" & 硬碟ID_tb.Text & "',N'" & 硬碟序列_tb.Text & "',N'" & 磁盘型態_tb.Text & "', N'" & 考勤綁定_ch.Checked & "')"
             CmdSet_For_dr() : conn.Close()
-            MsgBox("新增完成")
+            MsgBox("新增完成") : Set_清單()
         End If
     End Sub
 End Class

GRAMS-SYS/HSKIN-MIS-SYS.vbproj

@@ -83,6 +83,10 @@
     <Reference Include="CefSharp.WinForms, Version=127.3.50.0, Culture=neutral, PublicKeyToken=40c4b6fc221f4138, processorArchitecture=MSIL">
       <HintPath>..\packages\CefSharp.WinForms.127.3.50\lib\net462\CefSharp.WinForms.dll</HintPath>
     </Reference>
+    <Reference Include="DotNetBarcode, Version=2.4.2480.34661, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>bin\Debug\DotNetBarcode.dll</HintPath>
+    </Reference>
     <Reference Include="Microsoft.Office.Interop.Excel, Version=15.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
       <EmbedInteropTypes>True</EmbedInteropTypes>
@@ -94,6 +98,7 @@
     <Reference Include="System.Deployment" />
     <Reference Include="System.Drawing" />
     <Reference Include="System.Management" />
+    <Reference Include="System.Messaging" />
     <Reference Include="System.Windows.Forms" />
     <Reference Include="System.Windows.Forms.DataVisualization" />
     <Reference Include="System.Xml" />
@@ -204,6 +209,12 @@
     <Compile Include="04、考勤管理\考勤位置設定.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="04、考勤管理\考勤打卡主機.Designer.vb">
+      <DependentUpon>考勤打卡主機.vb</DependentUpon>
+    </Compile>
+    <Compile Include="04、考勤管理\考勤打卡主機.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="04、考勤管理\考勤表列印選擇.Designer.vb">
       <DependentUpon>考勤表列印選擇.vb</DependentUpon>
     </Compile>
@@ -468,6 +479,9 @@
     <EmbeddedResource Include="04、考勤管理\考勤位置設定.resx">
       <DependentUpon>考勤位置設定.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="04、考勤管理\考勤打卡主機.resx">
+      <DependentUpon>考勤打卡主機.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="04、考勤管理\考勤表列印選擇.resx">
       <DependentUpon>考勤表列印選擇.vb</DependentUpon>
     </EmbeddedResource>

GRAMS-SYS/LoginForm1.vb

@@ -56,6 +56,7 @@ Public Class LoginForm1
         PA1 = MACKK : PA2 = diskId : PA3 = diskSerialNumber : PA4 = diskModel
         SQL_電腦綁定()
         If dr.Read() Then
+            If dr("考勤綁定") = False Then : 打卡 = False : Else : 打卡 = True : End If
             conn.Close() : 適應症_bt.Visible = True
         Else
             conn.Close() : 適應症_bt.Visible = False
@@ -122,6 +123,6 @@ Public Class LoginForm1
         Me.Close()
     End Sub
     Private Sub 適應症_bt_Click(sender As Object, e As EventArgs) Handles 適應症_bt.Click
-        非第一次 = False : Me.Hide() : 醫師.Show()
+        If 打卡 = False Then : 非第一次 = False : Me.Hide() : 醫師.Show() : Else : 非第一次 = False : Me.Hide() : 考勤打卡主機.Show() : End If
     End Sub
 End Class

GRAMS-SYS/obj/Debug/HSKIN-MIS-SYS.vbproj.CoreCompileInputs.cache

@@ -1 +1 @@
-3f803c864a055d72ea7ec67464d030c2c1292f64866a8c3a4332874e225ed015
+b3835af0f52a7b2729d61e92dfe14d0f7597c3bb34ba8fc1962313eedb630f6e

GRAMS-SYS/obj/Debug/HSKIN-MIS-SYS.vbproj.FileListAbsolute.txt

@@ -525,3 +525,4 @@ D:\使用者\下載\HSKIN-MIS-SYS-SIU-master\hskin-mis-sys-siu\GRAMS-SYS\obj\Deb
 D:\使用者\下載\HSKIN-MIS-SYS-SIU-master\hskin-mis-sys-siu\GRAMS-SYS\obj\Debug\HSKIN-MIS-SYS.exe
 D:\使用者\下載\HSKIN-MIS-SYS-SIU-master\hskin-mis-sys-siu\GRAMS-SYS\obj\Debug\HSKIN-MIS-SYS.xml
 D:\使用者\下載\HSKIN-MIS-SYS-SIU-master\hskin-mis-sys-siu\GRAMS-SYS\obj\Debug\HSKIN-MIS-SYS.pdb
+D:\工巧明\HSKIN\HSKIN-MIS-SYS\GRAMS-SYS\obj\Debug\HSKIN_MIS_SYS.考勤打卡主機.resources