ASP删除文件的函数

‘[删除某个文件]
‘函数名:DelFile
‘作 用:删除某个文件
‘参 数:dFilename —- 被删除的文件名(包括路径)
‘返回值:文件删除返回True,否则False
‘**************************************************
Public Function DelFile(ByVal dFilename)
Dim M_fso
DelFile=False
Set M_fso = CreateObject(“Scripting.FileSystemObject”)
If M_fso.FileExists(dFilename) Then
M_fso.DeleteFile(dFilename)
DelFile=True
End If
Set M_fso = Nothing
End Function


寒林

www.3code.cn 专注WordPress企业主题