回复 10楼 qingfameng
是啊,我也这么认为,可是就是不执行,进入目录,可以执行.我改了代码
dqlj=SYS(5)+SYS(2003) &&获取程序工作目录
mpath=space(512) &&变量mpath预留512个空字符。
=SHGetPathFromIDList(pidl,@mpath) &&如果成功,用户选择的路径名,将自动填入mpath变量中。
CLEAR DLLS
*mpath=LEFT(mpath,50) &&取左边字符串,后面的数字是长度
mpath=ALLTRIM(mpath)
cd &mpath
IF !directory("图书备份文件")
MD 图书备份文件
endif
copy file &dqlj.\DATA\*.* to 图书备份文件\. &&将文件拷贝到所选文件夹下
CD &dqlj
messagebox(allt(mpath)) &&显示用户选择的路径名。
倒是能够执行,可是选了一些特殊目录,程序就出错,提示错误路径
能不能取消这些路径的显示啊?