-
Posts
2,256 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
136
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو kanory
-
سؤال بخصوص عرض صور مرتبطة فى نموذج مستمر على شكل شبكى
kanory replied to ابو جودي's topic in قسم الأكسيس Access
-
سؤال بخصوص عرض صور مرتبطة فى نموذج مستمر على شكل شبكى
kanory replied to ابو جودي's topic in قسم الأكسيس Access
لم افهم مرتبطة ... ماذا تقصد منها .... هل تريد عند الضغط عليها تفتح مثلا .... ام ماذا ؟؟؟؟؟؟ فكرت بطريقة جالس اخطط لها انظر الصورة ..... ؟؟؟؟ !!!!! -
كيفية اظهار نموذج ورقة بيانات في حالة اخفاء شاشة الاكسس
kanory replied to يوسف أحمد's topic in قسم الأكسيس Access
ممكن تعملها داخل نموذج فرعي في نموذج رئيسي ..... تفضل ..... اللجان والتصحيح7.4.accdb -
دائما سباق للخير أخي العزيز
-
ملاحظة للفائدة : غير مفيد جعل الترقيم التلقائي مفتاح .... لذلك اجعل المفتاح رقم الهوية مثلا .... وهناك تعديلات حسب طبيعة برنامجك ... لا نستطيع اجبارك عليها مثل رقم خاص لكل فرد من افراد الاسرة ... تفضل ..... test (4).accdb ههههههههه .... اعتذر منك اخي لان الاجابة كانت في نفس الوقت
-
تغيير تنسيق التاريخ من اللغة العربية الى الانكليزية
kanory replied to Ahmed_J's topic in قسم الأكسيس Access
-
سلسلة تعديل msgbox سلسلة تغير خصائص MsgBox والاستفادة القصوى منها
kanory replied to king5star's topic in قسم الأكسيس Access
متابع ومنتظر ... تشكر على الامثلة الرائعة -
بل انت انسان عسل وسهل وانا شخصيا اعتبرك فاكهة المنتدي .... ما شاء الله عليك ..... بارك الله فيك وفي تواضعك الجم .... أسأل الله تعالى لك وللجميع التوفيق ,,,,,
- 22 replies
-
- 1
-
- ابا جودى
- حقول إجبارية
- (و7 أكثر)
-
هذه ليست فاتورة اليس كذلك ..... هو نموذج فاتورة مبيعات .... ممتازة من حيث الوضوح وسهولة الاستخدام
-
تفضل هذا ما يقصده اخي @ناقل Database_kan.accdb
-
طيب جرب كده ........ kan_الغياب.accdb
-
طيب ... سؤال اخر هل جدول ايام الشهر متغير ... اقصد من حيث الاسم ...... افكر في حل في رأسي ... يحتاج بلورة ..... اجب حتى اسنطيع محاولة تطبيق فكرتي ..... 😎
-
ممتاز ...... لكن لا زالت نماذج المسؤول تعمل لدى المستخدمين ..... هل جربت المرفق جيدا ؟؟؟؟
-
الكثير من الافكار موجودة في المنتدى ابو زهرة .... ابحث تجد ما يسيل له لعابك ........ لكن هذه فكرة ايضا جربها .... Kan_asd.accdb
-
الملف يحتاج بعض التعديلات ..... قمت بتعديل بعضها انظر اليوزر الاول واليوزر الثاني وكلاهما الباس 123 asd.rar
-
صحيح .... هناك اختلاف بين البيانات التي عملنا عليها والبيانات الموجودة الان ....... انظر للجدولين ....
-
حياك الله ....... بالتوفيق
-
-
طيب <<<<<<>>>>>>> هل المدة المعلمة باللون الازرق هي مدة الاقتطاع أم ماذا تمثل في الجدول ؟؟؟؟
-
طيب جرب <<<<<<<<>>>>>>>>> 20211007 (1).rar
-
طلب استعلام إلحاق من جدول واحد إلى عدة جداول بشروط
kanory replied to العبيدلي's topic in قسم الأكسيس Access
الكود ليس فيه جديد ( هو استعلام ولكن عن طريق VB فقط ) لو قمت بنسخ هذا الجزء مثلا والصقتة في طريق عرض SQL في الاستعلام يظهر لك الاستعلام INSERT INTO 1 ( [رقم الكتاب], [تاريخ الكتاب], الاسم, الوظيفة, الموضوع, [اسم المستلم], [تاريخ الاستلام], المرحلة ) SELECT المعاملات.[رقم الكتاب], المعاملات.[تاريخ الكتاب], المعاملات.الاسم, المعاملات.الوظيفة, المعاملات.الموضوع, المعاملات.[اسم المستلم], المعاملات.[تاريخ الاستلام], المعاملات.المرحلة FROM المعاملات WHERE (((المعاملات.[رقم الكتاب])=[Forms]![ادخال بيانات]![رقم الكتاب])); ثم في حدث الزر استدعيه بهذه الصورة فلن تعمل رسائل التحذير .... طبعا هذه طريقة وهناك طرق اخرى .. DoCmd.SetWarnings False DoCmd.OpenQuery "استعلام1" DoCmd.SetWarnings True -
طلب استعلام إلحاق من جدول واحد إلى عدة جداول بشروط
kanory replied to العبيدلي's topic in قسم الأكسيس Access
طيب جرب المرفق هذا <<<<<<<>>>>>>>> al3beadlly.rar نافذة الرسائل بسيطة يمكن تلافيها وعدم ظهورها ..... -
طلب استعلام إلحاق من جدول واحد إلى عدة جداول بشروط
kanory replied to العبيدلي's topic in قسم الأكسيس Access
-
كود vba لانشاء جدول و حقل في جدول من نوع yes/no
kanory replied to hosslom's topic in قسم الأكسيس Access
لاضافة جدول في قاعدة خارجية استخدم الاتي <<<<<<<>>>>>>>> Dim msgstyle Dim strSQL1 As String Dim b As New Access.Application Set b = CreateObject("Access.Application") b.OpenCurrentDatabase (Me.txtPath) strSQL1 = "CREATE TABLE [kanory] ([ProductID] AUTOINCREMENT,[ProductName] TEXT(40) NOT NULL,[SupplierID] LONG,[BirthDate] DATETIME,[CategoryID] LONG,[QuantityPerUnit] TEXT(20),[UnitPrice] CURRENCY,[UnitsInStock] SMALLINT,[UnitsOnOrder] SMALLINT,[ReorderLevel] SMALLINT,[Discontinued] BIT NOT NULL,CONSTRAINT [PrimaryKey] PRIMARY KEY ([ProductID]));" b.DoCmd.RunSQL strSQL1 MsgBox Space(20) & "تم انشاء الجدول Kanory بنجاح.." & Space(20), msgstyle, "للمعلومية" Set b = Nothing اما لتعديل خصائص حقل موجود في الجدول استخدم التالي مع ملاحظة : ان اختلاف البيانات قي الحقل اذا كانت هنا بيانات ممكن تفقدها :::: <<<<<>>>>>>> Dim msgstyle Dim b As DAO.Database Dim strFieldName As String Set b = DBEngine.OpenDatabase(Me.txtPath) With b.TableDefs("Kanory").Fields("S_Name") .Properties.Append .CreateProperty("DisplayControl", dbInteger, AcControlType.acComboBox) .Properties.Refresh End With MsgBox Space(20) & "تم انشاء الجدول Kanory بنجاح.." & Space(20), msgstyle, "للمعلومية" b.Close Set b = Nothing