ابوطالب

طالما الاستاذ امير حلها على ايش التعب والبحث عن البرامج

اخى الكريم لا اظن انه يمكنك معرفة عدد صفحات التقرير دون فتحه

بارك الله فيك اخت دنيا استمرى ونحن معك

اخى هناك اعتراض على كلمة المرور او الاسم برجاء المراجعه والافادة وجزاك الله خيرا

اخى الكريم الحل هو تغيير اتجاه التقرير وجعله من اليسار لليمين وقد واجهتنى كثيرا وتغلبت عليها بهذه الطريقه

مشكور اخى سهل

ارى ان التحديث فى خاصية عند عداد الوقت للمؤقت احسن حتى تغيير يظهر الوقت دوما

على ما تذكر اخى الكريم فيه مثال جميل لاخونا ابوهادى بهذا الخصوص

اخى الكريم نعم يمكن تحميل اوفيس 97 واوفيس xp على جهاز واحد فعلى سبيل المثال لو نصبت اوفيس اكس بى على السى مثى نصب اوفيس 97 على اى دريف آخر والاثنين يشتغلوا عال العال وانا عامل كده فى جهازى مفبش مشاكل

وما المانع يا اخى ولعلنا نبدأ بـ vb6 فقط ثم نبدأ فى التوسع ان دعت الضرورة

اخى الكريم لترجمة كلام اخى جمال خذ هذه الدالة funcion tonull( a as varint ) as varint if isnull(a) then tonull=0 else tonull=a endif end function لاستدعاء الوظيفة اكتب فى الحقل المراد =tonull(اسم الحقل) بالتوفيق ان شاء الله

الاستاذ الفاضل / محمد مهند سلام الله عليكم ورحمته وبركاته بخصوص رد حضرتك انى نشرت البرنامج دون الاستشاره اليك فأنا يا اخى الكريم عملت ذلك عندما رأيت

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

وانا مع هذا الرأى فهو يمنع تضخم العمل ويسهل تصفحة وبالتالى فهرسته

موقع جميل وبه امثلة جميلة بارك الله فيك

اخى :مغروم اليك الاصدار الثانى من برنامج الاستاذ الفاضل : محمد مهند عبادى http://www.geocities.com/abotalb2005/user_maker2.zip

ياريت مثال يا استاذ / جمال يكون احسن

جزاك االه خيرا فينا يا اخى الفاضل ونحن بالفعل كنا فى امس الحاجة لهذا الشرح المميز

الاخت الفاضلة من المفترض الا يحدث تكرار فى السجلات اذا كان هناك مفتاحاً رئيسيا ولكن لسبب ما قد يحدث التكرار وقد قابلتنى هذه المشكلة وقمت نسخ الجدول الذى به تكرار وحذفت سجلاته واعدت المفتاح الرئيسى كما كان ثم عملت استعلام ارفاق الى هذا الجدول الفاضى من الجدول الذى به تكرار فتم نقل السجلات ما عدا التكرار ... والان قومى بعمل هذه التجربة على نسخة احتياطية فقد توصلك للحل .. ونحن بانتظار تجربة مثال الاستاذ ابوهادى وشكراً

انت فين با اخ جمال رحت فين

الاخ الفاضل الاستاذ / جمال لعل ما قاله الاخوة هو الصحيح لو تفضلت اقرأ محتوى الملف المرفق تفضل

الاستاذ الفاضل / ابوهادى جزاك الله كل خير لقد عملت دالة تقوم بهذا العمل Function mad(TY As Currency) Dim UO As Currency Dim uo1 As Currency uo1 = Fix(TY * 100) UO = Fix((TY - Fix(TY)) * 1000) If Right(Str(UO), 1) < 5 Then mad = uo1 / 100 Else mad = uo1 / 100 + 0.01 End If End Function مع جعل الحقل ثابت وثلاثة ارقام عشرية وقد آتت بالمطلوب لك خالص شكرى وتقديرى لحضرتك وشكرا

للرفع

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

اخى الفاضل الاستاذ / جمال فايز سلام الله عليكم ورحمة الله وبركاته أشكرك من كل قلبى على المعلومات القيمة ولو ان هذا العمل ينبغى تجربته حتى يتسنى الحكم على التجربة فهى فريده نوعاً ما ولم ارى مثلها بالاكسس وهو ما دفعنى للسؤال وخصواً جزئية اقتران الجزء المراد تكبيره على الريطة ببيانات القاعدة ....جزاك الله خيراً وكل عام وانتم بخير والسلام علكيم ورحمة الله وبركاته