بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|
-
Posts
9903 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
404
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو jjafferr
-
مشكلة فى الجمع بين الخلايا و تحديث تلقائى
jjafferr replied to محمد احمد لطفى's topic in قسم الأكسيس Access
استعمل العمود اللي على اليمين او اللي في الوسط ، واخبرنا النتيجة 🙂 -
-
التصدير الى الاكسل بتسمية الحقل وليس اسمه
jjafferr replied to ابا عمرو's topic in قسم الأكسيس Access
الحقول اللي تصدرها ، تريد استيرادها ، فما فرقت ، التصدير يصير من الجدول او الاستعلام ، فالخطأ سيظل نفسه !! هناك حل انك تستعمل جداول مؤقته تستورد فيها من ملف الاكسل ، ثم تلحقها بالجدول الصحيح ، ثم تحذف بيانات الجدول المؤقت: اذا كانت هذه الجداول المؤقته في نفس البرنامج ، فسيكبر حجم قاعدة البيانات ، لهذا السبب احبذ هذه الطريقة ، ولكن ممكن ان نجعل هذه الجداول المؤقته في قاعدة بيانات خارجية ، بحيث نصنعها عند الحاجة ، ثم نحذفها عند الانتهاء من عملها !! الحل الآخر هو جلب البيانات عن طريق الكود ، وفي الكود نلحق البيانات للحقول الصحيحة ، والحل الأخير ، وقد يكون الاسهل ، وهذا يعتمد على ان مجلد واسماء الملفات تظل مثل ما هي ولا تتغير (يجب عليك تعديلها لأول مرة فقط) ، وعليه نستطيع عن طريق الاستعلام ان نستورد البيانات الى الجدول الصحيح 🙂 في انتظار ردك 🙂 جعفر -
وعليكم السلام 🙂 يعني تريد الاستعلام "append query customer account sub dollar" يضيف ارقام الفواتير الغير موجودة في الجدول "customer account sub dollar" ؟ عندك طريقتين: 1. في الجدول "customer account sub dollar" اجعل حقل "رقم الفاتورة" مفهرس وغير قابل للتكرار ، وتشغل الاستعلام كما هو ، او 2. نخبر الاستعلام ان يأتي بقيم ارقام الفواتير من الجدول "customer account sub dollar" : Select [رقم الفاتورة] From [customer account sub dollar] . . ثم في الاستعلام ، في معيار حقل "رقم الفاتورة" ، نطلب منه فلترة ارقام فاتورة الجدول وعدم عرضها Not In : . . جعفر 1513.Not in.accdb.zip
-
استعلام حذف اذا كان فيه حقل اكبر من حقل اخر يتم الحذف
jjafferr replied to الحلبي's topic in قسم الأكسيس Access
يعني وجدت الحل لسؤال الموضوع ؟ -
وعليكم السلام 🙂 ما يفرق اذا كان الحقل منظم او لا ، المهم القيمة 🙂 هذا الموضوع يناقش نفس الفكرة ، وبعده طازه 😁 جعفر
- 1 reply
-
- 3
-
-
-
-
مشكلة فى الجمع بين الخلايا و تحديث تلقائى
jjafferr replied to محمد احمد لطفى's topic in قسم الأكسيس Access
السلام عليكم 🙂 الاكسس يخبرنا عن الكثير من الاشياء ، فقط بالنظر اليها ، مثلا: 1. محاذاة حقل الرقم : من الجانب الايمن من الحقل ، 2. محاذاة حقل النص : من الجانب الايسر من الحقل ، 3. محاذاة حقل التاريخ : من الجانب الايمن من الحقل ، انظر الى هذا الجدول الآن ، وتقدر تعرف نوع كل حقل فقط من النظر اليه ، بغض النظر عن اسمه : . خلينا نشوف الحقول التالية في نموذجك . 1. العمود الاول من اليسار : نص + نص = نص 2. العمودالثاني : نص + نص = رقم 3. العمود الاول من اليمين : رقم + رقم = نص هذه معادلاتهم: . فيجب ان يعرف الاكسس ان عليه ان يجمع ارقام (مع ان الحقول نص) ، وهذه بعض الطرق 🙂 جعفر 1512.Add fields.accdb.zip -
ما شاء الله اخوي حسين ، هاي برنامج كامل ، مو بحث فقط 🙂 دائما فيك الخير والبركة ، كما عودتنا بأفضالك 🙂 جعفر
-
شكرا على المعلومة 🙂 جعفر
-
ما يحتاج تعديل ، فالكود عمل تنسيق لجانبي المعادلة 🙂 جربه كما هو واخبرنا بالنتيجة لوسمحت 🙂 جعفر
-
استعلام حذف اذا كان فيه حقل اكبر من حقل اخر يتم الحذف
jjafferr replied to الحلبي's topic in قسم الأكسيس Access
دكتور @الحلبي ، معذرة اننا خطفنا هذا الموضوع منك ، وانتقلنا بالترحيب لصديق حميم قديم 🙂 والآن ، عدنا اليك 🙂 جعفر -
ولا يهمك ، تفضل يا سيدي: Dim mySQL As String mySQL = "SELECT * " mySQL = mySQL & " FROM tbl_Employ" mySQL = mySQL & " WHERE Format([Startdate],'yyyymmdd') Between '" & Format(Me.TxtStartDate, "yyyymmdd") & "' And '" & Format(Me.TxtEndDate, "yyyymmdd") & "'" Me.ListData.RowSource = mySQL او على سطر واحد Me.ListData.RowSource = "SELECT * FROM tbl_Employ WHERE Format([Startdate],'yyyymmdd') Between '" & Format(Me.TxtStartDate, "yyyymmdd") & "' And '" & Format(Me.TxtEndDate, "yyyymmdd") & "'" . الامر Format يغير ما ما يحتويه من رقم او تاريخ ، الى نص ، والفضل في هذه المعادلة يعود لأخي @رمهان ، حيث قال : جعفر
-
استعلام حذف اذا كان فيه حقل اكبر من حقل اخر يتم الحذف
jjafferr replied to الحلبي's topic in قسم الأكسيس Access
اللي قبلك كان اشطر 😁 حاولت وما قدرت ، في منتديات سابقة 🙂 لما نشوف شيء نقدر نساعد فيه ، فما ممكن إلا ان نمد يد المساعدة ، وكما قالت العرب الطبع يغلب التطبّع 🙂 جعفر -
وعليكم السلام 🙂 طرفي التاريخ يجب ان يكون لديهم نفس التنسيق ، مثلا: . جعفر 1510.SearchFormatListBox.accdb.zip
-
التصدير الى الاكسل بتسمية الحقل وليس اسمه
jjafferr replied to ابا عمرو's topic in قسم الأكسيس Access
ابا عمرو تصدير البيانات الى الاكسل يكون "بتسمية الحقول" ، لا بإسم الحقل ، فكيف تريد ان تستورد من نفس ملف الاكسل ، والذي يحمل "مسميات الحقول" ولا يحمل اسماء الحقول !! هذه مشكلتك !! جعفر -
في النموذج ، اعمل حقل بإسم str_Key ، وضع فيه هذا الكود Private Sub str_Key_KeyPress(KeyAscii As Integer) Debug.Print ChrW(KeyAscii) Me.str_Key = Empty End Sub . او على مستوى النموذج: Private Sub Form_KeyPress(KeyAscii As Integer) Debug.Print ChrW(KeyAscii) End Sub الفرق ان هذا الكود يستعمل KeyAscii ، اي ارقام الحروف ، بينما الكود في المشاركات السابقة يستعمل KeyCode ، اي ارقام ازرار الكيبورد !! جعفر
-
اعتقد بأن الوندوز يتحمل مسؤولية هذه الفقرة ، ويعطينا الصافي 🙂
-
أي أي أي , مسكتني من يدي اللي توجعني 🙂 نعم ممكن نعرف اي لغة هي لوحة المفاتيح ، والى هنا وتوقفت ، قبل ان اعمل مشاركتي السابقة 🙂 واللي يجي على بالي ، اننا ممكن نستفيد من جدولك لتحويل الحروف الى اللغة الاخرى (العربية مثلا) ، ولكني اعتقد بأنه لابد من وجود مخرج برمجي بدون الجدول ، واهم من النقطة السابقة هي ليس معرفة لغة الوندوز (اللي نشوفها ايقونتها عند الساعة) ، وانما المشكلة في نوع لوحة المفاتيح ، فهناك عدة لوحات مفاتيح للغة الواحدة ، والحرف ذ (مثلا) قد يكون في مكان مختلف 😁 جعفر
-
وعليكم السلام 🙂 هذا السطر في الكود يخص تصدير الملف الى pdf ، و مافي شيء في الكود يعمل فلترة/تصفية DoCmd.OutputTo acOutputForm, strForm, acFormatPDF, strFileName, False يجب ان تعمل طريقة لأخذ قيمة حقل فيه قيمة غير متكررة ، ثم تعمل التصفية على اساسها ، ثم تصدر الى pdf 🙂 جعفر
-
جميل نشوف طرق اخرى في عمل اللازم 🙂
-
وعليكم السلام 🙂 المشكلة في ان اجهزة الطباعة فيها RAM محدود ، ويعتمد على طبيعة عملها : النوع الارخص ، لا يحتوي على RAM ، النوع الرخيص ، يحتوي بين 32 و 128 MB ، النوع الاغلى قيلا ، يحتوي بين 256 - 512 MB ، بينما الطابعات المتخصصة لطباعة الصور والجرافيكس ، تبدأ ب 1 GB اذا كانت احجام الصور عندك كبيرة (ملف الصورة في المجلد ، وليس في التقرير) ، فقم بتصغيرها (x,y) لتتناسب مع حجم شاشة التقرير (شاشة الوندوز ، مثلا 1920x1080) ، وثم جرب طباعتها . مثلا ، انظر الى حجم ملف طباعة الصور الاربعة اللي ارسلتها للطباعة : . فلا اعتقد بأن طابعتي المنزلية بأن تتجرأ وتحاول طباعة الملف الاكبر 🙂 جعفر
- 1 reply
-
- 1
-
-
وعليكم السلام 🙂 ومن وحي جواب اخوي ابوخليل ، وبدون جدول Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) msgbox Chr(KeyCode) End Sub جعفر
-
اخي حاتم 🙂 لا تجعل اسم اي من كائنات الاكسس يبدأ برقم ، فهذا يسبب مشاكل في البرنامج ، قم بتغيير اسماء النماذج الفرعية: من 1 الى a1 ، ومن 2 الى a2 ، ومن 3 الى a3 ، وستحصل على النتيجة الصحيحة 🙂 وتستطيع ان تستخدم: =Nz([a1]![A],0)+Nz([a3]![C],0)+Nz([a2]![B],0) ولكن قبل كل شيء ، تأكد انه لا توجد لديك اخطاء في الكود : اضغط على Ctrl+G لتدخل صفحة الكود ، ثم Debug ، ثم تختار اول اختيار Compile ، اذا حصلت على خطأ ، فقم بتعديله او توقيف هذا السطر/الحدث ، واستمر بهذه الخطوات حتى لا تحصل على اي اخطاء ، وحينها ارجع للنموذج وشوف نتائج عملك 🙂 جعفر
-
اخوي rockjone33 🙂 عندك مصطلحات غير متعارف عليها في المنتدى ، ولا تنسى ان الكثير من الاعضاء ما يعرفون اللهجة الخليجية ، وللمرة الاولى للذي يقراها قد يعتقد انها غير لائقة 🙂 اخي محمد احمد لطفى ، مصطلح "الله يهديك" ، خليجيا ، هي تشجيع للشخص الآخر ، ومصطلح "ثاني شي عيب عليك هالرد" ، خليجيا ، انني قدمت لك القليل وعملي لا يرتقي لكي تسميه "برنامج كامل" 🙂 للتوضيح فقط 🙂 جعفر
-
هذا مصطلح جديد غير متعارف عليه🤣🤣🤣