Get the files of the users startup menu
Dim theFiles As String()
theFiles = Directory.GetFiles(Environment.GetFolderPath(Environment.SpecialFolder.StartMenu), "*", SearchOption.AllDirectories)
Dim i As Integer
For i = 0 To (theFiles.Length - 1)
MsgBox(theFiles(i).ToString())
Next
theFiles = Directory.GetFiles(Environment.GetFolderPath(Environment.SpecialFolder.StartMenu), "*", SearchOption.AllDirectories)
Dim i As Integer
For i = 0 To (theFiles.Length - 1)
MsgBox(theFiles(i).ToString())
Next
Comments
Post a Comment