|
原帖由 2010qaqz111 于 2013-3-7 03:16 发表 
FDRV 可否返回系统中空闲可用的盘符列表?
FDRV =*:
这个返回的都是系统中已有的盘符,拿到空闲盘符对做RAM盘很方便。
另外这个返回的已有盘符列表可否以倒序返回?
_SUB GetNopDrvC //C开始空闲
ENVI &&__V=
FDRV &&__V1=*
FORX * C D E D G H I J K L M N O P Q R S T U V W X Y Z , &&s, //A B 可以不要
{
SSTR &&P=%&s%,1,%&__V1%
IFEX $%&P%<1, ENVI &__V=%&__V% %&s%:
}
MSTR %~1=2,-1,%&__V% //去掉开始的空格
_END
_SUB GetRDrv //倒序
ENVI &&__V=
FDRV &&__V1=*
FORX * %&__V1% , &&s, ENVI &__V=%&s%: %&&__V% //反序
MSTR %~1=-2,0,%&&__V% //去掉最后的空格
_END
ENVI &&NopDrv=
GetNopDrvC &NopDrv
ENVI &&RDrv=
GetRDrv &RDrv
MESS C开始空闲:%&NopDrv% \n倒序:%&RDrv%
|
|