hi
when using the following api call i get an error which
reads: cannot delete file
file system error

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
'moves file to recycle bin

code bit

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key

Case "delete"
Dim SHop As SHFILEOPSTRUCT
Dim strwav As String

With SHop
.wFunc = FO_DELETE
.pFrom = strwav
.fFlags = FOF_ALLOWUNDO
End With

SHFileOperation SHop
End Select

End Sub


any ideas