首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

关于用VF批量改名的有关问题~

2012-03-29 
关于用VF批量改名的问题~!有一个文件夹,里面全是.jpg格式的文件,名称如:13100001.jpg 13100008.jpg 131000

关于用VF批量改名的问题~!
有一个文件夹,里面全是.jpg格式的文件,名称如:13100001.jpg 13100008.jpg 13100010.jpg......(1310都一样的)
如何实现把前缀1310去掉 所有的文件名称变成0001.jpg 0008.jpg 0010.jpg 

如何实现...vf的...

[解决办法]
ss=ADIR(dd,'*.xls')
FOR i=1 TO ALEN(dd,1)
IF LEFT(dd(i,1),4)='1310'
FF='RENAME '+DD(I,1)+' TO '+STRTRAN(DD(I,1),'1310','')
&FF
ENDI
next
[解决办法]
lnFileNumber=Adir(aFile,'路径\*.jpg')
For m.lnI=1 To lnFileNumber
If Left(aFile(m.lnI,1),4)='1310'
lcStr='Rename '+aFile(m.lnI,1)+' To '+Substr(aFile(m.lnI,1),5)
&lcStr.
Endif
Endfor

热点排行