用照片的拍摄时间来命名照片

手头有很多照片，想通过拍摄时间来对照片命名，这样方便进行管理。前段时间写了一个类似的程序，但是使用的是照片的创建时间，但有的照片的创建时间和拍摄时间并不一致，因此这次重写了一下这个程序，使用的是照片的拍摄时间来命名。本程序参考了网上的部分代码，如有侵权，请告知。
'*****************************************************************
'Name:filename.frm
'Desc:使用照片的拍摄日期和时间，命名该照片
'Parameter:
'Return:
'Author: yoyoba(stuyou@126.com)
'Date: 2011-8-30
'Modify:2011-8-30
'***********************************************