Kurzer Refresh-Code für den Desktop ?
01.09.2014 14:15:59
Peter
Ich bin schon sehr lange an diesem Thema ! Wie kann man (vorher!) herausfinden, ob nachfolgender Code keine Schäden anrichtet bzw. kann jemand diesen interpretieren bzw. einen Hinweis/Kommentar abgeben ?
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_COMMAND = &H111
Private Sub Refresh()
Dim rc As Long
rc = SendMessage(oApp.MainFrameHWND, WM_COMMAND, 43086, 0)
End Sub
Vielen Dank zum Voraus - Peter.