jjafferr

السلام عليكم السؤال الذي دائما يراودني: ليش عمل النماذج المنبثقة في البرنامج ، او ليش عمل برنامج يعتمد في كليته على نماذج منبثقة؟؟ والسبب في سؤالي هذا ، اني نادرا ما ارى برنامج في المنتدى لا يستعمل نماذج منبثقة!! اما انا ، فنادرا استعمل نماذج منبثقة!! الرابط التالي فيه مرفق ، والذي يعطيك فكرة عن طريقة عمل برامجي ، وبدون نماذج منبثقة: جعفر

يالله ، البركة فيك ، في اعطاء الحل لهذا الموضوع ، بكرة باذن الله جعفر

الى الاكسل ، لا ، ليس بطريقة مباشرة ولكن عادة إعداد التقرير (وفي حالتنا هنا لتصديره الى اكسل) يكون مرة واحدة فقط ، لذا يمكنك العمل على هذا التصدير بالتحكم في الاكسل ، بتجزئته ، هكذا: 1. سنتعامل مع الاكسل عن طريق النموذج وليس التقرير ، 2. ارسال البيانات ، والتي عادة تكون من الاستعلام ، الى الاكسل ، بحيث تبدأ من السطر A4 ، وهنا تستطيع استعمال الوحدة النمطية من برنامجي: والتي استعملتها هنا: 3. ارسال قيمة مربع نص (كالذي في رأس التقرير) ، الى الحقل B2 من الاكسل ، 4. ارسال قيمة اخرى الى الحقل B3 من الاكسل ، 5. ارسال قيم اخرى في نهاية الصفحة الاكسل ، ... وهكذا ، بإستخدام الكود مثل الموجود هنا (جزء ارسال البيانات الى الاكسل): جعفر

وعليكم السلام من المعروف ان اكسس عنده مشكلة في تصدير التقرير الى اكسل بالاحتفاظ بالتنسيق ولكن بحيلة بسيطة تستطيع ارسال Header الى الاكسل مع تقريرك ، استعمل حقل النص ، واستعمل هذا الكود لإضافة بقية الكلمات اليه: Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer) Me.Text77 = "List Of New Monthly subscription " & vbCrLf & _ "( K4 ) " & Format(Date, "mmmm\.yyyy") End Sub جعفر

السلام عليكم أخي أوس رجاء النظر في الرابط التالي جعفر

شكرا أخوي شفان يحتاج المرة الجاية اكتب ، للدعم الفني رجاء مراجعة الاستاذ شفان جعفر

السلام عليكم مثال جميل ، شكرا على المشاركة جعفر

السلام عليكم رجاء مراجعة الرابط: جعفر

السلام عليكم الموضوع كان فكرة أخونا عمرو ، وإحنا شجعناه في الموضوع ، ولازلنا جعفر

تفضل استخدمت الوحدة النمطية من الرابط اعلاه جعفر 645.كنترول.mdb.zip

السلام عليكم أخي وائل فيه التباس في كلمتي "بطريقتك" !! طريقتك : عمل 6 حقول في الجدول ، وتنظيفها من التشكيلة: 1.بحث شامل ، 2.الموضوع ، 3.عنوان الفائدة ، 4.المرجع ، 5.القائل ، 6.نص الفوائد طريقتي: عمل حقل واحد ، وتبحث في جميع الحقول. وانا اشرت لهذا قبل البدء في العمل أخي كلامك غريب ، وغير مفهوم ، ويُلقي اللوم عليّ!!؟ تفضل أخبرني بطلبك 1. هذا مشروع بحد ذاته ، واليك هذه الروابط 2. طريقة الاكسس ان يعطيك جميع النتائج دفعة واحده ، مثل ما يحصل معك الآن في النموذج بعد النقر على زر البحث جعفر

100% ويمكن استخدام أي فاصلة/فارزة ، بشرط عدم وجودها في القيم جعفر

شكرا جزيلا لك أخي عبدالفتاح هذا الرابط في شرح عن هذه الطريقة وأحب ان اضيف هذا الرابط ، وهو إضافة أكثر من معيار لدالة Dlookup واخواتها جعفر

ترجمة رائعة مع بعض التغييرات البسيطة المطلوبة لكل حالة جعفر

انا لا أومن بالصدفة وانما هو تخطيط ربّاني والسبب قد يكون مثل ما قال أخي أوس بالفعل محترفين برمجيا وخُلقيا ، ومحترمين جداً وانا أشهد بأن الادارة ايضا هكذا ، وفي مقدمتهم الأستاذ المهندس @محمد طاهر صاحب الموقع ، والقلب النابض له ، وأوسعنا علماً ، وأبسطنا خُلقاً وكلما جار عليّ الدهر ، ألجأ الى الجدار المنيع وأخو الجميع ، أخونا العود @ابوخليل ، وبحكمته ترجع المياه الى مجاريها ، وبعلمه وإصراره يفتح لنا آفاق جديدة ، نتوسع فيها جعفر

السلام عليكم شباب اشكركم على تأكيد ان البرنامج اشتغل ، وان شاء الله في النسخة النهائية نعمل احد اثنين ، حتى لا يدخل المستخدم في الكود اصلا: 1. نحاول نقرأ مقدرة الكاميرا في حجم الصور ، ونضع القائمة تلقائيا في مربع تحرير وسرد ، ويختار المستخدم الحجم المناسب ، 2. او نضع القائمة يدويا في مربع تحرير وسرد ولقد اجريت بعض التعديلات على اصل الموضوع ، مثل وضع رابط لصفحة البرنامج الخارجي الذي نستخدمه هنا هلا والله أخوي رمهان 1. كلنا يعرف ان الاكسس برنامج قاعدة بيانات ، ونحن في الكثير من الاحيان نلوي ذراعه ليعمل اللي نريد ، لذا انا دائما اقول: ونستخدم بشكل يومي كائنات ActiveX و OCX ومكتبات تأتي مع اجهزة ، داخل الاكسس (والتي هي برامج خارجية) ، سواء من صنع مايكروسوفت ، او من غيرها ، 2. هممم ، هنا سنواجه مشكلة في جميع البرامج تقريبا!! SQL Server ليس ببرنامج بحد ذاته ، حيث انه جداول فقط ، وتحتاج الى برنامج واجهة لجعله يشتغل ، فهل هذا معناه عدم استعماله لأنه يستعمل برنامج خارجي معه!! وفي احد المشاريع التي عملت فيها ، المبرمج كان يستعمل ASP.net ، واضطررنا الى شراء كائن ActiveX لإستعماله في البرنامج ، فهذا كذلك برنامج خارجي!! في هذه الحالة ، احنا تمام مع الاكسس على العموم ، طريقتك استاذ رمهان تعتمد على المعرفة والتدقيق والتمحيص في جميع دقائق البرنامج ، لهذا السبب ماشاءالله ، اجاباتك تكون غير مألوفة ، وبالخصوص المختصرة/المختزلة منها والسبب اني كتبت ما قلته اعلاه ، حتى يعرف الجميع الاختيارات التي لديه ، سواء بالاكسس 100% ، او بمساعدة البرامج الخارجية جعفر

الحمدلله ، التجربة كانت ناجحة ، شكرا لكم هذا الرقم هو المدة بالثواني من وقت ضغطك على زر التقاط الصورة ، إلى وقت الانتهاء من كل شيء وعرض الصورة في النموذج جعفر الحجم 640x480 هو حجم افتراضي وتستطيع ان تجرب الرقم الاكبر فالاكبر ، حسب القائمة اللي ارفقتها في المشاركة. جعفر

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

اولا: شروط المنتدى لا تسمح بهذا ، ثانيا: البرنامج الذي استفيد منه ، اشتريه ، وخصوصا اذا استعماله خلال الفترة التجريبية اثبت جدارته جعفر

هذا السبب جعفر

وعليكم السلام تفضل جعفر

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

وعليكم السلام لا يمكن هذا بالكود اعلاه ، واذا تريده مثل ما تفضلت ، فيجب ان تصدر البيانات الى الاكسل بطريقة اخرى جعفر

حياالله أخوي رمهان وهذا اللي عملته ، بإستخدام DMax اولا للحصول على القيمة العليا للحقل ID ، اي Order by ID desc ، ثم استخدام قيمة هذا الحقل ، للحصول على الحقول الصحيحة من السجل الصحيح جعفر

السلام عليكم ورحمة الله وبركاته الجزء الاول تم مناقشته هنا هذا الجزء رقم 2 من مشروع متكامل لتصوير الاشخاص والمستندات بإستخدام الكاميرات والماسح الضوئي (Scanner) ، والمشروع يتكون من: يعني مو بس البرامج الكبيرة تستخدم هذه التقنيات ، وإحنا بعد وهذه الاجهزة ستكون لتصوير الاشخاص والمستندات ، ان شاء الله التصوير عن طريق كاميرا هاتف اندرويد ، وتمت التجربة على هاتف اندرويد Galaxy S3 بنظام 4.4 و Huawei Mate 7 بنظام اندرويد 6 ، التصوير عن طريق WebCam ، وتمت التجربة على Logitec HD c615 ، و Creative Live (VF0610)e ، التصوير عن طريق الكامرات الكبيرة من نوع DSLR ، وتمت التجربة على Nikon D5100 او Canon Mark iii ، تطويع الماسح الضوئي لتصوير المستند/المستندات ، وحفظ المستندات الى اي مجلد ، بصيغة pdf او jpg والعمل غير مكتمل 100% ، هذا البرنامج يشتمل على الرقم 1 كذلك (وهو نفس نسخة الرابط اعلاه وبدون تغيير) ، هذا البرنامج يعتمد على البرنامج الخارجي (RobotEyez.exe) ، وهذا رابطه: https://batchloaf.wordpress.com/2011/11/27/ultra-simple-machine-vision-in-c-with-roboteyes/ وهذا كود برنامج التصوير عن طريق كاميرا Webcam: Dim cmmd As String 'how long does it take to take the picture istart = Timer 'set BE_Path Call BE_or_FE 'RobotEyez location App_Location = BE_Path & "Camera_App\WebCam\RobotEyez.exe" Save_images_to = BE_Path & "images\" 'Debug.Print App_Location iview_Folder = BE_Path & "image_App\i_view32.exe" File_Path = Save_images_to & Me.Employee_ID & ".jpg" SetCurrentDirectory Save_images_to 'cmmd = App_Location & " /devnum 1 /delay 1000 /width 1920 /height 1080 /bmp" cmmd = App_Location & " /devnum 1 /delay 1000 /width 1280 /height 720 /bmp" 'Debug.Print cmmd Call ShellWait(cmmd, vbHidden) 'convert bmp to jpg Call ShellWait(iview_Folder & " " & Save_images_to & "frame.bmp" & " /convert=" & File_Path, vbNormalFocus) 'Delete the bmp image Kill Save_images_to & "\frame.bmp" 'show the picture in the Form Me.Pic.Picture = Save_images_to & Me.Employee_ID & ".jpg" MsgBox Timer - istart . المرفق فيه جميع البرامج المطلوبة لجعل هذا البرنامج يعمل ، ولكن ، 1. المطلوب اولا معرفة حجم الصورة التي تستطيع Webcam التقاطها ، فاذا ادخلت رقم خطأ ، فستظهر لك رسالة بعدم الحصول على الصورة frame.bmp ، فرجاء تغيير هذه الارقام: width 1280 /height 720 فتجربتي على الكاميرتين كانا: Logitec HD c615 : 1920 x 1080 Creative Live (VF0610)e : 1280 x 720 وهذه قائمة بالاحجام العامة للكاميرات ، وانا انصح بالبدء بالحجم 640x480 ، وعند ظهور الصورة ، تستطيع ان تزيد الحجم بالتجربة: . 2. اذا عندك اكثر من Webcam ، مثلا تستخدم كاميرا اللابتوب واخرى خارجية ، فيجب تغيير الرقم الى 2: devnum 1 وهذا هو سطر الكود الذي يحتاج الى تغيير: cmmd = App_Location & " /devnum 1 /delay 1000 /width 1280 /height 720 /bmp" . وبما ان هذا البرنامج للتجربة ، فالرجاء ابداء ملاحظاتكم جعفر Camera_Scanner.zip