一个小问题，请教专家

Question

我想把数据从某个地方恢复到本目录下，下面是我编的一串代码，就是得到文件名后，再怎么处理的问题了，请教专家。

程序是在VFP 6。0下写的。

= MESSAGEBOX('查找备份数据的位置')
datafile=getfile()
if .not. file('datafile')
   wait window timeout 2 '没有可恢复的数据’
ENDIF
run copy datafile /y
  run arj x -y -v data
ERASE data.arj
= MESSAGEBOX('完成',32,'信息')
    release windows
   close all
   clea windows