• Home
 · 
• Windows API Call/Explanation
 · 
• DELETE A FILE WITHOUT ANY DIALOGE BOX AND FILE WILL NOT MOVE TO RECYCLE BIN

DELETE A FILE WITHOUT ANY DIALOGE BOX AND FILE WILL NOT MOVE TO RECYCLE BIN

DELETE A FILE WITHOUT ANY DIALOGE BOX AND FILE WILL NOT MOVE TO RECYCLE BIN

API Declarations



Private Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Boolean
hNameMappings As Long
lpszProgressTitle As String
End Type
'API That will not send file to recycle bin
Private Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Private Const FO_DELETE = &H3
Private Const FOF_SILENT = &H30




Rate DELETE A FILE WITHOUT ANY DIALOGE BOX AND FILE WILL NOT MOVE TO RECYCLE BIN

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'Insert a command button to form and paste code below
Private Sub Command1_Click()

Dim FileOperation As SHFILEOPSTRUCT
Dim lReturn As Long
With FileOperation
    .wFunc = FO_DELETE
    .pFrom = "c:\aks\anurag.txt"     
                                       'Give the file name with Path 
                                       'or you can determine the path 
    .fFlags = FOF_SILENT 'FOF_ALLOWUNDO
End With
lReturn = SHFileOperation(FileOperation)

End Sub