[الورد الصناعي]

ممكن عمل كود لحفظ المكتوب  داخل اداة TextBox
يعني لو  اكتب داخل TextBox واضغط زر حفظ  ثم اغلق التطبيق واشغله من جديد اجد المكتوب موجود
 وكذلك لو انقل التطبيق لكمبيوتر اخر اجد المكتوب موجود داخل TextBox موجود

ولما اعمل تعديل على المكتوب داخل TextBox  من قبل واضغط  زر حفظ يحفظ التحديث الجديد الموجود داخل TextBox

عندي في النموذج عدد 12 من اداة TextBox وزر واحد من Button

وما افضل طريقه لحفظ البيانات الموجود داخل TextBox هل تخزينها داخل قاعدة بيانات ولا ايش ؟

[Taha Okla]

اذا شغلة مربع نص  فهي لا تستحق أكثر من ملف xml

للحفظ تستخدم الكود :

كود :

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim dt1 As New DataTable("tb1")
       dt1.Columns.Add("text1")

       dt1.Rows.Add(TextBox1.Text)
       dt1.WriteXml("TA.xml")

   End Sub

وللاستعادة الكود :

كود :

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       Dim dt1 As New DataTable("tb1")
       dt1.Columns.Add("text1")
       dt1.ReadXml("TA.xml")

       TextBox1.Text = dt1.Rows(0)(0)
   End Sub

كمثال تم وضع كل كود ضمن زر أمر ..

أما أين تريد استخدام الأكواد ومتى تسترجعهن .. فأنت أدرى أين تضع كل كود بما يناسبه..

[الورد الصناعي]

شكرا لك عزيزي
ماهو ملف xml وهل يعمل على نظام ويندوز
اما زر استعاده ما الفائده منه انا ابغى اكتب واحفظ المكتوب فقط ويعمل حتى بعد النقل لكمبيوتر اخر اجد موجود المكتوب داخل TextBox عند تشغيل التطبيق
ولو تقدر لو مش اليوم تعمل ملف للمشروع وترفع المشروع هنا ولا تغير اسم الاداة الافتراضي مثل TextBox و Button

[Taha Okla]

فقط جرب تشتغل بايدك وراح تعرف أنها أ[سط من أن تظل تنتظر حتى يتم حل الأمر وتستلمه ع الجاهز..
لا تعتمد يكون كل شي جاهز(نسخ ولصق)
وإلا أين دورك ك مبرمج..؟؟!!

[الورد الصناعي]

بعد تطبيق المثال 
عند الكتابة داخل اداة TextBox اكتب فيها مثلا هلا ثم اضغط زر للحفظ  ثم اغلق التطبيق 
وعند تشغيل التطبيق لا اجد كلمة هلا داخل اداة TextBox 
وعند الضغط على زر للاستعادة تظهر الكلمة هلا انا اريد تظهر كلمة هلا بدون الضغط على زر للاستعادة عند تشغيل التطبيق

[Taha Okla]

ضع كود الاستعادة في حدث تحميل النافذة
فيستيعد أثناء ظهور النافذة.

[salamandal]

لا ادري لماذا لا يعمل الاقتباس و زر الرد يحيلني الى رابط فارغ و صفحة المنتدى تظهر بشكل غريب كأنها اكواد لينكس وجداول كثيرة.
فقط زر "+رد جديد" هو الذي يعمل

بالنسبة لملفات xml هي ملفات عادية مثل اي ملفات نصية txt او غيره
ادخل مجلد bin للبرنامج وستجد الملف الذي انشاته هناك وتستطيع قراءة ما فيه بسحبه الى برنامج المفكرة notepad

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

[الورد الصناعي]

(( بالنسبة لملفات xml هي ملفات عادية مثل اي ملفات نصية txt او غيره ))

وهل انقل الملف xml  مع الملف الجاهز exe لكمبيوتر اخر حتى يظهر المحفوظ بالتطبيق من قبل

---

بعد البحث عن ملف xml   يوجد اكثر من ملف بنفس الامتداد داخل نفس المجلد  Debug

اي واحد انقل مع الطبيق exe

[salamandal]

لو تصفحت الكود الذي ارفقه الاخ طه لوجدت الاسم بسهولة
dt1.ReadXml("TA.xml")
TA.xml هو اسم الملف
نعم اذا نقلت البرنامج الى جهاز اخر يجب نقل الملف معه

[salamandal]

هذا مثال أخر باستعمال ملف نصي

http://vb4arb.com/vb/showthread.php?tid=48456