QQ网名大全

怎样在ACCESS中获取一个文件夹中最新的文件的文件名

我曾经做过一个书目管理程序,就是将自己硬盘、光盘的书目名称做成数据库进行管理,想看什么书的时候,可以更快查找出来。
其中有引用文件名的语句,可能对你有帮助:
Dim str As String 'str用于存放文件的名称
Dim i As Integer
l = Forms![新增书目]![导入地址] '可以用窗体输入地址,如果地址固定,也可以自己直接赋值
str = Dir(l) '这里将字符串改为路径
Do While str <> ""
i = i + 1
文件名.Value = str '保存文件名
书名.Value = Trim(Left(str, InStrRev(str, ".", -1) - 1)) ’去掉扩展名,就是书名
DoCmd.GoToRecord , "读取子窗体", acNewRec
str = Dir '得到下一个文件名
Loop

以上为参考,请根据自己的文件名起名特点,自行用字符函数提取相关数据信息。
佚名
2024-06-07 05:20:13
最佳回答
类似问题(10)