ghaziothman

أخي الكريم حسب ما فهمت من سؤالك أنك تريد حصر المعاملات غير المنجزة أو المفقودة الاجابة بسيطة وهي اضافة حقل تسميه مثلا STATUS وهو بمثابة معرفة هل تم انجاز العمل ام لا وهذا الحقل تخزن به الحالة اي عند ورود طلب من البائع تعدل الحقل الى نعم عندها تستطيع الاستعلام …

أخي الكريم تحية وبعد عملت لك ما تريد وهي عبارة عن قاعدتين لا تعمل القاعدة الثانية الا من خلال القاعدة الاولى وهي اجابة على سؤالك يرجى قراءة الكود والتمعن به طبعا هذه طريقة من عدة طرق لحماية نظامك و لا تنسى انه يجب تحويل النظام ال mde تحياتي وأرجو أن تكون قد وض…

أخي الكريم تحية وبعد عملت لك ما تريد وهي عبارة عن قاعدتين لا تعمل القاعدة الثانية الا من خلال القاعدة الاولى وهي اجابة على سؤالك يرجى قراءة الكود والتمعن به طبعا هذه طريقة من عدة طرق لحماية نظامك و لا تنسى انه يجب تحويل النظام ال mde تحياتي وأرجو أن تكون قد وض…

الحمد لله انك نجحت في هذه الطريقة حياك الله

هذا الكود لانشاء ملفات داخل الدليل windows ولا أحد يستطيع الانتباه اليها لانها ملفات غير مفهومة لكن نظامك سيعتمد عليها On Error Resume Next Dim ad As Long ad = (Me!ser_no + 4567) * 6 If Me!a = ad Then Dim a1 As Double, a2 As Double, a3 As Double a1 = 600700123…

هناك أفكار أخرى للحماية 1 - حول البرنامج الى الصيغة mde بدلا من mdb 2 - الغي خاصية الشفت 3 - ضع رقم سري على قاعدة البيانات التي تحتوي على الجداول 4 - يمكن انشاء ملف نصي على دليل معين من مثلا على الدليل ويندوز وبه رقم 5 عندها يتم التشييك على هذا الملف السري وبد…

أخي الكريم سأعطيك الجواب يبدو أنك مبرمج لغات قديمة وتريد أن تطبق نفس المجال الجواب هو كالتالي في خصائص الحقل وعند قناع الادخال ضع 9999 اذا كان الحقل رقمي و cccc اذا كان الحقل نصي وايضا بالخصائص عدل الجدولة التلقائية الى نعم واذا لم تفلح سأرسل لك مثالا تحياتي

شكرا أخي ستارنور2000 - فعلا هو المطلوب بذاته - شكرا مرة أخرى - وأقدر جهودك وفقك الله - وجعل جهدك في ميزان أعمالك

أخي ستارنور2000 شكرا على اجابتك السريعة - ولكن اسمح لي بسؤال آخر وهو كيف يمكن قراءة السجل التالي من خلال الكود ado أو كما يقال بنفس الطريقة التي تكتب بها نماذج الفيجوال بيسك اي بدون ان يكون النموذج معتمد على الحدول والمثال التالي يوضح ذلك أرجو كتابة الكود بزر …

بارك الله بك وبأمثالك - شكرا أخي الكريم - ما قصرت

السلام عليكم ورحمة الله وبركاته ارجو التكرم بالمساعدة حيال امكانية الضغط على زر الأمر الموجود بالنموذج لمشاهدة السجلات واحد يلي الآخر أي معرفة كيف يتم برمجة next record ] دون أن يعتمد النموذج على الجدول المطلوب الكود في vb ولكم الشكر db2.zip

السلام عليكم ورحمة الله وبركاته ارجو التكرم بالمساعدة حيال امكانية الضغط على زر الأمر الموجود بالنموذج لمشاهدة السجلات واحد يلي الآخر أي معرفة كيف يتم برمجة next record ] دون أن يعتمد النموذج على الجدول ولكم الشكر db2.zip

نحن لا نعلم ما هو triger بالتحديد ولكن اعتقد أنه كود ينشأ نعم تستطيع ان تكتب ب vb script أو ado في حالة الرغبة بالتوسع بالكود من خلال النموذج أو وحدات نمطية

تفضل الملف kalema.zip

أخي الكريم يبدو أنني تأخرت بالرد ولكن أرجو أن لا يكون قد فات الأوان على العموم مشكلتك بتصميم الجداول حدد ما تريد بالضبط وما هو المطلوب لأن العلاقات التي قمت بانشائها هي خطأ فقد قمت بتعديل تصميم الجداول من جديد ولا داعي لعمل علاقات فقط انشأها عند شبكة الاستعلام…

ادخل على القاعدة ك مدير للنظام ومن ثم اذهب الى الصلاحيات وعدلها امسح ال workgroup عن طريق join واعمل workgroup جديدة خالية تحياتي

أخي الكريم تأكد من الأمور التالية : أن النموذج يفتح للكتابة وليس للقراءة فقط ان زر الأمر يوجد به كود أن العلاقات قد يكون بها فرض التكامل المرجعي وأي خطأ في بيانات جدول لا يمكن اضافة البيانات الى باقي الجداول تأكد من خصائص النموذج وخاصة ادخال بيانات واضافة سجلا…

أخواني الأعزاء أعرف أن هذا السؤال يخص منتدى sql وبالفعل لقد وضعت السؤال لعدة ايام ولم يجب أحد عليه ونظرا لحاجتي للاجابة وضعته في هذا القسم لما يتميز من سرعة رد وأعضاء متميزين أرجو التكرم بالمساعدة لأني جديد بموضوع ال sql server لقد انشأت قاعدة بيانات على سبيل …

أخواني الأعزاء أرجو التكرم بالمساعدة لأني جديد بموضوع ال sql server لقد انشأت قاعدة بيانات على سبيل المثال اسمها master و table اسمه cust والحقول الموجودة به اسمها cust_no و cust_name كيف استطيع عرض محتويات الجدول أي قراءة الجدول المخزن على السيرفر وأنا موجود …

Static acc As Object Set acc = CreateObject("Access.Application") acc.Visible = True acc.OpenCurrentDatabase _ filepath:="c:\sales\invoice.mdb" 'acc.DoCmd.OpenForm forname:="invtry" acc.DoCmd.OpenReport "invoice", acViewPreview acc.DoCmd.Maximize شرح هذا الكود…