نسخ ونقل وتسمية الملفات باستخدام مايكروسوفت اكسس

قد نحتاج الى جعل الاكسس يقوم بعملية نسخ الملفات كأن يقوم بنسخ قاعدة البيانات وحفظها في مكان معين أو ان يقوم بنسخ ملف معين واعادة تسميته او تغيير امتدادة من اجل زيادة الامان ومستوى السرية ، وللقيام بنسخ الملفات باستخدام اكسس فان كل ما عليك هو بعض الاجراءءات البسيطة وكما يلي:

1- اضافة زر امر لتنفيذ عملية النسخ الى النموذج

2- اضافة كود النسخ في حدث عند النقر (الخاص بزر الامر وكما يلي

VBA

FileCopy "C:\Ahmad.txt", "D:\Ahmad.txt"

حيث ان C:\Ahmad.txt هو اسم الملف الذي نريد نقلة وامتداده مع مكانه (المسار) ، وان D:\Ahmad.txt هو المسار الجديد واسم الملف وامتداده .

واذا رغبت بنقل الملف مع تغيير اسمه فان كل ما عليك هو تغيير الاسم الجديد كما في المثال التالي

VBA

FileCopy "C:\Ahmad.txt", "D:\Khaled.txt"

واذا رغبت بنقل الملف مع تغيير اسمه ونوعه  ( الامتداد) فان كل ما عليك هو تغيير الامتداد الجديد كما في المثال التالي (مع مراعاة ان الملف لن يفتح الا اذا تم اعادة امتدادة الى الامتداد الاصلي)

VBA

FileCopy "C:\Ahmad.txt", "D:\Ahmad.rar"