ASP in the FSO Copy file code _FSO topic

Copy Code code as follows:

Tempsource,tempend must use absolute path
Rootpath=request.servervariables ("Appl_physical_path") ' Get Current program absolute path
Function CopyFiles (Tempsource,tempend)
Dim FSO
Set FSO = Server.CreateObject ("Scripting.FileSystemObject")
IF FSO. FileExists (Tempend) Then
Response.Write "Target backup file <b>" & Tempend & "</b> already exists, please delete!"
Set fso=nothing
Exit Function
End IF
IF FSO. FileExists (Tempsource) Then
Else
Response.Write The source database file to copy <b> &TempSource& </b> does not exist! "
Set fso=nothing
Exit Function
End If
Fso. CopyFile Tempsource,tempend
Response.Write "Successfully copied files <b>" &TempSource& "</b> to <b>" &TempEnd& "</b>"
Set FSO = Nothing
End Function