Vbscript Funcation

Dear Exprt,

Please advice for below script its work if remove (Funcation).

Option Explicit

Function copyfile()
Dim FSO, fileTo, Filefrm
Set FSO = CreateObject("Scripting.FileSystemObject")
fileTo = "C:\Temp\Test.exe"
Filefrm = "\\SharedFolder\Test.exe"
if (FSO.FileExists(fileTo)) Then 

FSO.DeleteFile (fileTo)

WScript.Sleep "2000"

FSO.CopyFile (Filefrm), (fileTo)


Else

FSO.CopyFile (Filefrm), (fileTo)

End If

End Function

Support@Mytechnet.me