D
Deleted Bruce 182381
Guest
I am seeking an Access based media manager that allows me to index documents, images, and audio files so I can quickly locate, view, and attach selected files to email messages.
The app that @isladogs mentioned can do that.I can filter my searches.
pth = YourPathToExeFile
SearchThis = "A part of your file name/extension/Or anything you know about the file"
fltr = YourFilterName
Shell pth & " -filter " & fltr & " -s" & " " & clsConst.Quote & SearchThis & clsConst.Quote, 1
Way to goI can always build it from scratch.
Sub ScanFilesToAccess()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fso As Object
Dim folderPath As String
Dim folder As Object
Dim file As Object
' Prompt user to select folder
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Select Folder to Scan"
If .Show <> -1 Then Exit Sub
folderPath = .SelectedItems(1)
End With
' Initialize FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(folderPath)
' Open Access table
Set db = CurrentDb
Set rs = db.OpenRecordset("FileInventory", dbOpenDynaset)
' Recursive scan
Call ScanFolder(folder, rs)
rs.Close
Set rs = Nothing
Set db = Nothing
Set fso = Nothing
MsgBox "Scan complete!", vbInformation
End Sub
Sub ScanFolder(ByVal folder As Object, ByRef rs As DAO.Recordset)
Dim subFolder As Object
Dim file As Object
'add FileType with SELECT CASE extension?
Dim strFileType As String
Dim strExtension As String
' Loop through files
For Each file In folder.Files
strExtension = Mid(file.Name, InStr(1, file.Name, ".") + 1)
Select Case strExtension
Case "jpeg", "jpg", "img", "mov", "png"
strFileType = "Image"
Case "ACCDB", "MDB", "ACCDE", "MDE"
strFileType = "Access"
' === ADD MORE === or use a small lookup table
Case Else
strFileType = "Other"
End Select
rs.AddNew
rs!FileName = file.Name
rs!folderPath = file.Path
rs!FileSize = file.Size
rs!DateModified = file.DateLastModified
rs!FileType = strFileType
rs.Update
Next file
' Loop through subfolders
For Each subFolder In folder.SubFolders
ScanFolder subFolder, rs
Next subFolder
End Sub
Are you seeking something like this?I am seeking an Access based media manager that allows me to index documents, images, and audio files so I can quickly locate, view, and attach selected files to email messages.
I am seeking/building a Document Management System that allows healthcare patients to scan, store, view, and send medical records, using multiple selection criteria to filter desired documents. Below is my mockup ER.
Its read only.It's my understanding that user-defined properties can be added to files. Can your tool edit existing properties, or it just reads them?
It's my understanding that user-defined properties can be added to files. Can your tool edit existing properties, or it just reads them?
So this is an application that the healthcare patients use - they supply the docs (through scanning, attaching), and review and then may send those to a medical record - is that external? If so the process for accepting such records may/will need stringent verification/validation, which may affect the data needed in your application.I am seeking/building a Document Management System that allows healthcare patients to scan, store, view, and send medical records, using multiple selection criteria to filter desired documents.
Yes, the sensitivities of personal health information (and consequent regulation), as well as the breadth and depth of health data makes interoperability extremely complex. While your application is simply to provide a (set) of health documents, they remain outside the commercial EHR application. HL7 is a widely used protocol that is employed to support exchange of data in health apps (however usually only within the bounds of the defined organisation). IIRC there has been work done within HL7 to define the exchange of structured medical docs (like hosptial discharge summaries). A genuine EHR scope extends beyond the bounds of a commercial app implemented within an organisation - it has to be able to support (capture, store (or point to) and present) the full set of health events over the lifespan of the individual - no matter what, where or when those health events occurred.Cerner EHR cannot access records stored in Epic, AthenaHealth, and other EHR systems because there's no interoperability between these EHR's, or the provider network restricted access to only within their organization.