SELECT日销累计puname=PUTFILE([请输入文件名:],[],[xls])iflen(allt(puname))=0waitwindow"没有输入文件名,不能导出"elsewaitwindownowait"请稍候,正在导出EXCL表格中……"copyto&puname.TYPEXL5waitwindownowait"导出完成"endif简单,实用