تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
دوال معالجة الملفات
#1
كاتب الموضوع : programmer_21

دوال معالجة الملفات :
GetAttr(PathName) : هى تحدد خصائص الملف وتعود بقيمة رقمية وهى تمثل كتالى:
Normal =0
Hidden=2
Acheive=32
ReadOnly=1

Kill(PathName) : لحذف الملفات
FileDateTime(PathName) : لتحديد وقت انشاء وزمن الملف
mkDir(PathName) : لانشاء مجلد جديد
RmDir(PathName) : لاحذف مجلد
}}}
تم الشكر بواسطة:
#2
كاتب المشاركة : omarfathel

قررت ان اضيف الكثير من المعلومات على كيفية معالجة الملفات من خلال الدوت نيت واردت عمل موضوع منفصل ولكنك بأت بالموضوع ولذا فساقوم بالتعقيب على موضوعك بشرح مسهب لما هو متوفر من دوال لمعالجة الملفات
ملاحظة: اولا وقبل كل شيء يجب وضع الجمل التالية في بداية الكود

كود :
imports system.io
}}}
تم الشكر بواسطة:
#3

1- الدالة AppendAllText
وهذه الدالة تقوم بفتح الملف للكتابة باضافة النص الذي تريده الى الملف ثم اغلاق الملف كما يلي

كود :
File.AppendAllText("c:/sample.dat", "hello there" + Environment.NewLine)
ويقوم هذا المثال باضافة الكلمة hello there مع اضافة سطر جديد الى الملف المفتوح
}}}
تم الشكر بواسطة:
#4

2-الدالة copy
تقوم هذه الدالة بنسخ الملف الى اسم ومكان جديد حسب المثال التالي

كود :
File.Copy("c:/sample.dat", "c:/sample1.ddt")
وبالتالي سيقوم بنسخ الملف sample.dat الى المكان الجديد وباسم sample1.ddt
ويمكنك استبدال الكود بالطريقة الاتية لغرض التأكد من ان الملف سيتم الكاتبة فوقه حتى لوكان موجود اصلا (اعني الملف Sample1.ddt)

كود :
File.Copy("c:/sample.dat", "c:/sample1.ddt", True)
}}}
تم الشكر بواسطة:
#5

3- الدالة create
تقوم هذه الدالة بانشاء الملف المحدد كما يلي

كود :
File.Create("c:/sample2.dat")
}}}
تم الشكر بواسطة:
#6

4- الدالة delete
تقوم هذه الدالة بمسح الملف المحدد واذا لم يكن موجودا فسيحدث خطأ اثناء التنفيذ ولذا يحبذ استخدام الدالة Exists التي سيلي ذكرها لاحقا ومثالنا على الدالة هو

كود :
File.Delete("c:/sample2.dat")
والافضل كتابة الكود بالطريقة التالية لتفادي حصول الاخطاء وكذلك يمكن استخدام نفس الطريقة بالنسبة لكل دوال معالجة الملفات

كود :
If File.Exists("c:/sample2.dat") Then
File.Delete("c:/sample2.dat")
End If
}}}
تم الشكر بواسطة:
#7

5- الدالة move
وتقوم هذه الدالة من اسمها بنقل الملف من مساره الحالي الى المسار المحدد
كما المثال

كود :
File.Move("c:/sample.dat", "c:/sample1.ddt")
6- الدالة open وهذه الدلة تقوم بفتح الملف للقراءة وحسب نوع الفتح كما في الامثلة التالية

كود :
File.Open("c:/sample1.ddt", FileMode.Append)
File.Open("c:/sample1.ddt", FileMode.Create
File.Open("c:/sample1.ddt", FileMode.Open)
File.Open("c:/sample1.ddt", FileMode.OpenOrCreate)
حيث ان طريقة الفتح الاولى تكون للاضافة الى الملف فقط
والطريقة الثانية تكون لتشكيل الملف لاول مرة اذا لم يكن موجودا
والطريقة الثالثة لغرض فتح الملف للقراءة والكتابة
والطريقة الرابعة لفتح الملف ولذا لم يكن موجودا فينشأ الملف

وكذلك الدوال

كود :
File.OpenRead()
File.OpenText()
File.OpenWrite()
فهي مشابهة للدالة السابقة ولكن تقوم بفتح الملف للقراءة فقط وكملف نصي وللكتابة فقط على التوالي

7- الدالة ReadAllBytes
تقوم هذه الدالة بقراءة الملف على شكل مصفوفة والمثال التي يوضح ذلك ويمكن لك تنفيذه ورؤية النتيجة بنفسك

كود :
Dim str As Byte()
Dim str1 As String
str = File.ReadAllBytes("c:/sample1.ddt")
str1 = ""
Dim i As Integer
For i = 0 To str.Length - 1
str1 += str(i).ToString()
Next
MessageBox.Show(str1)
}}}
تم الشكر بواسطة:
#8

من اخوات الدالة Readallbytes السابقة الذكر هي
ReadAllLines و الدالة
ReadAllText
وكما في المثال التالي

كود :
str1 = ""
Dim str2() As String
Dim s As String
str2 = File.ReadAllLines("c:/sample1.ddt")
For Each s In str2
str1 += s
Next
MessageBox.Show(str1)
str1 = ""
Dim str3 As String
str3 = File.ReadAllText("c:/sample1.ddt")

MessageBox.Show(str3)
وتقوم الدالة الاولى بقراءة الملف على شكل مصفوفة من الString ويتم قراءة المصفوفة كما هو موضح في الجزء الاول من المثال
وتقوم الدالة الثانية بقراءة جميع النص على شكل string ويمكن طباعته مباشرة بدون الحاجة الى مصفوفة وبلا هالدوخة الراس
}}}
تم الشكر بواسطة:
#9

الدالة WriteAllBytes تقوم هذه الدلة بكتابة على الملف من خلال قراءة مصفوفة تعطى للدالة
والدالة WritrAllLines تقوم بالكتابة داخل الملف على من خلال قراءة مصفوفة من string
والدالة WriteAlltext تقوم بالكتابة في الملف من خلال قراءة نص معين كما في الامثلة التالية

كود :
Dim str4 As String = "hello there there is text here and it will be written to a file"
Dim bb As Byte()
bb = File.ReadAllBytes("c:/sample1.ddt")
File.WriteAllBytes("c:/sample1.ddt", bb)
str2 = File.ReadAllLines("c:/sample1.ddt")
File.WriteAllLines("c:/sample1.ddt", str2)
File.WriteAllText("c:/sample1.ddt", str4)
}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  شرح خوارزميات معالجة الصور (من دروس الاستاذ فوزي برزنجي) ناديه الشجيري 19 34,330 20-02-22, 02:13 PM
آخر رد: رضوان الجماعي
  معالجة التنبيهات في البرامج (استقبال تنبيهات داخل البرنامج) Dev Express ابو ليلى 9 9,265 10-02-22, 09:55 PM
آخر رد: عبدالحميد حسني
  تحويل Interface الي دوال API silverlight 1 3,412 24-11-21, 04:15 PM
آخر رد: yassoo1985
  ابسط كود لرفع الملفات عن طريق سيرفر FTP Basil Abdallah 2 3,956 20-11-20, 07:21 PM
آخر رد: walihn
Lightbulb [مقال] التعامل مع اختصارات الملفات Shortcuts Magic Sword 2 4,414 01-10-20, 11:36 AM
آخر رد: abomo3ath
  [مقال] دوال التعامل مع النصوص Strings - VB.NET ابو ليلى 10 25,061 15-04-19, 07:09 PM
آخر رد: alsouf
  شرح انشاء برنامج تحويل صيغ الملفات الصوتيه CLARO 10 6,959 16-11-18, 04:41 PM
آخر رد: anassss
  تشفير الملفات التنفيذية silverlight 2 6,338 02-10-18, 08:57 AM
آخر رد: sendbad100
  التعامل مع الملفات الصوتية ........دردشة برمجية RaggiTech 8 10,371 28-11-17, 11:23 PM
آخر رد: ahmed4240
  الملفات المؤقتة silverlight 1 2,489 05-10-17, 03:54 PM
آخر رد: sendbad100

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم