عيسى الحوراني

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

شكرا جزيلا ساقوم بالبحث عن شرح لما تفضلت به

في 8/13/2017 at 15:04, Shivan Rekany said:

Dim pass As Integer
  Dim massage As Integer
	pass = InputBox("ادخل رقم سري خاص لانشاء مستخدم جديد", "ادخل رقم سري")
 If pass = 1212 Then
  		DoCmd.OpenForm "اسم النموذج"
  	Else
  		massage = MsgBox("کتبت رقم سري خطأ")
 End If

 

جزاك الله خيراً استاذي الفاضل

تم تطبيق الكود عند فتح نموذج وكانت النتيجة ممتازة

اسعد الله مسائكم 

عندي قاعدة بيانات مقسمة ويتم العمل عليها من خلال اكثر من جهاز واكثر من مستخدم 

وهناك اكثر من طلب ان تكرمت علي بالاجابة عليها

هل بالامكان ان يظهر على نسختي من قاعدة البيانات اسماء المستخدمين الذين قد سجلوا دخول ووقت دخول وخروج كل واحد فيهم

هل بالامكان ان اعرف كل مستخدم ما عمل على قاعدة البيانات بذلك اليوم 

ولكم جزيل الشكر

حياك الله استاذ وائل 

الي اتكلم عنه مختلف 

وقد قمت بطرح سابقا في هذا المنتدى ولكن للاسف لم اجد من يحل لي هذه المشكلة 

انظر موضوعي وطلبي

جزاكم الله خيراً على الموضوع المفيد

هل بالامكان ان يتم البحث بخيارين او اكثر بلا من الكل

جزاكم الله خيراً

اسعدالله صباحكم اخواني الاعزاء وزادكم الله علما

لو اردنا اختيار خيارين من الخيارات المتاحة وليس واحدة فقط او الكل كيف الطريقة

10 دقائق مضت, jjafferr said:

ارجو منك استاذ جعفر الاطلاع على موضوعي وابداء رأيك

في 4/28/2017 at 10:57, jjafferr said:

وعليكم السلام

 

طريقتين يجون على بالي:

1. نسخ السجل بالكامل ، عمل سجل جديد ، لصق بيانات السجل ، ثم حذف/تصفية الحقول التي لا تريدها:

    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdCopy
    DoCmd.GoToRecord , , acNewRec
    DoCmd.RunCommand acCmdPaste
me.Field5=0
me.Field6=""

 

2. تنسخ قيمة كل حقل في متغير في الكود ، عمل سجل جديد ، لصق هذه المتغيرات الى حقولها:

a1=me.field1
a5=me.field5
a6=me.filed6
    DoCmd.GoToRecord , , acNewRec
me.field1=a1
me.field5=a5
me.filed6=a6

 

جعفر

الف شكر استاذ جعفر كود رائع طبقت الكود الثاني على قاعدة بياناتي واعطى نتيجى رائعة 

في 4/23/2017 at 22:47, رمهان said:

حياك الله اخ عيسى

قبل الاجابة اعتقد انت بحاجه لمعرفة كيف انشاء هذا النوع من الحقول وهو خاص بالاصدار 2007 وما فوق

وبعد ذلك ناتي لعملية الفلتره لمثل هذا النوع

بالتوفيق

 

كلام سليم وهذا ما اوضحته سابقا علما اني لم اجد من تكلم بطريقة انشاء مثل هذه الحقول سابقا 

علما اني استخدم اوفيس 2013

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

في ١١‏/٤‏/٢٠١٧ at 18:07, Shivan Rekany said:

اتفضل القي نظرتا الى هذا الرابط
احتمال ان يكون هو فيها مطلبك

 

استاذي الغالي shivan Rekany

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

14 دقائق مضت, Shivan Rekany said:

ما الذي تريد بالضبط ؟
لانك ارفقت قاعدة بها نموذج بحث 

حياك الله استاذي العزيز نموذج البحث في القاعدة التي ارفقتها غير مفعل فقط انا وضعت الكائنات التي ارغب بتنفيذها

وهي ان يتم اختيار عدة مناطق من مربع التحرير والسرد واختيار المساحة من الى  والسعر من الى

في 4/11/2017 at 18:07, Shivan Rekany said:

اتفضل القي نظرتا الى هذا الرابط
احتمال ان يكون هو فيها مطلبك

 

الف شكر استاذي العزيز تقريبا نفس الذي اريده

لكن للاسف لم اعرف كيف الطريقة التي تم عمل مربع التحرير والسرد بها بهذه الطريقة 

ولكن اريد تطبيقه على محرك بحث 

بالمرفق نموذج عن قاعدة البياانات

realestate.rar

اسعد الله مسائكم اخواني الاعزاء

عندي قاعدة بيانات ارغب باضافة محرك بحث متعدد القيم 

كما هو بالصورة التالية

علما ان الصورة التالية ماخوذه من موقع مايكروسوفت من ارابط التالي

https://support.office.com/ar-sa/article/الدليل-إلى-الحقول-متعددة-القيم-7c2fd644-3771-48e4-b6dc-6de9bebbec31

تستطيع عمل المطلوب من خلال الدالة Date Diff

راجع موضوع الاستاذ 

jjafferr

وان شاء عنده المطلوب

الف شكر استاذي حامل المسك على الموضوع الرائع

استفدت منه جداً وحل مشكلتي استخدمت الكود الاول على برنامجي وكانت النتيجة ممتازة

الف شكر اخي الكريم على الملف الرائع

الف شكر اخي الكريم وجاري التحميل والاطلاع

انا اسف اخي الكريم لعدم طرحي للموضوع في القسم المخصص

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

الف شكر اخ رضا تم حل المشكلة

للاسف اخي ما عندي اوفيس 2003

ارجو من الاخوة الاكارم شرح كيف يمكن اضافة شرط للاستعلام

حتى تظهر الشقق المباعة في خيارات البحث

علما ان خيار البيع يتم اضافته من خلال chekbox