تفضل هذه الروابط تتحدث عن ذلك
http://www.officena.net/ib/index.php?showtopic=33549#entry174361
http://www.officena.net/ib/index.php?showtopic=54863#entry346668
ملحوظة :
وندوز7 و 8 تحتوي على خطوط الباركود فليس هناك حاجة لجلب خطوط خارجية الى وندوز
طبعا بالنماذج وانما الاستعلامات تصنع حسب حاجة النماذج او التقارير
ملحوظة :
استخدم استعلاما بديلا لجدول الاسماء كمصدر لبيانات المشروع ، والفائدة ظاهرة حيث سيحتوي الاستعلام على بيانات غير موجودة في الجدول كسنة الميلاد والمحافظة والاسم اللكامل وغير ذلك من الخصائص مثل امكانية الحجب عن الظهور وغيرها كثير
لا يهم
المهم التسمية بحروف تدل على المسمى
انظر المثال المرفق وتصفح الجداول
ودقق بنوع البيانات داخل جدول الاسماء
احرص ان يكون نوع البيانات المدخلة ارقما ما استطعت
في المثال المرفق قمت بربط العلاقات للتوضيح فقط والاولى حذفها وهو ما افعله في اعمالي
والسبب ان البيانات التي سيتم ادخالها لاحقا سيكون من خلال مربعات التحرير ومربعات التحرير هي علاقة بحد ذاتها ، لانها محكومة
saeyd9.rar
الملاحظات :
1- دوما ارفق مثالك حسب الحاجة فقط اي الجزء المطلوب التعديل عليه فمن غير المستحسن وجود كائنات زائدة
هذه الطريقة تساعدك في انشاء مكتبة خاصة بك تشتمل على امثلة صغيرة لمواضيع معينة
2- احرص على تسميات جميع الكائنات من جداول ونماذج وحقول داخلها بحروف اجنبية حتى يسهل عليك تعلم الكود البرمجي وكتابته
ويمكنك اظهار اللغة العربية في التسميات التوضيحية (واعلم اني من الغلاة في توظيف اللغة العربية من غيرها ) ولكننا هنا نقرب المعلومة الى المتعلم
3- لاتترك مسافات فارغة بين الكلمات عند تسمية كائن او عنصر ما وانما استعض عن ذلك بفاصلة تحت السطر او ميز بين الكلمات بأن تكتب الحرف الاول من كل كلمة بخط كبير
4- اهتم بحجم الحقل بما يتناسب وحجم البيانات المدخلة فمن غير المناسب ان نجعل حجم حقل الاسم الاول = 255 حرف .. وهكذا
5- لا تبدأ عملك جملة واحدة وتقفز الى درجات اعلى وانت لم تستكمل الاساسات
6- ابدأ عملك بصنع جدول جدول حتى تتيقن انك استوفيت كل شيء عن الجداول
انشاء الجداول بطريقة صحيحة هو الاساس الاهم في اي مشروع
saeyd8-2003.rar
الاكسس لا علاقة له في ذلك
فالاصدار الاحدث يفتح الاصدار الاقدم ولكن العكس لا
قبل يومين نصبت برنامج معمول على 2003 نصبته على جهاز يعمل على وندوز8 64 بت والاوفيس 2015
ولم اواجه مشكلة تذكر الا في مكتبة النت XMLHTTP حيث يوجد لها بديل XMLHTTP60 فاستبدلتها ومشي الحال
هي ليست عمود بل حقل
وتوزيع الاسم على حقول متعددة افضل بلا شك
ومن فوائده ايضا تقليل نسبة الاخطاء
اما الجمع واظهاره في التقارير فهو كما ذكرت سابقا يسير نجمع الحقول كما في الجمع العادي ونستخدم العلامة & بالضبط كما نستخدم +
عبدالله ، وعبدالرحمن ............ لا بأس بأن لا نترك بينها فراغا
ولكن كيف بــ صلاحالدين ... ونحوه
افضل طريقة عند عمل المشاريع هو كتابة الاسم الرباعي مجزأً في حقول عدة
وحينئذ نحن بغنى عن اكواد او معادلات اضافية حيث ان تجميع الاسماء كما تعلمون يسير
الرسالة تتحدث عن وجود هذا الحدث في كائن اكتفكس كنترول في احد النماذج والتقارير
ولان مشروعك على صيغة MDE فلن تتمكن من الوصول الى سبب المشكلة
احسن طريقة للعثور على سبب المشكلة وهو الذي اتبعه دائما :
هو انني افتح المشروع الاصل MDB من الفلاشة داخل الجهاز الذي حدثت به المشكلة
السلام عليكم
حلوة جدا تصاميم الواجهات وهذا يدل على صاحبها وذوقه الرفيع
واضح ان مطلوبك يتركز حول الترقيم التلقائي المنوع
اولا انظر الى هذا الموضوع فهو يتحدث عن هذا الشأن http://www.officena.net/ib/index.php?showtopic=49961#entry305187
ثانيا : وركز معي ؛ عند ربط جدولين رئيسي وفرعي بعلاقة متكاملة ثم انشاء نموذج رئيسي واخر فرعي فاننا حين نختار الرقم المعرف صاحب العلاقة (رقم المجموعة ) في النموذج الرئيسي فانه سينتقل الرقم آليا الى النموذج الفرعي ( رقم المجموعة ) وبكذا تكون قطعت نصف الطريق
حينها يمكنك عمل ترقيم تلقائي آخر داخل الفرعي يبدأ من الواحد
لتطبيق ما ذكرته اعلاه يمكنك ارفاق مثال بجدولين ونموذجين فقط فقط واجعله على الامتداد mdb
Private Sub Form_Load()
Dim xdate As Date
Dim Ndate As String
Dim mssg As String
xdate = #12/23/2014#
If xdate <= Date Then
MsgBox "انتهت الفترة التجريبية فضلا اتصل على 123456789"
Quit
Else
Ndate = CStr(xdate - Date)
mssg = "المدة المتبقية" & " " & Ndate & " " & "يوم"
MsgBox mssg
DoCmd.Close
End If
End Sub
السلام عليكم
اخونا عبدالفتاح اسأل الله الكريم لك العفو والمعافاة
اخونا ابو آلاء مطلوبك مقدور عليه
ولكني لم اتمكن من رؤية الامثلة بسبب استخدامي لاكسس 2003
المطلوب منك ارفاق جدول ببعض المحافظات واكوادها
ايضا جدولا آخر بكم اسم كذا مع ارقامهم القومية
اجعل المرفق على الامتداد mdb
dim i as integer
i=dlookup("raseed","jadwal")
if text1>i then
msgbox"الرصيد & i & اقل من المطلوب "
Undo
exit sub
end if
text1 هو حقل الطلب
raseed هو حقل الرصيد
jadwal هو الجدول المشتمل على حقل الرصيد
اجعل الكود اعلاه في حدث بعد التحديث لحقل الطلب
فهم السؤال نصف الاجابة
اجابة موفقة ووافية ولكن توجد بعض المشكلات في المرفق
المهم لتحقيق المطلوب هو جعل التقرير يستند الى استعلام مصدره هو مصدر النموذج ويجعل داخله معيارا لاظهار السجلات المؤشر عليها فقط