أمجد جمالي

السلام عليكم ورحمة الله وبركاته مرفق مثال لفرز البيانات برمجيا بإستخدام Ado farz.rar

ارفق مثال بسيط لحتى اكتبلك الكود

السلام عليكم ورحمة الله وبركاته ارفق المثال لحتى ساعدك وتقبل تحياتي

كلامك صحيح إذا ماكان المنتج مرخص عندك مارح تقدر تحمل الملفات لكن الملفات موجودة عندي وحجهما تقريباً 8.3 MB واذا كنت محتاج الملف أرفق ايميلك وتكرم عيونك وشكرا

السلام عليكم ورحمة الله وبركاته اخواني الكرام من فترة قريبة واجهت مشكلة وهي الخطاً رقم 2147024770 - نص الخطأ Automation Error The specified module could not be found يظهر هذا الخطأ في بعض الأجهزة حيث يكون اصدار ADO مختلف عن الجهاز الذي تم فيه كتابة الكود لحل المشكلة قم بتحميل MDAC 2.8 من موقع ميكروسوفت http://msdn.microsoft.com/data/mdac/downloads/default.aspx وتقبلو تحياتي

السلام عليكم مارح يتغير شي ابداً لأنه الكود CurrentDb أو CurrentProject تعني الاشارة الى قاعدة البيانات الحالية بغض النظر عن مكان تخزين الDatabase مثال عن ذلك debug.Print currentproject.Connection debug.Print currentproject.name debug.Print currentproject.Path تحياتي

مرحبا لعرض الملف الي انعمل عليه Hidden Share روح على Start ثم Run واكتب \\MyServer\Database$ حيث Myserver تعني اسم الجهاز الموجود عليه الملف DataBase تعني اسم الفولدر $ لأظهار هذا الملف تحياتي

السلام عليكم ورحمة الله وبركاته أخت زهرة اشكرك من كل قلبي على كل ماتقدميه سواء في منتدى أوفيسنا أو غيره عندي معلومة بسيطة بحب ألفت إنتباهكم عليها بس ان شاء الله يكون اني طرحتها في المكان المناسب الطريقة هي اسمها Hidden share كيف تعمل Sharing او مشاركة لملف وتخفيه بحيث مايظهر للمستخدم العادي الطريقة سهلة كتير وهي لما تعمل Sharing لملف ولنفترض أسمه DataBase ضيف فقط إشارة $ الدولار في نهاية Share Name مثلاً Database$ جرب افتح الجهاز او السرفر الي عملنا عليه Hidden share من الشبكة مارح تلاقي الملف و لحتى تتصل بالملف كمان ضيف إشارة $ مثلاً \\MyServer\Database$ فقط ال Administrator Users قادرين الاتصال بال Hidden Share اما Limited Users مارح يقدر يتصل بالملف الطريقة يمكن تجربتها على اي نظام تشغيل من Win2000 Pro وما بعد تحياتي أدعولنا

تفضل Me.TOTAL = Me.AMOUNT * Me.NO تحياتي

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

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

اخي الكريم سؤالك غير واضح تقصد هكذا <myname@mydomain.com>

تفضل هذا المثال Function Ap_Reminder(DT As Date) If DT = DateTime.Date Then MsgBox "True" Else MsgBox "False" End If End Function لتجربته Ap_Reminder #11/10/2005# تقبل تحياتي

اللهم صلي على سيدنا محمد وعلى اصحابه اجمعين

أهلا وسهلا لعودتك إلى المنتدى أخ جمال تحياتي لك