20
Сентябрь
2008
Как добавить ссылку в Пуск — Документы
Как добавить ссылку в Пуск=>Документы
Option Explicit
Private Declare Function SHAddToRecentDocs Lib "shell32" _
(ByVal e As Long, ByVal e1 As String) As Long
Private Sub Command1_Click()
SHAddToRecentDocs 2, "D:\2.bmp"
End Sub