Copying files from the server to the PC

[JimmySlam]

Hi how do i copy a file from the server to the PC?

I have this code but it says that type mismatch 'CopyFile'


<%

Const ForWriting=2
strPath = Server.MapPath("datos.xml")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set oFile = fso.GetFile(strPath)
Set tso = oFile.OpenAsTextStream(ForWriting)

sob=1
CopyFile "datos.xml", file://c:/datos.xml, sob
%>


Thanks