使用TP1200触摸屏，历史数据文件存在SD卡上，我希望将SD卡上的历史数据0.csv文件拷贝到USB盘上。以下为脚本程序，好像拷贝不过来，请多多指教！

Sub VBFunction_1()

Dim filesystem
On Error Resume Next
Set filesystem = CreateObject("FileCtl.Filesystem")

If Err.Number<>0 Then
ShowSystemAlarm "erro #" & CStr(Err.Number) & " " & Err.Des cription
Err.Clear
Exit Sub
End If

filesystem.FileCopy "\Storage Card SD\Logs\历史数据0.csv" , "\Storage Card USB\历史数据.csv"

If Err.Number<>0 Then
ShowSystemAlarm "erro #" & CStr(Err.Number) & " " & Err.Des cription
Err.Clear
Exit Sub
End If

Set filesystem = Nothing

ShowSystemAlarm "None"

End Sub