VB 0.6 Copy, Paste, Cut and Create Folders
بسم الله الرحمن الرحيم
Microsoft Visual Basic 6.0
درس اليوم هو فى التعامل مع المجلدات و الملفات باستخدام الفيجوال بيزك 6 بالنسخ و القطع و اللصق
للتعامل مع FSO او File System Objects يجب اضافة الـــ Reference الخاص به الى المشروع ... كما بالصورة :
تعريف المتغير المسؤل عن التعامل مع مكتبة الـــ FSO و ليكن FsoBj و يكون الكود معرف على مستوى المشروع فى منطقة الـــ General Declaration و ذلك حتى يكون لنا مطلق الحرية فى التعامل معه فى أى مكان بالكود .
Dim FsoBj as New FileSyaytemObject
تتكون المكتبة من الكائنات (Objects) الاتية :
Object | Description |
FileSystemObject (FSO) | و هو اعلى الكائنات فى مكتبة الــ FSO و هو يسمح للمبرمج التعامل مع الملفات و المجلدات و الدرايفات كما يشاء و ينشىء مجلدات و يتأكد من وجود درايف من عدمه و ينقل الملفات الى مكان |
Drive | و هو الكائن المسؤل عن اختبارات البيانات التى تتعلق بالدرايفات سواء كانت على نفس الكمبيوتر او على الشبكة و ايضا التعامل مع الـــ CD ROM/RAM |
File object | و هو الكائن المسؤل عن التعامل مع الملفات و التى تمثل الكيان المادى لما هو بالفولدرات |
Folder object | و هو الكائن المسؤل عن التعامل مع المجلدات و ما تحتوية من مجلدات فرعية. |
TextStream object | و هو الكائن المسؤل عن قراءة و كتاية الملفات النصية txt.* |
اولا :
DRIVE : يعود بقيمة مجموعة الدرايف المشار اليها .
Object | Description |
BuildPath | اضافة امتداد ملف الى امتداد ملف موجود بالفعل |
CopyFile | نسخ ملف من مكانه الى مكان اخر |
CopyFolder | نسخ مجلد من مكانه الى مكان أخر. |
CreateFolder | انشاء مجلد |
CreateTextFile | انشاء ملف نصى *.txt و تخزين قميتة (محتواه) |
DeleteFile | حذف ملف |
DeleteFolder | حذف مجلد |
DriveExists | التأكد من وجود درايف من عدمة |
FileExists | التأكد من وجود ملف من عدمة |
FolderExists | التأكد من وجود المجلد من عدمة |
GetAbsolutePathName | يعود بقيمة مسار الملف أو المجلد كاملا |
GetBaseName | Returns the base name of a file or folder. |
GetDrive | يعود بقيمة الدرايف |
GetDriveName | يعود بأسم الدرايف |
GetExtensionName | يعود بامتداد ملف عن طريق معرفة مساره |
GetFile | تخزين ملف فى متغير كملف |
GetFileName | يعود باسم ملف |
GetFolder | يعود بقيمة المجلد |
GetParentFolderName | يعود بقيمة المجلد الرئيسى للمجلد |
GetSpecialFolder | Returns an object pointer to a special folder. |
GetTempName | Returns a temporary (randomly generated) file or folder name that can be used with CreateTextFile. |
MoveFile | ينقل الملف (قص) |
MoveFolder | ينقل المجلد (قص) |
OpenTextFile | فتح ملف نصى و العودة بقيمة محتواه (النص) |
- طريقة التعامل مع الدرايف :
Object | Description |
AvailableSpace | المساحه المتوفرة |
DriveLetter | الحرف المميز للدرايف مثل (C) |
DriveType | قيمة رقمية لنوع الدرايف و عادة ما تكون كالتالى : 0 (Unknown), 1 (Removable), 2 (Fixed), 3 (Remote), 4 (CD-ROM) 5 (RAM Disk). |
FileSystem | متغير نصى يحدد نوع ملف النظام للدرايف مثل ("FAT", "FAT32", "NTFS", etc.). |
FreeSpace | تماما مثل AvailableSpace |
IsReady | تعود القيمة (True/false) على ما اذا كان الدرايف جاهز أم لا |
Path | متغير نصى يحدد مسار الدرايف مثل (/:C) |
RootFolder | المجلد الرئيسى للدرايف |
SerialNumber | يعود متغير رقمى من نوع Long عارة عن قيمة رقم الدرايف التسلسلى |
ShareName | الاسم الذى يحملة الدرايف على الشبكة المحلية |
TotalSize | حجم الدرايف بالبايت Byt |
VolumeName | حجم الداريف |
- خصائص الملفات :
الخاصية | الوصــــف |
Attributes | متغير رقمى يعود بقيمة خصائص الملف و تكون كالتالى 0 (Normal), 1 (ReadOnly), 3 (Hidden), 4 (System), 8 (Volume), 16 (Directory), 32 (Archive), 64 (Alias), 128 (Compressed). |
DateCreated | تاريخ انشاء الملف |
DateLastAccessed | تاريخ اخر مرة تم التعامل مع الملف بالفتح |
DateLastModified | تاريخ اخر مرة تم التعامل مع الملف بالتعديل |
Drive | الحرف المميز للدرايف الذى يوجد به الملف (C) |
Name | اسم الملف |
ParentFolder | المجلد الرئيسى للملف |
Path | مسار الملف |
ShortName | اسم مختصر للملف على طريق الدوس |
ShortPath | وصف مختصر لمسار الملف كما بالدوس |
Size | حجم الملف بالبايت Byt |
Type | نوع الملف (Microsoft Word Document) |
طريقة التعامل مع الملفات :
الطريقة | الوصف | |
Delete | حذف الملف | |
Move | نقل الملف (قص) | |
Copy | نسخ الملف | |
CreateTextFile | تعود بقيمة TextStream تدفق للنص كمتغير للتعامل مع ملف تم انشاءه الان | |
OpenAsTextStream | فتح ملف موجود بالفعل و تخزين محتواه TextStream |
- خصائص التدفق النصى TextStream:
الخاصية | الوصــــف |
AtEndOfLine | متغير (true/false) يوضح ما اذا كان المؤشر وصل لنهاية الملف أم لا و تفضل استخدامها عند قراءة الملف ككل |
AtEndOfStream | متغير (true/false) يوضح ما اذا كان المؤشر وصل لنهاية الملف أم لا و تفضل استخدامها عند قراءة الملف سطر سطر |
Column | رقم العمود الذى يوجد به الحرف فى الـــ TextStream |
Line | رقم السطر الذى يوجد به الحرف فى الـــ TextStream |
- طريقة التعامل مع التدفق النصى TextStream:
الطريقة | الوصــــف |
Close | اغلاق تدفق نصى مفتوح |
Read | قراءة عدد من الحروف فى نص معين و تعود القيمة كمتغير نصى |
ReadAll | قراءة جميع (كافة) النص و تعود القيمة كمتغير نصى |
ReadLine | قراءة سطر كامل |
Skip | تجاهل قراءة عدد معين من الحروف عند قراءة النص |
SkipLine | تجاهل قراءة عدد معين من السطور عند قراءة النص |
Write | كتابة نص معين فى النص |
WriteLine | كتابة سطر جديد بعد نهاية النص |
WriteBlankLines | انشاء سطر جديد فارغ |
و الان مع المثال العملى و الاكواد ...... انتظرونا فى الدرس الثانى بالصور ان شاء الله تعالى
Visual Basic 6.0 Lessons, Tricks, Tutorials and help links :
- - Automate MS-Access Database in Visual Basic 6.0 though a network
- - Visual Basic 6.0 Analog Clock
- - Visual Basic 6.0 Temperature Convertor
- - Visual Basic 6.0, MS-Access 2003 and Crystal Reports - Phone book
- - Visual Basic 6.0, MS-Access 2003 Database and DataGrid
- - Visual Basic 6.0 FTP full application source code
- - Visual Basic 6.0 Color Picker tool source code
Comments