اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

محمد طاهر عرفه

إدارة الموقع
  • Posts

    8,498
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    36

كل منشورات العضو محمد طاهر عرفه

  1. اذا قصدت تصميم نموذج بالاكسيس ، فعلي حد علمي لا يمكن ذلك و بالنسبة لل asp هي ليست معقدة ، و لكن تحتاج لان تتعلمها و هي اختصارا مزيج بين اومر لغة تحرير الصفحات html و اوامر ال SQL و اما vbscript او Java script أي أنها تعتبر بيئة تجمع بين هذه الامور و ليست لغة مستقلة و ان أردت ، فلي سلسلة دروس تغطي ال html بالكامل ، و هي منشورة فى قسم الدروس فى موقع الفريق العربي للويب و أسأل الله أن يتاح لي اكمال باقي ال asp بالكامل ، و لكن يصعب علي توفير الوقت حاليا دروس الهتمل http://www.arab-team.com/lesson/html_lesson/ و ال html تعتبر اكثر من ثلث الطريق الي ال asp أو أي لغة برمجة ويب أخري و بالنسبة لصفحات الاكسيس ، فلم أجرب استخدامها علي النت ، و اعتقد أنها معدة اصلا للاستخدام علي الانترانت ( فى شبكة داخلية ) لكن معلوماتي بخصوصها ليست مكتملة و تنقصها التجربة ، و لكن كما قرات فى الرابط السابق من موقع ميكروسوفت يمكن تشغيلها علي الانترنت مع مراعاة الاعتبارات فى المقال .
  2. اذا قصدت النشر فقط فيمكنك عمل تصدير التقريربصيغة htm أو html فيمكنك نشر هذه الصفحة و يمكنك استخدام صفحات الاكسيس data access page ، و لكنها تحتاج لاعتبارات خاصة للتعامل مع الانترنت ، منها تحميل ال Microsoft Office Web Components علي جهاز المستخدم صراحة لم أجربها و لكني استخدم ال asp للتعامل مع الاكسيس بالويب كما فى النفطة التالية ، و لكن اذا اردت المزيد حول صفحات الاكسيس ، فراجع الموضوع التالي فى موقع ميكروسوفت http://support.microsoft.com/default.aspx?...kb;en-us;291783 و به عدة وصلات ايضا مفيدة بهذا الشأن اما اذا أردت تفاعلا مع المستخدم يتقنيات الويب كما تراها فى اغلب المواقع التي تتعامل مع قواعد بيانات اكسيس او اس كيو ال فعليك بتقنية ال asp للتعامل مع قواعد باينات الاكسيس او الاس كيو ال و هي تعني active server pages و هي تقنية للتعامل مع قواد البيانات من خلال الويب و للمزيد عنها يمكنك مراجعة منتديات الويب ( راجع صفحة مواقع مفيدة فى الصفحة الرئيسية )
  3. الفرق المعلن هم عدم امكانية التعديل فى النماذج و التقارير و هذه ثبت أنها غير سليمة و ان التعديل ممكن ببعض التحايل الفرق الاهم هو ان الكود يتم عمل compilation لها بحيث تكون غير ظاهرة و لا يمكن التعديل فيها و من المفرض أن نسخ ال mde أفضل فى الاستخدام من حيث السرعة و الاهم هو تلافي التعديلات الغير مقصودة و تعريف من موضوع فى موقع ميكروسوفت : An MDE file is a Microsoft Access database file with all modules compiled and all editable source code removed أي ان ملف ال mde هو ملف Mdb و قد تم عمل Compilation للاكواد ، و تم ازالة امكانية التعديل منها كلها و هذا الملف يكون حجمه أصغر من ال mdb و أعتقد أن اداؤه أفضل
  4. فى حدث عند الفتح لنموذج حدد المقاس الصغير DoCmd.MoveSize , , 5000, 3000 ثم لفتح النموذج بالحجم الكامل DoCmd.MoveSize , , 12000, 6500 و للعودة الي المقاس الصغير DoCmd.MoveSize , , 5000, 3000 و ايضا يمكنك استغلال نفس الامر لتحديد المكان و ليس الحجم فقط مثل DoCmd.MoveSize 100,150,5000, 3000
  5. اذا كانت الجملة كلها تكتبها مباشرة جرب الكتابة هكذا 1-11-1998 و ليس 1/11/1998
  6. السلام عليكم و رحمة الله و بركاته أهلا أخي فهد ساضع تصور سريع لكي لا أتأخر عليك ، و ارجو أن يكون واضحا ما أراه الأنسب هو التعامل مع المحلات بنفس طريقة المخازن فى هذ1 المثال http://www.officena.net/ib/index.php?showtopic=306 ( راجع رسم الجداول به ) ففي الأغلب سيكون مناسبا هنا ايضا فكل محل يمثل مخزن له أوامر توريد و لها تفاصيل ( جدولان ) و أوامر سحب و لها تفاصيل ( جدولان ) و اومر السحب و التوريد و تفاصيل كل منها تسجل فى 4ال جداول السابقة كتفاصيل للاوامر و بعد التسجيل يتم ترحيل البيانات الي جدول الحركات ( الذي تسجل به جميع حركات التوريد و الصرف )اي التنفيذ ( تنفيذ الامر فينفذ فى جدول الحركات ) و يمكن التعامل مع مسحوبات النقود علي أنها مادة من المواد أو فى جداول منفصلة ، و أفضل الاولي ، أنها مادة كميتها هي قيمتها و فئتها دائما واحد و نلاحظ أن كل أمر سحب أو اضافة فهو مقترن بمخزن معين ، و فى حالتك بمحل معين ، فهو اما اضافة الي المحل و سحب من المحل و فى الحالة التي ذكرت سيتم اضافة المحلات الي الموردين والعملاء بحيث أن هناك محل يورد الي محل آخر و محل يسحب من محل آخر و امامك حلان عند تسجيل حركة التحويل من محل 1 الي محل 2 الاول ان تقوم بعمل امر صرف من محل 1 الي العميل محل 2 لينتقص من رصيد محل 1 و يليه امر توريد من المورد محل1 الي المحل رقم 2 ليزيد من رصيد محل رقم 2 و الثاني أن نفذهما بالكود فى خطة واحدة لتسجيل نفس السجلان فى جدول الحركات مع تحياتي
  7. هذا هو الكود للربط و أيضا كود لطباعة العلاقات الي نافذة ال debug 'create a relation '================= Sub CreateRelationDAO() Dim dbsLocal As Database Dim relLocal As Relation Dim fldLocal As Field Set dbsLocal = CurrentDb Set relLocal = dbsLocal.CreateRelation() With relLocal .Name = "PeopleFood" .Table = "tblFoods" .ForeignTable = "tblPeople" .Attributes = dbRelationDeleteCascade End With Set fldLocal = relLocal.CreateField("FoodID") fldLocal.ForeignName = "FoodID" relLocal.Fields.Append fldLocal dbsLocal.Relations.Append relLocal End Sub 'print relation '================ Sub EnumRelations() Dim dbsLocal As Database Dim relLocal As Relation Set dbsLocal = CurrentDb For Each relLocal In dbsLocal.Relations Debug.Print relLocal.Table & " Related To: " & relLocal.ForeignTable Next relLocal End Sub
  8. لحماية الأكواد بكلمة سر افتح محرر البيزيك ( ALT+F11) Tools Project Properties Protection و اختار عدم اظهار الكود Lock Project For Viewing و اكتب كلمة السر و أكدها و اجعلها طويلة و خليط بين الارقام و الحروف لتصعيب المهمة علي برامج الاختراق
  9. هذا الشرح و المثال للأخ فيصل الحربي: ========================= طريقة إخفاء شاشة الأكسس السلام عليكم ورحمة الله وبركاته إليكم طريقة إخفاء شاشة الأكسس نهائيا بعد فتح النموذج المطلوب 1- انشئ قاعدة بيانات جديده 2- انسخ الكود التالي ثم الصقه في وحده نمطيه جديدة وسمها أي اسم ترغب به الكود =============================================== Option Compare Database Option Explicit Global Const SW_HIDE = 0 Global Const SW_SHOWNORMAL = 1 Global Const SW_SHOWMINIMIZED = 2 Global Const SW_SHOWMAXIMIZED = 3 Private Declare Function apiShowWindow Lib "user32" _ Alias "ShowWindow" (ByVal hwnd As Long, _ ByVal nCmdShow As Long) As Long Function fSetAccessWindow(nCmdShow As Long) 'Usage Examples 'Maximize window: ' ?fSetAccessWindow(SW_SHOWMAXIMIZED) 'Minimize window: ' ?fSetAccessWindow(SW_SHOWMINIMIZED) 'Hide window: ' ?fSetAccessWindow(SW_HIDE) 'Normal window: ' ?fSetAccessWindow(SW_SHOWNORMAL) ' Dim loX As Long Dim loForm As Form On Error Resume Next Set loForm = Screen.ActiveForm If Err <> 0 Then 'no Activeform If nCmdShow = SW_HIDE Then 'MsgBox "Cannot hide Access unless " _ & "a form is on screen" Else loX = apiShowWindow(hWndAccessApp, nCmdShow) Err.Clear End If Else If nCmdShow = SW_SHOWMINIMIZED And loForm.Modal = True Then 'MsgBox "Cannot minimize Access with " _ & (loForm.Caption + " ") _ & "form on screen" ElseIf nCmdShow = SW_HIDE And loForm.PopUp <> True Then 'MsgBox "Cannot hide Access with " _ & (loForm.Caption + " ") _ & "form on screen" Else loX = apiShowWindow(hWndAccessApp, nCmdShow) End If End If fSetAccessWindow = (loX <> 0) End Function =============================================== 3- انشئ نموذج جديد وسمه اي اسم ترغب به 4- غير خصائص النموذج الى pop up=yes modal=yes منبثق = نعم = pop up شكلي او مشروط = نعم = Modal 5- ضع زر امر لإغلاق النموذج مع الأكسس 6- ضع في حدث عند الفتح الكود التالي الكود ============================================== fSetAccessWindow (SW_SHOWMINIMIZED) fSetAccessWindow (SW_HIDE) ============================================== 7- من قائمة أدوات اختر بدء التشغيل ثم حدد النموذج لكي يفتح في بدء التشغيل 8- إحفظ عملك ثم قم بإنهاء القاعدة . 9- شغل القاعدة وسوف ترى ان خلفية الأكسس مختفيه تماما ما عدا النموذج الذي اخترته من قائمة بدء التشغيل . 10 -دعواتكم لنا بالتوفيق مرفق مثال على الطريقة hideaccesswindow_Faisal.zip
  10. اذا لا توجد حاجة ملحة لبرامج خارجية :( شكرا علي المعلومة مع تحياتي
  11. جزاك الله خيرا أخي أحمد و شكرا علي المثال :( ما البرنامج الذي استخدمته فى اعداد ملف المساعدة ؟؟
  12. بناء علي طلب أحد الأخة تم اضافة الكود السابق فى مثال توضيحي و الكود يمكن تنفيذه فى خطو واحد بدمج ناتج ال inputbox مباشرة فى معادلة الشرط if أو علي خطوتين و المثال يشمل كلاهما بالنسبة لل InputBox فالمعاملات الثلاثة فى التعبير الاول يوضع به الرسالة التي تظهر فى مربع الحوار الثاني يوضع به عنوان مربع الحوار الثالث القيمة الافتراضية و لها معاملات أخري و لكن تستخدم بصورة أقل بالنسبة لجملة الشرط فتنقسم الي 3 أجزاء الشرط ، و ماذا اذا تحقق الشرط ، ثم ماذا لو لم يتحقق و فى هذا المثال الشرط هو ان ما يدخله الستخدم = 123 و تبدأ جملة الشرط ب IF ثم الشرط و يلي ذلك then نكتب الكود الذي ينفذ حال تحقق الشرط و يلي ذلك else ثم الكود الذي ينفذ حال عدم تحقق الشرط ثم نختم جملة الشرط ب end if و ممكن استخدام حالة تحقق الشرط فقط مثل If x = 4 then msgbox "4" end if و فى هذه الحالة من الممكن استبدال المعادلة ب if x=4 then msgb "4" و الاستغناء عن end if openPass.rar
  13. السلام عليكم الرد كما ذكرت منقول من مشاركة قديمة لابو هاجر و توجد اصدارات احدث الان و هذه هي الصفحة الرئيسية للبرنامجان Visual Help Pro 4.0 Home Page http://www.winwareinc.com/visualhelp.html Help & Manual http://www.ec-software.com/ اما عن الكراكات فهي ليست لدي للاسف ، و اعتقد أنها ستكون متاحة فى مواقع الكراركات
  14. أيضا هذا مثال للأخ أبو هاجر و فيما يلي الشرح الذي نشره مع المثال : هناك محوران للحديث حول هذا الموضوع المحور الأول : كيف يتم إنشاء ملفات التعليمات يتم عادة إنشاء ملفات التعليمات بواسطة برامج تصميم تحتوي على عدد من أدوات التصميم التي تساعد على إنتاج ملف تعليمات احترافي ثم يتم ترجمة هذا الملف أو ما يسمى بـ Comple له عن طريق برامج توفرها شركة مايكروسوفت نفسها بحث يتحول ملف التعليمات إلي ملف تنفيذي على غرار ملفات EXE وعند ذلك يتم تشغيله تلقائياً عند النقر عليه دون الحاجة إلى وجود البرنامج الذي أنشئ بواسطته ملف التعليمات ولذلك فإن جميع برامج إنشاء ملفات التعليمات تستخدم الـ Compile الذي توفره شركة مايكروسوفت ولا يمكن أن تقوم بعملية الترجمة إلا إذا توفر برنامج الترجمة في الجهاز من المهم أيضاً أن تعرف أن ملف التعليمات يحتوي على عدد من الصفحات التي يسمى كل منها Topic ويفترض أن يكون لكل نموذج في برنامجك Topic أو أكثر بحيث من الممكن أن يكون هناك مجموعة من التفريعات التي تضع لها روابط على الـ Topic الرئيسة التي تحتوي على تعليمات النموذج السؤال المهم الآن ما البرامج التي نستطيع من خلالها إنشاء ملف التعليمات في الحقيقة هناك الكثير من البرامج التي تقوم بهذا العمل وبعضها مجاني ولكن مشكلة 90 % منها أنها لا تدعم اللغة العربية سواء أثناء التصميم أو أثناء الترجمة وسوف أشير هنا إلى برنامجين تعاملت معهما وهما في رأيي من أفضل البرامج التي اطلعت عليها حسب علمي البرنامج الأول : Visual Help Pro V3 وأنص هنا على الإصدار الثالث لأن الإصدار الرابع لا يدعم اللغة العربية ميزات البرنامج : 1- لعل أهم ميزة لهذا البرنامج هي أنه يدعم اللغة العربية أثناء التصميم بمعنى أنك تستطيع الكتابة فيه باللغة العربية بكل سهولة دون أي مشاكل بشرط أن تختار خطاً مناسباً 2- ومن ميزات البرنامج أيضاً صغر حجمه فهو حوال 1.14 ميقابايت طبعاً بدون مترجم مايكروسوفت عيوب البرنامج : 1- أهم عيب في البرنامج هو ضغف إمكانياته في التصميم فالأدوات التي يحتوي عليها أدوات محدودة وهي تقيد حريتك في التصميم 2- الخطوط التي تستطيع استخدامها محدودة بخطوط معينة وبالنسبة للغة العربية تستطيع استخدام واحد من ثلاثة خطوط فقط البرنامج الثاني : Help&Manual وهذا البرنامج حسب علمي من أفضل البرامج على مستوى برامج إنشاء ملفات التعليمات وكثير من مبرمجي اللغات الاحترافية مثل دلفى وسي يستخدمونه لما يتمتع به من إمكانيات هائلة ومنها : ميزات البرنامج : 1- لعل أهم ميزة يمتاز بها البرنامج والتي جعلته مفضلاً لدى الكثيرين هي أنه يستطيع تحويل ملف التعليمات بعد الانتهاء من التصميم إلى عدد من التنسيقات مثل ملفات مساعدة بامتداد hlp أو chm ملفات html بحيث توضع على الإنترنت ملفات وورد ملفات أكروبات ريدر ملفات كتاب إليكترني يمكن تشغيلها على ويندوز مباشرة 2- يحتوي البرنامج على أدوات قوية في التصميم 3- بحتوي على أدوات مساعدة منها مثلاً أداة لالتقاط الصور من الشاشة وأداة جميلة جداً لوضع مايشبه النقاط الساخنة على الصور بحيث إذا نقرت عليها يظهر لك تعليمات تتعلق بالمكان الذي نقرت عليه من صورة النموذج في التعليمات وفي ملف التعليمات المرفق مثال على ذلك 4- يستطيع البرنامج استيراد ملفات التعليمات المصممة ببرامج أخرى شريطة أن تكون مفتوحة وليست مترجمة عيوب البرنامج : 1- إبرز عيوب البرنامج هو صعوبة الكتابة باللغة العربية في مباشرة ولذلك فالطريقة المفضلة لدي هي الكتابة في وورد ثم نسخ النص ولصقه مباشرة 2- كبر حجم البرنامج حيث يزيد عن 9 ميقابايت المحور الثاني : كيف يتم ربط ملف التعليمات مع نماذج أكسس ؟ بداية من المهم القول إن هناك العديد من التنسيقات لملف التعليمات مثل الملفات ذات الامتداد hlp وهي الأقدم والأشهر والملفات ذات الامتداد chm وهي الأحدث ولكن للمؤسف فإن الأكسس ومثله الفيجوال بيسك 6 لا يستطيع التعامل إلا مع الملفات ذات الامتداد hlp أما الأنواع الأخرى فيحتاج للتعامل معها إلى أدوات OCX أو DLL وطريقة الربط سهلة جداً ففي خصائص النموذج وفي علامة التبويب غير ذلك ستجد خاصية ملف التعليمات اكتب فيها اسم ملف التعليمات فقط ولا تحتاج لكتابة المسار بالكامل إلا إذا كان ملف التعليمات في مجلد آخر غير المجلد الذي توجد فيه قاعدة البيانات وفي خاصية معرف سياق التعليمات اكتب رقم الصفحة أو الـ topic التي تريد ظهورها عند النقر على زر F1 في هذا النموذج الآن أقدم لكم روابط للحصول على البرنامجين وقد وضعتهما في موقع لأحد الزملاء أسأل الله أن يجعله في موازين حسناته رابط برنامج Visual Help Pro V3 ويحتوى على البرنامج والكراك علماً بأن الكراك حسب الشهر ومعنى ذلك أنك ستستخدم السيريل التسلسلي الخاص بشهر يناير وحجم البرنامج 1.14 ميقابايت http://site127.webhost4life.com/aboali/visualhlp.exe رابط برنامج Help&Manual وهو مكرك وجاهز للاستخدام وحجم البرنامج 9.2 ميقابايت http://site127.webhost4life.com/aboali/hm3setup.exe آمل أن أكون قد شفيت غليل المتسائلين حول هذا الموضوع كما آمل ممن لديه خيرة في هذا الموضوع أو سبق أن جرب برنامجاً مع اللغة العربية ووجده مناسباً أن يفيدنا هنا حتى تعم الفائدة ختاماً أعتذر عن الإطالة لكن الموضوع يتطلب ذلك وأنا مستعد لأي تسائل حول أي من البرنامجين علماً بأنني جربتهما على ويندوز 98 وإكس بي تحياتي أخوكم ِ/ أبو هاجر help_abuhagar.zip
  15. هذا المثال يوضح كيفية منع ادخال قيمة أكبر من صفر فى حقل رقمي اسمه App1 و ذلك فى حال كون هناك قيمة أكبر من صفر سبق تسجيلها فى هذا الحقل و ذلك لنفس التاريخ و الذي يتم تسجيله فى حقل mdate فيتم اختبار القيم فى الجدول التي لها نفس التاريخ و اذا كان هناك سجل لنفس التاريخ لديه قيمة أكبر من صفر لنفس الحقل فنمنع التسجيل - , و هذا يتم باستخدام الدالة Dcount كما نمنع تسجيل أي قيمة أكبر من صفر للحقل فى حال عدم تسجيل التاريخ فى حقل التاريخ اولا ا ChechOtherFields.rar
  16. كتب اسم النموذج الرئيسي و الفرعي و مربع النص الذي به مجموع الفرعي و الاخر الموجود علي الرئيسي و المعادلات المكتوبة فى مصدر بيانات كل منهما
  17. هل يعطي خطأ مستمر أم خطأ فقط عند عدم وجود بيانات اذا كانت الاولي ، فهناك خطأ فى التنفيذ فراجع الأسماء ، اسم النموذج الفرعي و اسم مربع النص الذي به المجموع فى النموذج الفرعي و اذا الثانية أي أن الخطأ يظهر فقط فى حالة عدم وجود بيانات فجرب ادراج الدالة NZ فى المعادلة فى مربع النص علي النموذج الرئيسي nz(SubFormName.Form!TextBoxName;0) و اذا لم تحل ( بالنسبة لحالة عدم وجود بيانات ) =IIf(SubFormName.Form.RecordsetClone.RecordCount>0;nz(SubFormName.Form!CountID;0);0)
  18. سنتحدث هنا عن فتح التقرير بالكود سواء لكامل السجلات أو لسجل محدد و أيضا سنتحث عن خاصيتي تجميع النقرير و عمل فواصل للصفحات أولا فتح التقرير من نموذج بالكود سواء لكامل السجلات أو لسجل محدد بالنسبة لأمر Docmd.openreport له أربعة معاملات arguments نختار منها ما نريد و نترك ما نريد ليأخذ قيمته الافتراضية الجزء الأول هواسم النموذج المراد فتحه و نكتبه بين "" فيكون الحد الادني للجملة مثلا هو docmd.openForm "Report1" و اذا بدأنا نكتب فى الفيجوال بيزيك فسيساعدنا ليذكرنا بمكونات كل جزء بعد كتابة الفاصلة التي تفصل بين الاجزاء المختلفة للجملة. جرب كتابة الجملة السابقة ، و اكتب فاصلة بعدها و انظر ماذا سيحدث.. الجزء الثاني هو طريقة عرض النموذج بعد فتحه هل فى وضع العرض العادي ، مشاهدة الطباعة أم وضع الطباعة الباشرة و هو الافتراضي الجزء الثالث هو اسم فلتر معد مسبقا علي هيئة استعلام ، علي أن يحوي الاستعلام علي الحقول الموجودة فى النموذج الجزء الرابع الشرط و يكون علي هيئة [fieldname] = Forms![formname]![controlname on other form] و هو الجزء الذي استخدمناه فى المثال السابق بان رقم الموظف = رقم الموظف الموجود فى مربع النص فى النموذج و فى المثال عندما أردنا فتح النموذج بكامل سجلاته اختر خصائص الزر و من صفحة الاحداث ، اختر حدث عند النقر لتشاهد الكود و هو Dim stDocName As String stDocName = "RepEmpCourses-noGroup" DoCmd.OpenReport stDocName, acPreview و هي طريقة منظمة يستخدمها المعالج لاستخدام المتغيرات داخل الجملة كخطوة وسيطة و الكود السابق يناظر DoCmd.OpenReport "RepEmpCourses-noGroup" و لفتح التقرير علي موظف محدد Dim stDocName As String stLinkCriteria = "[EmpID]=" & Me![EmpID] stDocName = "RepEmpCourses-noGroup" DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria اي انها تناظر DoCmd.OpenReport "RepEmpCourses-noGroup", , , "[EmpID]=" & Me![EmpID] هذا حال كون حقل EmpID رقمي اما اذا كان نص فنضيف علامتي '' الي الجملة ، فتصبح DoCmd.OpenReport "RepEmpCourses-noGroup", , , "[EmpID]='" & Me![EmpID] & "'" ----------------------------------------------- ثانياً : الجزء الثاني فى المثال و هو الخاص بتجميع البيانات ما الفرق بين التقريرين الموجودان فى المثال التقرير الاول الذي يعرض بيانات الموظفين نجده يعرض كل البيانات من زر " التقرير للجميع" و هذا التقرير نجد فيه أنه لعرض بيانات الموظف و معها تاريخ ميلاده و رقمه بالاضافة الي الدورات التي حصل عليها سنجد تكرار لا دعي له للاسم و الرقم وتاريخ الميلاد بجانب كل دورة لذا فمن المناسب عمل تجميع لبيانات الموظف أولا ، ويليها عرض للدورات و هذا سيمكننا أيضا من عمل احصائيات علي البيانات مثل عد عدد الدورات التي حصل عليها كل موظف و لكن كيف نقوم بعملية التجميع من وضع تصميم التقرير نضغط علي ايقونة التجميع المهشرة باللون اللبني فى الصورة التالية فتظهر لنا شاشة الترتيب و التجميع و منها يمكن اختيار الترتيب فقط أو الترتيب و عمل رأس للمجموعة و/أو ذيل للمجموعة و هنا في المثال اخترنا عمل الترتيب برقم الموظف ثم التجميع باسم الموظف و طبعا التجميع بالرقم أفضل لانه رقم من ناحية و لامكانية تشابه الاسماء من ناحية و لكن هذا لغرض المثال فقط و نختار من الجزء الأسفل اظهار الرأس أو التذييل من عدمه Group Header Group Footer و هنا اخترنا اظهار الرأس فقط فتظهر لنا مجموعة اسمها رأس اسم الموظف Emp Name Header و فيها نسحب الكائنات المراد تكرارها فى رأس المجموعة كما فى المثال و من خصائص رأس المجموعة أو تذييلها يمكن تحديد اختيار بدء صفحة جديدة من عدمه ------------------------------------------------------------------- ثالثا : لاظهار صفحة جديدة فى التقرير توجد طريقتان اما أن نظهرها بناء علي كونها قبل أو بعد رأس أو تذييل مجموعة من مجموعات التقرير من وضع تصميم التقرير اختار رأس أو تذييل أي مجموعة ثم من خصائص الرأس أو التذييل ( اختر الرأس أو التذييل ، ثم ايقونة الخصائص ، او اضغط f4 ) ثم من قائمة Format Force New Page و اختر After Selection او Before Selection بحسب الحالة و الطريقة الأخري هي ادراج كائن فاصل الصفحات من وضع التصميم من صندوق الادوات إختر فاصل الصفحة Page BReak و هو ايقونة علي شكل مستطيلان مفصولان الايقونة رقم 15 فى الشكل التالي : و ضعها فى المكان الذي تريد أن يكون به فاصل للصفحة
  19. هنا سنتحدث عن فتح النموذج بالكود سواء بكامل السجلات او علي سجل محدد و هذا يتم باستخدام أمر Docmd.openForm و هذا الامر له ستة معاملات arguments نختار منها ما نريد و نترك ما نريد ليأخذ قيمته الافتراضية الجزء الأول هواسم النموذج المراد فتحه و نكتبه بين "" فيكون الحد الادني للجملة مثلا هو docmd.openForm "form1" و اذا بدأنا نكتب فى الفيجوال بيزيك فسيساعدنا ليذكرنا بمكونات كل جزء بعد كتابة الفاصلة التي تفصل بين الاجزاء المختلفة للجملة .. جرب كتابة فاصلة بعد الجزء الاول و ستري ما أقصد الجزء الثاني هو طريقة عرض النموذج بعد فتحه هل فى وضع العرض العادي ، أو وضع التصميم أو ورقة البيانات ... الجزء الثالث هو اسم فلتر معد مسبقا علي هيئة استعلام ، علي أن يحوي الاستعلام علي الحقول الموجودة فى النموذج الجزء الرابع الشرط و يكون علي هيئة [fieldname] = Forms![formname]![controlname on other form] و هو الجزء الذي استخدمناه فى المثال السابق بان رقم الموظف = رقم الموظف الموجود فى مربع النص فى النموذج الجزء الخامس يعبر عن طريقة فتح النموذج من حيث التعامل مع البيانات ، أي فتح النموذج فى وضعية التعديل أم الاضافة ام القراءة فقط الجزء الأخير طريقة فتح نافذة النموذج عادي - مخفي - Modal .. و الافتراضي هو عادي Normal و فى المثال عندما أردنا فتح النموذج بكامل سجلاته اختر خصائص الزر و من صفحة الاحداث ، اختر حدث عند النقر لتشاهد الكود و هو Dim stDocName As String Dim stLinkCriteria As String stDocName = "FrmMainEmp" DoCmd.OpenForm stDocName, , , stLinkCriteria و هي طريقة منظمة يستخدمها المعالج لاستخدام المتغيرات داخل الجملة كخطوة وسيطة و الكود السابق يناظر DoCmd.OpenForm "FrmMainEmp" حيث أن stLinkCriteria لم يتم اعطاؤه قيمة و علي العكس فى زر فتح نموذج علي موظف معين ، فقد تم تعيين قيمة للشرط stLinkCriteria Dim stDocName As String Dim stLinkCriteria As String stDocName = "FrmMainEmp" stLinkCriteria = "[EmpID]=" & Me![EmpID] DoCmd.OpenForm stDocName, , , stLinkCriteria اي انها تناظر DoCmd.OpenForm "FrmMainEmp", , , "[EmpID]=" & Me![EmpID] هذا حال كون حقل EmpID رقمي اما اذا كان نص فنضيف علامتي '' الي الجملة ، فتصبح DoCmd.OpenForm "FrmMainEmp", , , "[EmpID]='" & Me![EmpID] & "'"
  20. كم كان الفرق نرجو ذكر الحجم للحالات المختلفة الملف بدون صورة و بدون اخفاء الملف بدون صورة + اخفاء الملف بصورة بدون اخفاء الملف بصورة + اخفاء لتتضح الصورة حول السبب فى كبر الحجم بالنسبة للتنسيق اعتقد ان الاقل حجما هو jpg و يمكنك تصغير مقاس الصورة الي أقل المقاسات وضوحا باستخدام أي محرر صور أو برنامج مثل acdsee او الفوتوشوب
  21. توجد وصلة للتحميل فى هذه الصفحة من موقع ميكروسوفت http://www.microsoft.com/sql/msde/ و تحديدا http://www.microsoft.com/sql/msde/producti...fo/overview.asp و تقوم بتنزيل الملف SQL2kdesksp3.exe و حجمه 71 ميجا تقريبا و يوجد ملفان آخران للتحميل لتحديث نسخة السيرفر نفسها و ليس ال msde
  22. MSDEهو اختصار ل Microsoft SQL Server 2000 Desktop Engine و هو نظام يتيح لك عمل تخزين للبيانات علي الجهاز المحلي بطريقة متوافقة مع تخزين البيانات فى خادم SQL Server العملاق SQL SERVER 2000 ، فتستطيع اعداد التطبيق علي جهازك متوافقا معه دون وجود خادم سيرفر 2000 حقيقي والتطبيق الذي تعده بناء علي MSDE يكون إن شاء الله قابل للعمل مع SQL SERVER 2000 أي انه (MSDE ) نسخة مصغرة من (SQL SERVER 2000 ) و التعامل بالاكسس مع كلاهما يختلف عن التعامل بالاكسيس مع خلفية بيانات أكسيس فى أختلافات كثيرة ، ستعرفونها من خلال شرح الأخ أحمد الحربي بإذن الله
×
×
  • اضف...

Important Information