先查找这个文件是否存在,如果存在,删除,再移动不就行了
function test()on error goto L_end ’功能代码exit function'正常退出L_end:'不正常退出 msgbox(err.discription)end function试试还会提示吗
if err.number<>0 then ....goto lineend if
