یه تابع یا قطعه کد برای تغییر نام فایل ها

[qhoqnose]

سلام
من چند روز رو یه بانک ذخیره عکس کار میکنم ، کار این دیتابیس اینطوریه که عکسها تو یه فولدر ذخیره هستن و فقط ادرس فایلهای عکس تو این دیتابیس ذخیره میشه
حالا میخوام بعد از این که کاربر اطلاعات هر عکس را اضافه کرد خود دیتابیس یه نام جدید هم که شاید همون ایتونمبر جدول هست رو به جای اسم فایل عکس بده به عکس
دوستان اگه ممکنه این تابع یا کدرو برام بزارید و در موردش یکم توضیح بدید
ممنون از راهنمائیتون
:تشویق:

[ARData]

از توابع دايرکتوري مي توان استفاده کرد من کپي فايلو از يک محل به محل ديگر پيدا کردم ولي چيزي براي تغيير نام در ويژوال بيسيک اکسس وجود نداشت :

FileCopy (CurrentProject.Path & "\Txt1.txt"), (CurrentProject.Path & "\Txt2.txt")

[مهدی قربانی]

سلام
با کمک این دستور می تونید Rename رو انجام بدید .


Name "C:\Test01.txt" As "C:\Test02.txt"