批量更改文件名
各位大哥好:
有一批文件的文件名和Access中的一个字段里的数据匹配的,我想把这批文件的文件名改成Access另一个字段里的,请问在VB6里怎样实现,谢谢!!
[解决办法]
有一批文件的文件名和Access中的一个字段里的数据匹配的,我想把这批文件的文件名改成Access另一个字段里的,请问在VB6里怎样实现,谢谢!!
查询然后根据字段改名,如果字段包含完全路径,就直接如下
用循环
do while !rs.eof
Name rs.fileds( "字段1 ") as rs.fileds( "字段1 ")
rs.movenext
loop
[解决办法]
这个也行
do while !rs.eof
shell "rename C:\ " rs.fileds( "字段1 ") & " "& rs.fileds( "字段1 ")
rs.movenext
loop