这复制表出现提示错误
copy file C:\Documents and Settings\Administrator\桌面\学生成绩查询系统\*.dbf to C:\Documents and Settings\Administrator\桌面\学生成绩查询系统\备份\*.dbf
messagebox("数据要备份到“ c:\***\学生成绩查询系统\备份”文件夹,恢复时直接复制回 c:\***\学生成绩查询系统 中即可",64 ,"提示") a1=messagebox("只备份表文件、数据库文件等数据文件",3+32,"提示") if a1=6 clear close all copy file "C:\Documents and Settings\Administrator\桌面\学生成绩查询系统\*.dbf" to "C:\Documents and Settings\Administrator\桌面\学生成绩查询系统\备份\*.dbf" messagebox("备份已经完成,会自动关闭软件,请重新启动!",64,"特别提示") endif