تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أرجوا الرد علي هذا السؤال ضروري - كيفية حفظ بيانات واعدادت البرنامج ؟
#1


لقد سألت هذا السؤال 5 مرات في هذا الموقع ولم اجد له حل , أرجو حل لهذا السؤال .
الخمس اسئلة تحكي عن : [ كيفية حفظ البيانات والاعدادات ؟ ]

أرجوا الدخول علي هذه الأسئلة وقرائتها لكي تفهم ماذا اريد بالتفصيل .

1- كيفية حفظ البيانات الموجودة في البرنامج؟ لكي يعمل البرنامج علي اي جهاز ؟
2- كيفية انشاء قاعدة بيانات اكسيل لحفظ البيانات
3- أين أضع هذه الأكواد في المشروع ليتم حفظ الاعدادات ؟
4- أريد حفظ ما يتغير في الفورم بعد اغلاقه ؟ التفاصيل في الداخل .
5- أريد كود استعادة حقل واحد من الداتا بيس الي تكست بوكس ؟ التفاصيل في الداخل .

وشكراً جزيلاً لكل من سيساعدني .

الرد }}}}
تم الشكر بواسطة:
#2


أولاً شكراً جزيلاً علي اهتمامك
ممكن لو سمحتي تحملي هذا المشروع ومن ثم تضعي به الاكواد ومن ثم تقومي برفعه لي مره اخري لاني حاولت اضع هذه الاكواد عندي ومعرفتش بيحصل ايرور عندي - علماً بأني شغال بفيجول بيسك 2010 .

[ رابط المشروع ]

الرد }}}}
تم الشكر بواسطة:
#3
ضع هذا الكود هما هو وإذا ظهر إرور أكتب الايرور
كود :
Dim settingsFile As String = "mysettings"

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If IO.File.Exists(settingsFile) Then ImportSettings(settingsFile)

End Sub

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    ExportSettings(settingsFile)
End Sub



' إستيراد الاعدادت من ملف خارجي
Public Sub ImportSettings(ByVal fileName As String)
    Using sReader As New IO.StreamReader(fileName)
        While sReader.Peek() > 0
            Dim input = sReader.ReadLine()
            Dim dataSplit = input.Split(vbTab)
            My.Settings(dataSplit(0)) = dataSplit(1)
        End While
    End Using
    My.Settings.Save()
End Sub
' تصدير الاعدادت إلى ملف خارجي
Public Sub ExportSettings(ByVal fileName As String)
    Using sWriter As New IO.StreamWriter(fileName)
        For Each setting As Configuration.SettingsPropertyValue In My.Settings.PropertyValues
            sWriter.WriteLine(setting.Name & vbTab & setting.PropertyValue.ToString())
        Next
    End Using
    My.Settings.Save()
End Sub
الرد }}}}
تم الشكر بواسطة: sv25b858
#4


اعتذر الكود شغال تمام انا الي معرفتش اضعه
المهم بقيت مشكلة واحده , الا وهي اني استطيع فتح الملف الخارجي mysetting بستخدام اي برنامج لقرائة الملفات النصية مثل المفكره او الورد واقرأ ما بداخلها , لذا أريد طريقة لوضع رقم سري لهذا الملف mysetting لكي لا يستطيع احد الدخول عليه , لاني بعمل برنامج تاني به بيانات هامة جداً ولا اريد ان يقرأها احد .
وشكراً جزيلاً لكي اختي العزيزة اميره .

الرد }}}}
تم الشكر بواسطة:
#5
اخى هل الهذه البيانات المهمة تكون داخل فورم ام انت تضع ملف الورد وتقوم بالستدعائه بالكود
اذا كان فورم تستطيع وضع رقم سرى له لاكن اذا كان ملف ورد تستدعيه فلا اعلم هل من الممكن او لا
الرد }}}}
تم الشكر بواسطة: sv25b858
#6
(12-03-15, 04:33 PM)احمد عبد الحكيم كتب : اخى هل الهذه البيانات المهمة تكون داخل فورم ام انت تضع ملف الورد وتقوم بالستدعائه بالكود
اذا كان فورم تستطيع وضع رقم سرى له لاكن اذا كان ملف ورد تستدعيه فلا اعلم هل من الممكن او لا



أخي احمد أولاً انا بشكرك علي اهتمامك
هذه البيانات قمت بحفظها عن طريق كود My.setting ومن المعروف ان هذه الخاصية تعطي قيم افتراضية اذا تم نقل او نسخ البرنامج , بمعني ان البيانات تمحي من الفورم اذا تم تحريك او نسخ البرنامج من مكان لاخر لذا قامت الاخت اميره بأعطائي كود يقوم بحفظ اعدادت الـ My.setting في ملف خارجي يوضع بجوار البرنامج , اسم هذا الملف mysetting انا استطيع فتح هذا الملف عن طريق اي برنامج لقرائة الملفات النصية مثل المفكرة او الورد , داخل هذا الملف ايضاً وجدت جميع الـ My.setting وانا عامل الرقم السري الي بيفتح البرنامج بالـ My.setting يعني اي حد بيفهم هيقدر يفتح الملف الخارجي ويعرف الرقم السري الي بيفتح البرنامج , كل ما اريده هو طريقة لوضع رقم سري لهذا الملف الخارجي لكي لا يستطيع احد فتحه , او ان امكن كود يحفظ اعدادت My.setting بدون الحاجة الي انشاء ملف خارجي , اتمني ان يكون لديك حل لهذه المشكلة .

الرد }}}}
تم الشكر بواسطة: احمد عبد الحكيم
#7
اخى العزيز ممكن تستفيد من هذا الفيديو فاعزرنى ان كانت اجباتى لست دقيقة 100% فا انا اريد ان افيدك بقدر الامكان
فا اعزرنى فا انا مثلى مثلك بعض الشئ
https://www.youtube.com/watch?v=qGjgjIzNkeM
الرد }}}}
تم الشكر بواسطة: sv25b858
#8
(12-03-15, 11:22 PM)احمد عبد الحكيم كتب : اخى العزيز ممكن تستفيد من هذا الفيديو فاعزرنى ان كانت اجباتى لست دقيقة 100% فا انا اريد ان افيدك بقدر الامكان
فا اعزرنى فا انا مثلى مثلك بعض الشئ
https://www.youtube.com/watch?v=qGjgjIzNkeM



أخي للاسف هذا ليس ما ابحث عنه , انا عامل الباسورد عن طريق My.settting لكي استطيع تغير الرقم من داخل البرنامج وليس من داخل المشروع , مشكرو اخي علي اهتمامك .

الرد }}}}
تم الشكر بواسطة:
#9
جرب هذا التعديل للكود التصدير والاستيراد
إحذف ملف mysettings القديم ثم استبدل هذا الكود بدل القديم
كود :
' إستيراد الاعدادت من ملف خارجي
Public Sub ImportSettings(ByVal fileName As String)
    Using sReader As New IO.StreamReader(fileName)
        While sReader.Peek() > 0
            Dim input As String = System.Text.Encoding.UTF8.GetString(System.Convert.FromBase64String(sReader.ReadLine()))
            Dim dataSplit = input.Split(vbTab)
            My.Settings(dataSplit(0)) = dataSplit(1)
        End While
    End Using
    My.Settings.Save()
End Sub
' تصدير الاعدادت إلى ملف خارجي
Public Sub ExportSettings(ByVal fileName As String)
    Using sWriter As New IO.StreamWriter(fileName)
        For Each setting As Configuration.SettingsPropertyValue In My.Settings.PropertyValues
            Dim s As String = setting.Name & vbTab & setting.PropertyValue.ToString()
            sWriter.WriteLine(System.Convert.ToBase64String(System.Text.Encoding.UTF8.GetBytes(s)))
        Next
    End Using
    My.Settings.Save()
End Sub
الرد }}}}
تم الشكر بواسطة: sv25b858
#10


الف الف الف شكر اختي اميره علي اهتمامك وتعبك Smile

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  انشاء قاعدة بيانات بإمتداد خاص بك thevirus 5 115 أمس, 03:09 PM
آخر رد: thevirus
  [سؤال] كيف اجعل البرنامج يحفظ بيانات؟ The Light Fire 9 129 أمس, 12:58 AM
آخر رد: ali.alfoly
  [VB.NET] استدعاء بيانات من الاكسس لل vb.net مهند الموسوي 1 70 02-12-16, 03:14 PM
آخر رد: مهند الموسوي
  [نقاش] الى كل خبير ومبتدأ نقاش بخصوص جعل البرنامج نسخة تجريبية 0theghost0 1 152 30-11-16, 11:21 PM
آخر رد: awidan76
  [نقاش] اسئلكم بالله / تسعيرة هذا البرنامج مصمم على فيجول استديو 2013 عزف الخواطر 3 114 30-11-16, 06:42 PM
آخر رد: عزف الخواطر
  كيفية تخفيض مستوي الامان في الاكسل atefkhalf2004 7 84 28-11-16, 06:48 PM
آخر رد: atefkhalf2004
  [سؤال] مشاركة برنامج متصل بقاعدة بيانات sql على شبكه محلية mohammedbassim 3 84 24-11-16, 11:40 PM
آخر رد: mohammedbassim
Question [VB.NET] كيفية ربط أى حقل IFieldObject بعمود بجدول برمجياً Crystal Reports newvbdev 4 114 23-11-16, 08:51 PM
آخر رد: newvbdev
  [سؤال] مشكلة في إعادة تنفيذ البرنامج wael khlak 1 52 21-11-16, 11:48 PM
آخر رد: السرور
  خطا عند تشغيل البرنامج makky 10 141 19-11-16, 03:17 AM
آخر رد: أبو عمر

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


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