VB.Net Possibile richiamare funzione che esegue windows explorer alla pressione di F5

[oregon]

Posta anche il codice che modifica il registro per provare

[deamon75]

Posta anche il codice che modifica il registro per provare

My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "Hidden", 1, RegistryValueKind.DWord)

In pratica diventa:

Private Const HWND_BROADCAST = &HFFFFPrivate Const SMTO_ABORTIFHUNG = &H2
Private Const WM_SETTINGCHANGE = &H1A
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long


Private Sub RefreshExplorer()
    SendMessage HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0
End Sub


Private Sub Button1_Click()
    My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "Hidden", 1, RegistryValueKind.DWord)
    RefreshExplorer()
End Sub