Обновление рабочего стола - VB

Узнай цену своей работы

Формулировка задачи:

Всем привет! Встал вопрос после создания/удаления ярлыков на рабочем столе обновить последний. Все что нашел на форуме, так это пример "по F5" и под NET...
Никто не поможет, тоже под VB6?

Решение задачи: «Обновление рабочего стола»

textual
Листинг программы
Option Explicit
 
Private Const SHCNE_ASSOCCHANGED As Long = &H8000000
Private Const SHCNF_IDLIST As Long = &H0
 
Private Declare Function SHChangeNotify Lib "Shell32.dll" (ByVal wEventID As Long, _
ByVal uFlags As Long, ByVal dwItem1 As Long, ByVal dwItem2 As Long) As Long
 
Private Sub Command1_Click()
' обновить рабочий стол
Call SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0)
 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 4 из 5