vfp 如何获取指定文件夹根目录下的文件夹名
1个回答
展开全部
lcpath=getdir()
if !empty(lcpath)
lcpath=lcpath+'*.*'
lnFc=adir(laDir,lcpath,'D')
for i=1 to lnFc
if 'D'$ladir[i,5] &&是目录
?'目录名：'+ldir[i,1]
endif
endfor
endif
if !empty(lcpath)
lcpath=lcpath+'*.*'
lnFc=adir(laDir,lcpath,'D')
for i=1 to lnFc
if 'D'$ladir[i,5] &&是目录
?'目录名：'+ldir[i,1]
endif
endfor
endif
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
