example usage:
Deletes file.txt In directory New Folder off C drive's root.
<% Kill "C:New Folderfile.txt" %>

Deletes file.txt In directory New Folder off the server's root.
<% Kill Server.MapPath("/New Folder/file.txt") %>

Deletes all files In directory New Folder off the C drive's root.
<% Kill "C:New Folder*" %>

Deletes all files In directory New Folder off the server's root.
<% Kill Server.MapPath("/New Folder") & "*" %>
source code:
<%
Private Sub Kill(ByVal pathname)
    Dim objFSO, boolErr, strErrDesc
    On Error Resume Next
    Set objFSO = Server.CreateObject("scripting.filesystemobject")
    objFSO.DeleteFile pathname
    If Err Then 
        boolErr = True
        strErrDesc = Err.description
    End If
    Set objFSO = Nothing
    On Error GoTo 0
    If boolErr Then Err.Raise 5102, "Kill Statement", strErrDesc
End Sub
%>