ms

app/DD-Record-Organiser/frmConstructor_Main.vb

@@ -6406,4 +6406,15 @@ Public Class frmConstructor_Main
             End If
         Next
     End Sub
+
+    Private Sub CreationToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CreationToolStripMenuItem.Click
+        For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
+            If row.Item("DOC_PATH") <> String.Empty Then
+                Dim fileCreatedDate As DateTime = File.GetCreationTime(row.Item("DOC_PATH"))
+                MsgBox("file created: " + fileCreatedDate)
+
+            End If
+        Next
+      
+    End Sub
 End Class