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

ما هي عمليات الحفظ في لغة الفيجوال بيسك

بدأه العالم في 7 يوليو 2008 · 3 رد · 622 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

اخواني الكرام حياكم الله ...

لدي سؤال بخصوص عمليات الحفظ في لغة الفيجوال بيسك ( كيف يتم حفظ قيم معينة في مربع نص اثناء تشغيل البرنامج ) بحيث لو قمت باغلاق البرنامج فان القيم تمسح من الذاكره ، والذي فهمته وهو ممكن يكون عن طريق قاعدة البيانات او طريق ملف نصي فقط و ماهو الافضل منها في ذلك وهل يوجد انواع اخرى منها للحفظ

ارجوا المساعدة في ذلك وشكرا

** أقم صلاتك قبل مماتك **

الصلاة : جالبة للرزق . حافظة ‏للصحة دافعة للأذى ، طاردة للأدواء ، مقوية للقلب ، مبيضة للوجه ، ‏مفرحة للنفس ، مذهبة للكسل ، منشطة للجوارح ، ممدة للقوى ‏،شارحة للصدر، مغذية للروح ، منورة للقلب ، حافظة للنعمة ، دافعة ‏للنقمة ، جالبة للبركة, مبعدة من الشيطان.

* هل تعلم أن النبي صلى الله عليه وسلم وصف تارك الصلاة بالكفر ؟

‏* هل تعلم أن الذي لا يصلي إذا مات لا يدفن في مقابر المسلمين!!

‏* هل تعلم أن أول ما تحاسب عليه الصلاة ؟

‏* هل تعلم أن تارك الصلاة يحشر يوم القيامة مع فرعون ؟

‏* هل تعلم أن تارك الصلاة مع المجرمين في جهنم ؟

#2

بالنسبة لأنواع الحفظ , فهي كثيرة أشهرها :

1- الحفظ في Registry ---------> وهذا للقيم الخاصة بخصائص البرنامج ومظهره ... إلخ

2- الحفظ في ملف نصي -----------> وهو للبيانات المؤقتة والغير مهمة غالبا

3- الحفظ في قاعدة بيانات ---------> للبيانات المهمة جدا , أو التي يعتمد عليها البرنامج مثل بيانات مخزن لبرنامج إدارة مخازن

4- الحفظ في ملف من إنشاءك ------> وهنا يلاحظ انك تجعله غير قابل للفتح بالمفكرة , وإلا سيصبح مثل الملفات النصية

تم تعديل هذه المشاركة بواسطة Ala2 VB في 7 يوليو 2008 في 11:36

اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

مدخل إلى برمجة وتصميم الألعاب : كيف أبدأ ؟

#3

اخي الكريم مكن مثال لكل عملية

وشكرا

** أقم صلاتك قبل مماتك **

الصلاة : جالبة للرزق . حافظة ‏للصحة دافعة للأذى ، طاردة للأدواء ، مقوية للقلب ، مبيضة للوجه ، ‏مفرحة للنفس ، مذهبة للكسل ، منشطة للجوارح ، ممدة للقوى ‏،شارحة للصدر، مغذية للروح ، منورة للقلب ، حافظة للنعمة ، دافعة ‏للنقمة ، جالبة للبركة, مبعدة من الشيطان.

* هل تعلم أن النبي صلى الله عليه وسلم وصف تارك الصلاة بالكفر ؟

‏* هل تعلم أن الذي لا يصلي إذا مات لا يدفن في مقابر المسلمين!!

‏* هل تعلم أن أول ما تحاسب عليه الصلاة ؟

‏* هل تعلم أن تارك الصلاة يحشر يوم القيامة مع فرعون ؟

‏* هل تعلم أن تارك الصلاة مع المجرمين في جهنم ؟

#4

الحفظ في Registry :

  1.  
  2. Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
  3. Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
  4.  
  5. Public Const HKEY_CLASSES_ROOT = &H80000000
  6. Public Const HKEY_CURRENT_CONFIG = &H80000005
  7. Public Const HKEY_CURRENT_USER = &H80000001
  8. Public Const HKEY_DYN_DATA = &H80000006
  9. Public Const HKEY_LOCAL_MACHINE = &H80000002
  10. Public Const HKEY_USERS = &H80000003
  11.  
  12. Private lngTopKey As Long
  13. Private strSubKey As String
  14.  
  15. Public Sub CreateRegKey(strKey As String)
  16. Dim hKey As Long
  17.  
  18. ParseKey strKey
  19. RegCreateKey lngTopKey, strSubKey, hKey
  20. RegCloseKey hKey
  21. End Sub
  22.  
  23. Private Sub ParseKey(strKey As String)
  24. Dim intPos As Integer
  25.  
  26. intPos = InStr(strKey, "")
  27.  
  28. Select Case Left(strKey, intPos - 1)
  29. Case "HKEY_CLASSES_ROOT"
  30. lngTopKey = HKEY_CLASSES_ROOT
  31. Case "HKEY_CURRENT_USER"
  32. lngTopKey = HKEY_CURRENT_USER
  33. Case "HKEY_LOCAL_MACHINE"
  34. lngTopKey = HKEY_LOCAL_MACHINE
  35. Case "HKEY_USERS"
  36. lngTopKey = HKEY_USERS
  37. Case "HKEY_CURRENT_CONFIG"
  38. lngTopKey = HKEY_CURRENT_CONFIG
  39. Case "HKEY_DYN_DATA"
  40. lngTopKey = HKEY_DYN_DATA
  41. End Select
  42. strSubKey = Right(strKey, Len(strKey) - intPos)
  43. End Sub
  44.  

الحفظ في ملف نصي :

  1.  
  2. Open "C:FilePath.txt" for Output as 1
  3. Print #1,Text
  4. Close 1
  5.  

الحفظ في قاعدة بيانات :

  1.  
  2. Private dbCurrent As Database
  3. Private recCategories As Recordset
  4.  
  5. Set dbCurrent = OpenDatabase(cFilePathMajor & "Record.mdb", False)
  6. Set recCategories = dbCurrent.OpenRecordset("select * from Record")
  7.  
  8. With recCategories
  9. .AddNew
  10. !Date = Date
  11. !Time = Time
  12. .Update
  13. End With
  14.  
  15. recCategories.Close
  16. dbCurrent.Close
  17. Set dbCurrent = Nothing
  18.  

الحفظ في نوع ملفات خاص , تجد هنــــــــــــا موضوعا يشرح هذا بالتفصيل

بالبحث في المنتدى عن الكلمات التالية :

Registry

الحفظ في قاعدة بيانات

التعامل مع الملفات

ستجد المزيد من الأمثلة بإذن الله تعالى

اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

مدخل إلى برمجة وتصميم الألعاب : كيف أبدأ ؟

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…