Hook کردن هارد

[mahmood744]

سلام به همه دوستان عزیز
من می خوام نام فایل هایی که هارد داره می خونه رو داشته باشم:متفکر:
مثلا کاربر درایو D را باز می کنه من لیست فایل ها یا مسیرش رو داشته باشم
چطور میشه فهمید کاربر الان توی کدوم شاخه است:متفکر:

ممنون میشم راهنماییم کنید:قلب:

[mahmood744]

با سلام
این کد فایل هایی که تغییر می کند یا پاک می شود را نشان می دهد
اما من می خواهم فایل هایی که خوانده می شود را پیدا کنم



Imports System.IO

Module Module1
Sub Main()

Dim fsw As New FileSystemWatcher("C:\")
fsw.NotifyFilter = (NotifyFilters.LastAccess Or NotifyFilters.LastWrite _
Or NotifyFilters.FileName Or NotifyFilters.DirectoryName)
AddHandler fsw.Changed, New FileSystemEventHandler(AddressOf OnChanged)

AddHandler fsw.Created, AddressOf OnChanged
AddHandler fsw.Deleted, AddressOf OnChanged
AddHandler fsw.Renamed, AddressOf OnRenamed
AddHandler fsw.Error, AddressOf OnError
fsw.EnableRaisingEvents = True
Console.WriteLine("Press 'Enter' to quit the sample.")
Console.ReadLine()
End Sub

Private Sub OnChanged(ByVal source As Object, ByVal e As FileSystemEventArgs)

Dim wct As WatcherChangeTypes = e.ChangeType
Console.WriteLine("File {0} {1}", e.FullPath, wct.ToString())
End Sub

Private Sub OnRenamed(ByVal source As Object, ByVal e As RenamedEventArgs)

Dim wct As WatcherChangeTypes = e.ChangeType
Console.WriteLine("File {0} {2} to {1}", e.OldFullPath, e.FullPath, wct.ToString())
End Sub

Private Sub OnError(ByVal source As Object, ByVal e As ErrorEventArgs)

Console.WriteLine("The FileSystemWatcher has detected an error")

If TypeOf e.GetException Is InternalBufferOverflowException Then
Console.WriteLine( _
"The file system watcher experienced an internal buffer overflow: " _
+ e.GetException.Message)
End If
End Sub
End Module




من لیست فایل هایی که اکسپلورر می خونه را می خواهم یا لیست فایل هایی که در حال خوانده شده از روی هارد می باشند
با تشکر

[mmbguide]

http://barnamenevis.org/showthread.php?533465-%D8%B4%D9%86%D8%A7%D8%B3%D8%A7%DB%8C%DB%8C-%D9%85%D8%B3%DB%8C%D8%B1-%D9%81%D8%B9%D8%A7%D9%84-%D8%AF%D8%B1-Explorer-%D9%88%DB%8C%D9%86%D8%AF%D9%88%D8%B2