23 | 03 | 2017

Add File to Recent Document List

 

Private Declare Sub SHAddToRecentDocs Lib "shell32.dll" (ByVal uFlags As Long, ByVal pv As String)

'Add a document (file) to the Recent Document List
Public Sub AddRecDocList(ByVal FileName As String)
If Dir(FileName) Then
SHAddToRecentDocs 2, FileName
End If

End Sub
Login

Sign up now and upload your code to the website.

Help us to continue.....
Statistics
Articles View Hits
2206732
Latest Articles