14-02-19, 06:29 PM
(14-02-19, 12:57 PM)yunis كتب : يبدو أنه لايوجد نية في تعاونكم هل _ أصبت أو أخطئت
السلام عليكم ورحمة الله وبركاته
أستاذ الفاضل
رجاء عدم التسرع والحكم على النيات على أحد
فهنا الكل يتعاون بقدر الأستطاعة من حيث
أولا علمه
ثانيا وقت فراغه
وغالبا العذر الصحيح هو قلة وقت الفراغ لدى الأساتذة والأخوة الكرام هنا
كان الله في عون الجميع
نصيحة من أخ لك وأرجوا أن تتقبلها بصدر رحب
من الأفضل لك أولا وأخيرا
أن تقوم بالبدأ في تطبيق فكرتك بنفسك
وعرض الأخطاء التي ستقابلك هنا وصدقني ستجد ألف من يقدم لك المساعدة
فالغرض الأساسي من المنتدى هو التعليم وتقديم العلم
وتقديم المساعدة في طلب العلم
وليس تلبيه الطلبات وفقط
هذا ما تعلمته من الأساتذة والأخوة الكرام في المنتدى
والله سبحانه تعالى أعلى واعلم
وبالنسبة للجزء الثاني من الفكرة والمتعلق بالحجم
سيتم أستخدام فكرة الكود التالي
كود :
Imports System.IO
Module Module1
Sub Main()
' Get file info for test.txt.
' ... Create this file in Visual Studio and select Copy If Newer on its properties.
Dim info As New FileInfo("test.txt")
' Get length of the file.
Dim length As Long = info.Length
' Add more characters to the file.
File.AppendAllText("test.txt", " More characters.")
' Get another file info.
' ... Then get the length.
Dim info2 As New FileInfo("test.txt")
Dim length2 As Long = info2.Length
' Show how the size changed.
Console.WriteLine("Before and after: {0}, {1}", length, length2)
Console.WriteLine("Size increase: {0}", length2 - length)
End Sub
End Moduleومهمة الكود هو جلب حجم الملف
فأنشأ مشروع جديد وحاول تطبيق الكود على ملف txt
بمعنى ستقوم بإنشاء ملف txt بداخل مجلد البرنامج وتقوم بالتعديل عليه برمجيا باضافة نص له
وفي اثناء التعديل سيتم تطبيق الكود لجلب حجم الملف في timer
ووضعه في متغير او label او textbox اي كان لن تفرق
ثم زرع الناتج في دالة if المتعلقة بحفظ الملف
إذا كان حجم الملف 5 أوقف الدالة
وإلا أكمل الدالة
هذا مجرد سيناريو عملي بسيط لفكرتك
حاول تطبقها أو عدل عليها بحيث تصل لنتيجة مرضية
وأي مشكلة تواجهك ضعها هنا في قسم الأسئلة وستجد المساعدة بإذن الله تعالى
تمنياتي لك بالتوفيق والنجاح
لا إله إلا الله وحده لا شريك له له الملك وله الحمد وهو على كل شئ قدير
سبحان الله وبحمده سبحان الله العظيم
سبحان الله والحمد لله ولا إله إلا الله والله أكبر ولا حول ولا قوة إلا بالله العلى العظيم
رب أغفر لي


