Shivan Kurdi
-
Posts
3493 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
152
نوع المحتوي
التقويم
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو Shivan Kurdi
-
اولا انا اشكركم لانكم قبلت ان اكون معكم مع العملية : الى الاعلى int(1988.98) = 1988 int(1988.98) / 10 = 198.8 1 + Int(1988.98) / 10 = 199.8 Int(1 + Int(T3) / 10) = 199 Int(1 + Int(T3) / 10) * 10 = 1990 ونقدر ان نستخدم دالة Fix
-
اذنك معك استاذي الحبيب وهذا هو تعديل ما قلت استاذنا على القاعدة Hawadith3.rar
-
لا داعي تقول هذا بل كلنا راح نستفيد من مشاركتك ونحن نشكرك لانك معنا عطيتنا طريقة اخرى كان ليس في الحسبان
-
حسب فهمي يجب تستخدم دالة IF اي يجب تفتح التقرير بشروط واذا ترفق نسخة مصغرة من القاعدة سيكون الجواب افضل باذن الله
-
نعم هو المطلوب عند طلب التقريب الى الاعلى وفي مشاركتي السابقة انا استحخدمت IIF كل منها يعطيك نفس النتيجة ولكن بطريقة مختلفة شكرا لك مجددا
-
يعني لازم نستخدم هكذا IIf(Right(Me.Text0, 1) <> 0, Int(1 + Int(Me.Text0) / 10) * 10, Me.Text0) شكرا على التنبه
-
شكرا لانك معنا لا استاذي الحبيب سيبقى كما هي لاننا نريد الرقم الاخير بيكون صفر
-
اظهار التقرير من اليمين الى اليسار
Shivan Kurdi replied to زينب الذهبي's topic in قسم الأكسيس Access
من فايل اختار اوبشن الباقي كما مبينة في الصورة
-
اهلا بك @حربي العنزي هذا لاستخدام الى الاسفل Int(Me.Text0 / 10) * 10 وهذا الى الاعلى Int(1 + Int(Me.Text0 / 10)) * 10 وانتظرني سافتح باذن الله موضوع جديد مع فانكشن لكي تقدرون تستخدمون مع الاستعلامات بشروط
-
اليك هذا تم عملت التعديل في مشاركتي الاعلاه وتقدر تستخدم دالة IIF في الاستعلام
-
اهلا بك @رياض البرعي ما عرفنا في اي منطقة تريد الكود في سامراء او حلب اي قصدي في الاستعلام ام نموذج اتفضل اليك هذا الكود استخدمه في حدث بعد تحديث If Right(Me.Text0, 1) <= 4 Then Me.Text2 = Int(Int(Me.Text0) / 10) * 10 Else Me.Text2 = Int(1 + Int(Int(Me.Text0) / 10)) * 10 End If تيكست 0 هو اسم مربع نصي تبعك
-
ما حيرتني الكود بل جننتني بل اللي حيرتني هو مشاركة استاذ @رمهان
-
اهلا بك من جديد افتح موضوع جديد لهذه السؤال لكي لا يخرق قوانين المنتدى
-
اعمل قاعدة بيانات جديدة بصيغة Accdb واعمل استيراد لكافة كائنات من قاعدة بياناتك Mdb نعم
-
ما فهمت قصدك استاذي الحبيب
-
ااااه يا نهر العطشان عندك يوم فقط .. اشرب الماء قبل ان يجى شهر رمضان اتفضل اليك ما طلبت Date_UP.rar
-
حسب فهمي الاسباب هو كالاتي 1 / رقم سري على الاكواد ... في هذه الحالة ما تقدر ابداً 2 / اخفاء الجاول والاستعلامات واتفضل اليك قاعدة بياناتك بعد تحويل واعتذر منك لاني الغيت الرقم سري على الاكواد Database2.rar
-
فرضنا ان هذا مأخوذة من وحدة نمطية اي يعني صاحب القاعدة اي المبرمج عمل وحدة نمطية بهذا الاسم اي يعني هو شاطر حقا كلنا نعرف وضيفته هناك عمل ديلوك اب مع الحقل تيكست 1 هناك سؤال : هل تيكست 1 هو اسم الحقل ؟ المبرمج لماذا سميت بهذا الاسم ؟ واسم الجدول هو تيكست 2 هناك نفس السؤال الاول : هل تيكست 2 هو اسم الجدول او اسم اي ؟ لماذا سميت الجدول بهذا الاسم ؟ هناك اجى دور الشروط بشرط اي ؟ ديلوك اب تيكست 3 من تيكست 2 رجاءا زودنا بقاعدة بيانات بها هذه الكود و معمول به
-
لا مش غريب فقط بحياتي ما رأيته وما اقدرته ان اعرف
-
ممكن ترفق القاعدة اللي بها هذه الكود حقا غريبة الناس غريبة الدنيا ديا عفوا قصدي غريبة الكود
-
مكتبة الموقع - إرسال البريد من الأكسس
Shivan Kurdi replied to أ / محمد صالح's topic in قسم الأكسيس Access
وانا نزلت وما كان بها اي مشكلة واستأذن من الصاحب الملف واستاذي الحبيب @أ / محمد صالح لقد ارفعت لك المرفق mas_mailer.rar -
مكتبة الموقع - إرسال البريد من الأكسس
Shivan Kurdi replied to أ / محمد صالح's topic in قسم الأكسيس Access
بارك الله فيك استاذي الحبيب -
اتفضل استأذن من استاذنا @ابا جودى فقط عملت ما قلت لك في نمشاركتي السابقة 22.rar
-
يا صاحب ابتسامة الجميلة نحن لا نهاجم على اي شخص كلكم احباءنا في الله ونبحكم في الله اتفضل انا عملت كوبي باست لاحد مشاركاتي قبل يوم اتفضل الصق هذا الكود في وحدة نمطية Option Compare Database Public Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long Public Sub HideAccess() Call ShowWindow(Access.hWndAccessApp, 0) End Sub Public Sub ShowAccess() Call ShowWindow(Access.hWndAccessApp, 5) End Sub وفي نموذج عند تحميل او عند فتح اكتب HideAccess للاخفاء و ShowAccess للاظهار من جديد وهذا هو رابط الموضوع
-
الصاحب السؤال هو اروع لان كل الاكواد كان موجود في قاعدة بياناته فقط انا عملت تعديل بسيط
