اشكر كل القائمين في هذا المنتدى المفيد في التعلم والتقدم العربي في البرمجة
اما بعد
انا اتمنا احد من اصحاب الخبرة والمعرفة ان يساعدني
في هذا المثال
(((فا انا رجائى فيهم كبير )))
فانا لدي مشكلة
انا لا اعرف كيف احفظ القيم الموجودة في مبربعين نصين و combo
في ملف واحد
وبعد ذالك اغلق البرنامج واشغلة ومن خلا زر فتح في البرنامج اختار الملف المحفوظ مسبقاً ويرجع القيم الي تم حفظها في مبربعين نصين و combo
الأخ الفاضل / dr.a
السلام عليكم ورحمة الله وبركاته ،
أخي الفاضل /
أعتقد أنك تريد حفظ بيانات معينة مثل (الأسم ، العمر ، الجنس...الخ) ثم إعادة طلب هذه البيانات مرة أخرى حسب الأسم أو العمر الحنس ، أي الشخص الذي أسمه مثلاً (محمد) يقوم البرنامج بإحضار بياناته الأخرى كالعمر و الجنس.
إذا كان هذا طلبك فأعتقد أن هنالك طريقتين :
1- حفظ البيانات في برنامج الفيجوال بيسك.
2- حفظ البيانات في قاعدة بيانات ثم استدعائها عن طريق الفيجوال بيسك.
و أعتقد أنه من الأفضل الخيار الثاني ، أي أن تقوم ببناء قاعدة بيانات في برنامج (مايكروسوفت أكسس) مثلاً ، و ذلك كالتالي :
فتح برنامج مايكروسوفت أكسس.
إنشاء قاعدة بيانات جديدة .
إنشاء جدول يحتوي على 3 حقول ( الحقل الأول / الأسم ، الحقل الثاني / العمر ، الحقل الثالث / الجنس)
إحفظ الجدول في قاعدة البيانات.
الآن لديك 3 حقول في الجدول الموجود بقاعدة البيانات و هذه الحقول الثلاثة هي التي سيتم حفظ البيانات بها ، مربعين النص و combo .
في برنامج الفيجوال بيسك عليك بربط كالتالي مثلاً (مربع النص الأول مع الحقل الأول(الأسم) ، مربع النص الثاني مع الحقل الثاني (العمر) ، الـ combo مع الحقل الثالث (الجنس).
أتمنى أن أكون قد أفدك أخي الفاضل .
و السلام عليكم ورحمة الله و بركاته ،
عاشق الشرق
اشكرك اخوي كل الشكر والتقديرعلى ردك المميز
لكن مو هذا الي ابية
انا ابي ان احفظ البيانات الي في ال مبربعين نصين و combo
في ملف منعزل لوحدة
--
وقواعد البيانات تكون في حالة اننا ننشأ في كل مرة قاعدة بيانات جديدة من خلال الفيجول بيسك تحتوي القيم الموجودة في الفورم
ولا اعرف انا كيف انشأ قاعدة بيانات من خلال الفيجول بيسك وفتحها مرة اخري
--شاهد هذا المثال فهو برنامج كامل ولكن ينقصة الحفظ والفتح
وارجوان تكون عرفت المراد
فانا هدفي ان احفظ القيم في ملفات باسماء مختلفة و منعزلة في القيم عن بعضها
فمثلا كبرنامج اكسل ندخل القيم ونحفظها في ملفات لاعلاقة لها بالقيم الموجودة في ملف اخر تم حفظة
فكل ملف فية بيانات غير بيانات الملف الاخر ولو اتشابهة في بعض القيم لا كلها
فارجو لافادة
جزاك الله عنا كل خير وسداد
أخي العزيز سؤالك غير واضح بالنسبة لي
ولكن لعملية الحفظ كقيم ثابته نستخدم عادة الSavesitting
وهذا مثال على ماذكر
في الفورم لود تضع
text1.text=getsetting("b","b","b","any word")
وفي الكوماند الخاص بالتخزين تضع
savesetting "b","b","b",text1.text
علما بأن المتغيرات الثلاث الأولى تعني إسم الفولدر الرئيسي في الريجيستري والفولدر الفرعي والمتغير وقيمته بالتتاليأما إذا كان قصدك عن كيفيه حفظ البيانات في ملفات تخصك فهذا أمر يطول شرحه وهو خاص بالمحترفين لآنه يتدخل في الريجيستري والتشفير وما إلى ذلك وأتمنى أن أستطيع شرح ذلك في المستقبل لإفادة المبرمجين العرب ولكن لي واجبات وإذا فرغت منها سأقوم بشرح دروس قوية في عدة مجالات منها برمجة الألعاب ثلاثيه الأبعاد والتشفير وماطلبته
شكرا لكم
CMS Sfhati , Website Generator
نظام إدارة المحتوى صفحتي ... جربه الآن
bastr3
اشكرك اخي الكريم على ردك
ولكن سوف اوضح اكثر ففي هذا المثال طريقة الحفظ على هيئة ملف نصي ولامشكلة في ذالك
لكن المشكلة في كيفية حفظ القيم الموجودة في باقي التكست بوكس وكذالك كمبو
ومن ثم فتحها مرة اخرى من الملفات المحفوظه مبسقاً
وهذا هو الكود
ونلاحظ بانة يمكننا تغير txtText في الكود وضع بدلة اي مربع نصي اخر مثلText1
في كوماند الفتح والحفظ ولامشكلة تكون لدينا
لكن المشكلة في حقظ كل التكست بوكس والكمبو
Private Sub cmdOpen_Click()
CommonDialog1.Filter = "Text Files (*.txt)|*.txt|All Files (*.*)|*.*"
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
txtText.Text = Input(LOF(1), 1)
Close #1
End Sub
Private Sub cmdSave_Click()
CommonDialog1.Filter = "Text Files (*.txt)|*.txt|All Files (*.*)|*.*"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Binary As #1
Put #1, 1, txtText.Text
Close #1
End Sub
واجو في هذا المثال الذي حصلة علية بشق الانفس والاروح ان يكون قد اوضح المطلوب
وافاد من اراد الافادة
واتمنا منكم ايها المشرفين والخبرا في هذة اللغة ايجاد الحل لمشكلتي
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…