Hej.

Nån som har kod för att flytta en fil till papperskorgen utan att man måste bekräfta varje fil?

Går det överhuvud taget?

Hittade kod själv.

Lite modifierad:
<code>
Public Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long
End Type

Public Declare Function SHFileOperation Lib _
"shell32.dll" Alias "SHFileOperationA" (lpFileOp _
As SHFILEOPSTRUCT) As Long

Public Const FO_DELETE = &H3
Public Const FOF_ALLOWUNDO = &H40
Public Const FOF_NOCONFIRMATION = &H10

Public Function Move2RecycleBin(FilePath As String) As Boolean
Dim SHop As SHFILEOPSTRUCT
Dim strFile As String

With SHop
.wFunc = FO_DELETE
.pFrom = FilePath
.fFlags = FOF_ALLOWUNDO + FOF_NOCONFIRMATION
End With

SHFileOperation SHop
End Function
</code>

Får man fråga varför du vill göra en sådan sak?

Jodå.

På jobbet håller jag på med ett program som skall läsa in lite filer och skriva ut en faktura.

De vill att filerna skall tas bort efter att detta är gjort.

Nu får de valet att lägga dem i papperskorgen istället. OM det skulle bli problem.
De skall då inte behöva bekräfta varje gång.

Så enkelt var det.