请问各位高手，在Access中如何编写代码让计算机自己批量修改磁盘上的文件名？

ouxingwang

我的“MP3音乐文件”数据库中，有一个表“MP3文件”，该表中有310条记录，部分记录如下：

编号   数据文件名     中文文件名

1          01                  奉献

2          02                 滚滚长江东逝水

3          03                 红花红颜

4          04                 历史的天空

。。。。。。。。。。。。。。。。

在我硬盘的D盘上有一个目录，名字叫：mp3，在这个目录里，有01.mp3,02.mp3,03.mp3,......,310.mp3,我现在想把：01.mp3,改为：奉献.mp3;02.mp3,改为:滚滚长江东逝水.mp3;03.mp3,改为:红花红颜.mp3,........,请问各位高手，在Access中如何编写代码让计算机自己批量修改磁盘上的文件名?

kevindeng

用FileSystemObject,如Dim a As New FileSystemObject

a.GetFile("d:\mp3\01.mp3").Name = "奉献.mp3"只要做一个循环就可以批量更改了.