باز كردن و خالي كردن محتواي ريسايكلبين با ويژوال ؟

[kivoon]

اگه ممكنه نحوه خالي كردن و باز كردن ريسايكل بين را اموزش دهيد:تشویق:
خيلي ممنونم:قلب:

[xxxxx_xxxxx]

براي باز كردن Recycle Bin از اين دستور استفاده كنيد:


Shell "Explorer /N,::{645FF040-5081-101B-9F08-00AA002F954E}", vbMaximizedFocus


فايل هاي Recycle Bin تو ريشه هر درايو تو فولدر RECYCLER وجود دارند. مي تونيد به اون مسير بريد و فايل هاشو پاك كنيد. البته شايد براي خالي كردن Recycle Bin راه بهتري وجود داشته باشه.

[kivoon]

دستت بي بلا
منضور من اينه مي خوام يه برنامه مثل objict douk درست كنم

وبراي اين كار بايد از توي برنامه محتواي recycle bin پاك بشه

[parselearn]

Private Const SHERB_NOCONFIRMATION = &H1
Private Const SHERB_NOPROGRESSUI = &H2
Private Const SHERB_NOSOUND = &H4
Private Declare Function SHEmptyRecycleBin Lib "shell32.dll" Alias "SHEmptyRecycleBinA" (ByVal hWnd As Long, ByVal pszRootPath As String, ByVal dwFlags As Long) As Long
Private Declare Function SHUpdateRecycleBinIcon Lib "shell32.dll" () As Long

SHEmptyRecycleBin Me.hWnd, vbNullString, SHERB_NOCONFIRMATION
SHUpdateRecycleBinIcon