لقد قمت بتنفيذ الطلب وعدلت المثال
وارفقته مع ردى السابق
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
لقد قمت بتنفيذ الطلب وعدلت المثال
وارفقته مع ردى السابق
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
اخى
تاتى رسالة file not found
هذا هو الكود فى حدث التحيل للنافذة
Private Sub Form_Load() 'بفرض ان الملف المراد تحميله فى خانة النص موجود فى نفس دليل البرنامج 'وإسمه txt.txt 'سنقوم بعمل الاتى Dim Ffile As Byte 'للحصول على رقم ملف حر حتى نفتح ملفنا بهذا الرقم Ffile = FreeFile ' 1 فتح الملف عن طريق الجملة الاتية Open App.Path & "\txt.txt" For Input As #Ffile '2 سنقوم بقراءة سطر سطر من الملف حتى نصل لنهايته Dim StrTxt As String, Temp As String StrTxt = "" While Not EOF(Ffile) Line Input #Ffile, Temp StrTxt = StrTxt & Temp & vbCrLf Wend ' هنا سنضع محتويات الملف فى خانة النص التى إسمها Text1 مع تعديل خاصية ' MultiLine = true ' وخاصية ScrollBars = Both Text1.Text = StrTxt End Sub
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
شكر ليك كثي الفائل بتاعك فى البرنامج نزل كويس معاى لكن
ارجوك الفائل بتاعى لا ينزل فى الtext
الفائل بتاعى اسمه help وهو موجود فى my documents
ارجوك ماهو التعديل الذى اجريه على الكود لانى بعد ما عملت الكود تاتى رسالة ى رسالة file not found
الفائل عملته فى notepad
my documentsmy documentsوحفظته فى
اخى رمضان قربت اخلص يكون لك الفضل ارجو المواصلة
اقتباسmy documentsmy documentsوحفظته فى
انقلى الملف إلى الدليل الذى وضعتى به البرنامج
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
اسفة قصدت ليك الفايل اسمه help
وموجود فى mydocuments
والبرنامج فى فيجول البيسك vb98
وقاعدة البيانات فىال d
اين انقل الفايل فى فيجول بيسك و اعمل له save as
وهل الكود ح يتغير لان اسم الفايل بتاعى بيختلف
وينك يارمضان
هذه النصيحه ليست لهذا البرنامج فقط وإنما لكل برامجك القادمة
اولاً:
يجب ان يكون لديك دليل مخصوص لكل مشاريعك واوراقك المهمة وعدم حفظ
هذه الاعمال فى الادلة الافتراضيه التى تقترحها البرامج وليكن أسم هذا الدليل
مثلاُ اعمالى او (MyWork) وداخل هذه الدليل نصنع أدلة أخرى لكل مجموعه مشاريع
مثل دليل للـ VB دليل للـ Word وهكذا
ثانياً:
اول شيء فى اى مشروع هو عمل دليل مستقل لهذا المشروع ونضع فيه كل ملفات
هذا المشروع
والخلاصة من الرغى الكثير السابق ان تضعى كل ملفات المشروع فى دليل واحد
أما إذا كنتى تقصدى ان الملف نوعه ملف مساعدة أى إمتداده hlp
ففى هذه الحالة الموضوع مختلف تماماً
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
لا اعرف كيف اشكرك ياخى لمساعداتك وربنا يديمك للمنتدى
عملت مثل ما قلت لى البرنامج والقاعدة والفايل كلهم فى فولدر والبرنامج اشتغل تمام بس عايزة انقل معاهم الsource lh
ما عارفة لو سمحت لى بالخطوات
لانو لما اعمل ليها نسخ بتجى رسالة تقول هل انت متاكد بنسخ الفايل للقراة فقط فلغيت الامر خفت تحصل مشكلة
توكلى على الله وانسخيهم ولا تخافى
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
لا اعرف كيف اشكرك اخى
لقد ساعدتنى مساعدة كبيرة لحدى دلوقتى البرنامج كويس لو فى مشكلة بعلمكوشكرا
هذا الموضوع مغلق.