الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال فى النسخ الاحتياطى

مغلق
بدأه c_vita في 8 أغسطس 2007 · 1 رد · 487 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

فى النسخ الاحتياطى يوجد فى الدلفى العديد من الاجراءات والدوال التى تقوم بعمل النسخ لل files & directories

الا اننى استخدمت الكود التالى لكن يبدو لا يقوم بالعمل المطلوب حيث يعطينى الفولدر الجديد ولكن ينقل ملف قاعدة البيانات اليه !!

- طبعا الفكرة فى الشفرة هى انشاء فولدر يحمل اسم هو تاريخ وساعة عملية النسخ ثم نقل ملف قاعدة البيانات اليه

- سؤال ما هى الوحدة التى تحتوى على توابع النسخ وحذف واعادة التسمية و.و.و للملفات والحافظات

 DateTimeToString(DName,'d-m-y-h',Now);
  Asist:=Dir+'\'+'My Db '+DName+'\';
  MkDir(Asist);
  if DirectoryExists(Asist)  then
  CopyFile('D:\المشروع\Data\aadb.mdb',Asist);

لدى سؤال اخر ولكن لم يحن وقته ارجو ان لا اكون قد اكثرت

لا تنسى ذكر الله

#2

الاخ العزيز

تحية طيبة

للنسخ استخدم الكود التالى :

var
Filesource,filedest : String;
begin
 fileSource := 'C:\SourceFile.txt';
  fileDest := 'C:\DestFile.txt';
  CopyFile(PChar(fileSource), PChar(fileDest), False);
end;

ويمكن الاطلع على File Name Utilities و File Management Routines حيث تحتوى على الكثير من التوابع المفيدة بالنسبة إليك.

.jpg

______________________________________________________________________________

[وسط]9ber.gif

ip2location.png

______________________________________________________________________________

(فَقُلْتُ اسْتَغْفِرُوا رَبَّكُمْ إِنَّهُ كَانَ غَفَّارًا (10) يُرْسِلِ السَّمَاء عَلَيْكُم مِّدْرَارًا (11) وَيُمْدِدْكُمْ بِأَمْوَالٍ وَبَنِينَ وَيَجْعَل لَّكُمْ جَنَّاتٍ وَيَجْعَل لَّكُمْ أَنْهَارًا (12)

مَّا لَكُمْ لَا تَرْجُونَ لِلَّهِ وَقَارًا (13) وَقَدْ خَلَقَكُمْ أَطْوَارًا (14))

* سورة نوح[/وسط]

من اجمل المواقع على الاطلاق

القرآن الكريم

هذا الموضوع مغلق.

مواضيع مشابهة