منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : حفظ ملف نصي الى my.settings وقراءته
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بتوفيق الله ثم بمساعدة الاخوة بمنتدانا الاول **أبورائد**
وجدت كود رائع تحفظ ملف نصي ثم تقراه بالكود التالي:
ضع متغير في Settings باسم myp من String بصلاحية User
كود :
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        My.Settings.myp = System.Text.Encoding.Default.GetString(My.Computer.FileSystem.ReadAllBytes(Application.StartupPath & "\db.dd"))
        My.Settings.Save()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        My.Computer.FileSystem.WriteAllBytes(Application.StartupPath & "\db.dd", System.Text.Encoding.Default.GetBytes(My.Settings.myp), False)
    End Sub

End Class