Dream_Works

أعتقد إن أخونا محتاج Full screen مو بس maximize .... محتاج ياخذ الشاشة كلها .... ما مرت علي هذي من قبل ؟؟؟؟

الله يعطيك العافية أخوي

أرجو إرفاق مثال للتوضيح ... بشكل سريع أعتقد أن يمكنك استخدام خاصية locked لل textbox

السلام عليكم لقد أعجبتني طريقة إقفال البرنامج ... كيف تم اقفال الملف بهذا الشكل و كيف يمكن فتحه؟

أعتقد إني أتفق مع الأخ yousef في رأيه ... الحل ماله حل جذري ... يمشي معاك على جميع الشاشات (فورم) في المستقبل أو ممكن تغير القيمة بالكود داخل الفورم و هذا حل أصعب و غير مقبول لأنك اذا واجهت نفس الحالة في فورم ثاني راح تواجه نفس المشكلة أو تكتب الكود المطلوب على كل فورم أرجو تنزيل قاعدة بياناتك أخوي في المنتدى

[left]Private Sub Form_Load() Dim dbs As Database Dim rst As Recordset Dim nodX As Node Set dbs = CurrentDb Set rst = dbs.OpenRecordset("ItemsTreeAll", dbOpenDynaset) Set nodX = TreeView1.Nodes.Add(, , "A", "Shoot") With rst Do While Not .EOF Set nodX = TreeView1.Nodes.Add("A" & CStr(Nz(!Parent)), tvwChild, "A" & CStr(!Code), CStr(!Code) & ".." & !ADescription) nodX.EnsureVisible .MoveNext Loop End With rst.Close Set dbs = Nothing End Sub[/left] هذا الكود موجود في ملف الأخ أبو هادي .... المرفق في هذا الموضوع http://www.officena.net/ib/index.php?showt...mp;hl=tree+view أرجو من أي شخص فاهم شجرة الحسابات يشرح الكود اللي داخل اللوب على الأقل بالتحديد كيف يمكن تحديد كيفية إظهار البيانات ووضعها في قسم معين من الشجرة ... لماذا لم يتم وضع كل البيانات في فرع واحد ؟

السلام عليكم لقد قرأت عدة مواضيع في المنتدى عن كيفية عمل شجرة الحسابات ... و لكنها تميل الى وضع أمثلة جاهزة ... و لكن أرجو شرح العملية كيف تتم بشيء من التفصيل

أخي منذر ... الملف ما يشتغل :(

أعتقد إن الترتيب المطلوب غير معروف للكمبيوتر ( ليس هجائيا و لا رقميا ) ... لذلك يجب إلحاق قيم أخرى (أرقام مثلا ) للقيم الأصلية ( وزير - وكيل ... الخ ) و من ثم عمل الترتيب هل يمكنك تنزيل قاعدة بياناتك ... حتي نعرف كيف نتعامل معها أصارحك القول بأن خبرتي ليست قوية جدا بالأكسيس ف احتمال تجد حل أفضل

للأسف ما اشتغلت معاي ... أو ماعرفت أسويها

أشكرك على الرد أخوي ... انشاله راح أجربها باجر بالدوام و أعطيك خبر ... أشكرك على المعلومة القيمة me.parent ....

السلام عليكم أنا أواجه مشكلة مع خاصيتي : LINKMASTERFIELDS , LINKCHILDFIELDS أرغب بتغيير ال SOURCE مال ال SUBFORM حسب قيمة معينة في ال MAIN FORM ... لقد حاولت عمل ذلك و لكنني لا أعرف كيفية كتابة ال SOURCE لأن البرنامج ما يتعرف عليه .... حاولت عمل التالي: Me.Movies_List_Subform.LinkMasterFields = ME.Multi_Media_Number_Text.ControlSource بالإضافة الى عدة محاولات أخرى

السلام عليكم لدي ملف وورد وضعت به أكثر من فاصل Break عن طريق كتابة التالي ---------------------------------- و لكن للأسف لا يمكنني إزالة هذه الفواصل إلا بواسطة أمر show/hide لإظهار علامات سوداء و من ثم نمسحها ... و للأسف بقي لدي فاصل واحد الآن لم يمكنني مسحه .... هذا غير إن الفواصل تظهر بشكل تلقائي اذا قمت بوضع تعديلات على الملف .... ماذا أفعل لإزالة هذه الفواصل كليا؟

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

الله يعطيك العافيه أخوي ... على هالمعلومات

قم بإنشاء استعلام جديد و ضع فيه هذا الكود الذي سيضيف الحقول الأساسية primary keys من جدول الى آخر INSERT INTO mw_s ( mew ) SELECT Me.me_name FROM Me LEFT JOIN mw_s ON Me.me_name=mw_s.mew WHERE (((mw_s.mew) Is Null)); ثم احفظ الاستعلام ... و بعد ذلك ... افتح الاستعلام مره أخري و أضف باقي الحقول كل على حده ملحوظه هامة : أرجو أن تعمل باك أب لقاعدة بياناتك قبل تجربة هذه المحاولة

السلام عليكم على ما أعتقد إنه الأوتو نمبر ما تقدر تتحكم فيه بهذه الطريقة ... لازم تخليهم اثنينهم أرقام عادية و تتحكم بكيفية سير الأرقام عن طريق الكود الموجود ضمن شاشة الادخال (الفورم)

كلمة me لا يتم التعرف عليها الا من داخل الفورم فقط .... \ أما اذا كنت خارج الفورم و أردت الدخول الى أحد مكوناته يجب أن تستخدم اسمه العام ( المعروف لجميع أجزاء ملف الأكسيس ) .... كلمة me لا يتم التعرف عليها الا من داخل الفورم فقط .... \ أما اذا كنت خارج الفورم و أردت الدخول الى أحد مكوناته يجب أن تستخدم اسمه العام ( المعروف لجميع أجزاء ملف الأكسيس ) .... يمكنك اظهاره بطريقة سهلة وهي 1- قف عند سطر فاضي بالكود 2- اضغط الزر الأيمن للماوس 3- اختر list properties & methods 4- تظهر لك قائمة تحتوي على جميع الأجزاء الموجودة في برنامجك ( فورم , تقارير , وحدات نمطية ) بالاضافة الى مجموعة من الأوامر 5- اضغط حرف F للذهاب الى جميع الشاشات (فورم) 6- ستجد أن كل فورم موجود اسمه مسبوقا بكلمة Form 7- اختر الفورم الذي تريد و سترى اسمه الكامل الذي يمكن أن تستخدمه من الخارج

أرجو وضع أسماء الجداول و الحقول الأساسية primary keys للجدولين (المرسل و المرسل اليه ) لتسهيل المهمه

الله يعطيك العافية صج وحش اللي سوى هالبرنامج :)

السلام عليكم أعتقد إنني أواجه صعوبات في إرفاق الملفات .... دائما تظهر لي هذه الرسالة أولا أرجو تبديل ال recordsource إلى استعلام عن الجدول كله و مرتب تصاعديا حسب التاريخ على العموم هذا هو الكود ... أرجو أن تجربه و تبلغني بالنتائج private sub update_click() Dim rs As DAO.Recordset Dim ctr As Integer Dim previousDate As Date Set rs = CurrentDb.OpenRecordset(Me.RecordSource) rs.MoveFirst previousDate = rs.Fields(3).Value Do rs.Edit ctr = ctr + 1 If Year(previousDate) <> Year(rs.Fields(3)) Then ctr = 1 previousDate = rs.Fields(3).Value End If rs.Fields(2) = ctr rs.Update rs.MoveNext Loop Until rs.EOF rs.Close Set rs = Nothing end sub أرجو من أي خبير اذا رأي أي تحسينات يمكن اضافتها يبلغني بها ... لأني خبرتي بالأكسيس ليست قوية

تم التعديل فيها و لكن أعتقد أنها تحتوي بعض الأخطاء الناتجة عن عدم فهمي لبعض النقاط و هي 1- هل يمكن اضافة نفس الاسم أكثر من مرة في القائمة 2- أعتقد أنه يجب تخزين القيم المضافة في جدول .... اذا جربت و أضفت القيم الى القوائم ثم أغلقت البرنامج و فتحته ستلغي الأسماء التي أضفتها تلقائيا أرجو التوضيح

أشكرك يا أخ محمد طاهر على تعديل اسم المستخدم الخاص بي أنصحك أيها أخ captinasd أن لا تشتغل على قاعدة بياناتك الا بعد ما تسوي باك أب

شكرا على سرعة الرد ... أنا في انتظارك

السلام عليكم أرغب بتغيير اسم المستخدم إن أمكن ذلك إلى .... ... فحاولت التواصل مع أي مشرف هنا و لكن تظهر لي هذه الرسالة فما معناها و كيف أتجاوزها أرجو المساعدة