qathi
-
Posts
1001 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
1
نوع المحتوي
التقويم
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو qathi
-
أستاذي @sandanet ساقوم برفع الملف بعد أن تجيب عليا بالخاص .. أحتراما لقوانين المنتدى .. لولا القوانين لوضعتها طلب التحويل هنا
-
والحل أستاذي الأمر لن ينفع أستاذي @sandanet هل ممكن أن تعرف سبب مسح الحماية للصور لانه لاتوجد صور في ملفك الاصل ثم بعدها نشوف ما سبب ضهور رسالة أن الاكسس للقراءه هذا المشكلة الذي يبدو أنها معقدة و غريبة
-
أستاذي @sandanet هل بأمكانك التواصل بالتيم TeamViewer
-
أستاذي الغالي @sandanet خلال الفترة السابقة لم لم أقم بنقل الحماية بشكل فعلي لبرنامجي فقمت بالامس بنقل من ملف الحماية النماذج والوحدات النمطية وجدولين tblsn و MSysACEsXML وعند التجربة قام بمسح الخلفيات للنماذج حتى وان قمت بأدراجها من جديد وعند الاغلاق البرنامج أو أضافة صور أو تعديل للنماذج تظهر هذه الرسالة
-
شكرا لك أستاذي @sandanet وفيت وكفيت .. بارك الله فيك
-
أشكرك أستاذي الغالي @sandanet على سعة صدرك لي قمت بتجربت الملفين الأخيرين على برنامجي المقسم جداول وواجهات ونفس المشاكل - بالنسبة للملف قبل الاخير تظهر الرسالة هذه الاختلاف في الرسالة مسار القاعدة في القرص D - وبالنسبة للملف الاخير يقوم باغلاق البرنامج ولا يقوم بتشغيلة مرة أخرى طبعا أضع أمر أعادة التشغيل بعد أمر الضغط والاصلاح
-
semo.pa3x شرح الدالة المفيدة Choose في الاكسس
qathi replied to SEMO.Pa3x's topic in قسم الأكسيس Access
أهلاً بعودتك لنا أستاذنا @رمهان كيف اخبارك .. طولت الغيبة علينا .. سعدنا بعودتك -
حفظك الله أستاذي الغالي @sandanet كلماتي تعجز عن شكرك على ماتبذله من مجهود لمساعدتي بارك الله فيك .. وجزاك الله كل خير بعد تجربة الملف الاخير فانه يعمل تمام .. ماعدى ضهور هذة الرسالة عند عمل الكود بعد اغلاق البرنامج وفتحة من جديد والسبب في ظهورها أنه يتطلب وقت أكبر لعملية الضغط والاصلاح لأن البرنامج كبير نسبيا واذا تم ضغط زر موافق فأن البرنامج يعمل فهل يمكن ألغاء هذة الرسالة أو عمل مؤقت زمني بحيث لا يقوم بالفتح ألا بعد عمل ضغط واصلاح
-
للرفع
-
أشكرك أستاذي الغالي @sandanet على ردك .. بارك الله فيك بعد تجربة الملف الاخير .. مازلت المشكلة قائمة
-
أستاذي الغالي @sandanet أعود لك من جديد .. بعد تجربة الكود كثيرا قمت بوضع كود اعادة التشغيل بعد كود الضغط واصلاح فلم يعمل واذا كان غير ذلك فانه يعمل 'كود الضغط واصلاح Application.SetOption "Auto compact", True 'كود اعادة تشغيل البرنامج Utilities.Restart Compact:=Nz(ckCompact, False) فما حل المشكلة ؟؟؟
-
درس اختيار الوانك المفضلة بواسطة VBA برمجياً
qathi replied to SEMO.Pa3x's topic in قسم الأكسيس Access
شكرا لك أستاذنا @SEMO.Pa3x على ماتقدمة لنا قمت بتعديل بسيط حتى يكون اللون ثابت عند تحميل النموذج .. فتم بنجاح Me.SEMO.BackColor = HEX2OLE("#00838F") بارك الله فيك .. وجزاك الله خيرا -
وتلألأت سماء الاكسس بخبيرين جديدين، اخواي محمد ابوعبدالله و Sandanet
qathi replied to jjafferr's topic in قسم الأكسيس Access
مبارك عليكما أستاذي @sandanet وكذلك @محمد ابوعبدالله بالتوفيق -
أستاذي @kaser906 قبل أي شيء .. كلاماتي تعجز عن شكرك لم أنتبه لردك ألا بالامس .. فقمت بتحميل الملف وقمت بتجربته بشكل سريع وأول ماقمت به رفعت أكفي بالدعاء لك ولولديك ولذريتك ... كما أدعو لنفسي .. وكما تعلم أنه يوم الجمعة ولعلها تكون ساعة أستجابة أن شاء الله فجزاك الله عني خيرا سأقوم بتجربته أكثر على أكثر من شاشة وأوافيك بالنتائج أرجو أن يسع صدرك لي لدي ملاحضتين: اولاً - بعض النماذج يتم توسيطها تماما والبعض لا هل يتطلب امر اخر غير هذ الكود Me.KeyPreview = True Set frmResize = New FormResize Set frmResize.Form = Me ثانياً: - في النماذج الذي عند فتحه يوجد كود docmd.Maximize .. مع الاكواد السابقة .. لكن يكون النموذج مائل ليمين الشاشة للاعلى بالرغم تنسيق اتجاة من اليسار إلى اليمين .. هل هناك حل لذلك أم أن عليا جعلة من نمط الحدود مربع حوار والغي docmd.Maximize أستاذي الكاسر قلت في المشاركة السابقة هل تقصد اضبط قياسات جميع الكائنات من ازرار والحقول وووو .....الخ في النموذج .. هذا مرهق جدا جدا لأن لديا عدد النماذج تفوق المائة هل ممكن توضع أكثر .. أو لديك مثال للذي تقصد نموذج فيه الكائنات والاكود أستاذي @sandanet كلامك صحيح ياريت يكون في مديول واحد او اثنين فقط
-
أشكرك أستاذي @sandanet على هذا المثال .. هكذا تعودتنا بعطائك وخيرك الذي لا ينقطع بارك الله فيك .. وجزاك الله عني خير
-
أخواني وأساتذتي الأفاضل .. هل يوجد كود تحت زر يقوم بأعادة تشغيل ملف أكسس الحالي ؟؟؟
-
أخي وأستاذي @kaser906 أشكرك على ردك و ومجهود .. أستاذي @ابا جودى شكرا لك على ردك سعدت جداً بذلك نفس المشكلة لم تتغير بالنسبة لملف test استاذي ابا جود وملفك استاذي الكاسر فأنهما غير مضبوطان السبب يقوم باقتصاص الجزء السفلي للنموذج .. ومازالت النماذج تميل لأسفل الشاشة بالرغم الأقتصاص النموذج أما ملف test2 فانه يختفي الجزء السفلي للنموذج خلف شريط المهام حتى أقرب المسأله لكم : أساتذتي هل لديكم مسطرة تقومان باخذ قياس الشاشة .. حتى تعرفو كم الفرق من راس النموذج الى نهايت الشاشة بالاعلى وكذلك من اسفل النموذج الى حدود مستطيل شريط المهام عندي يظهر الفارق في عرض النموذج في ملف ابا جود test كالتالي: - راس النموذج الى نهايت الشاشة بالاعلى 3.2 سنتي متر - اسفل النموذج الى حدود مستطيل شريط المهام 2.3 سنتي متر ستلاحظون أن الفارق 1 سنتي متر تقريباً
-
أعتذر منك أستاذي لكن سأحاول معرفة سبب المشكلة الليلة وأذا لم أتمكن .. حينها أرجو أن يكون لديك وقت معي في بالتواصل ببرنامج بالتيم غدا بأذن الله فما رائيك ؟؟
-
لا حاولت اكثر من مرة دون فائدة
-
أخي وأستاذي @kaser906 أشكرك على ردك قمت بكل ما أشرت دون فائدة
-
أخي وأستاذي @kaser906 أشكرك كل الشكر على ردك ... مقدار فرحتي لا توصف عندما رايت ردك بارك الله فيك وجزاك الله عني خير .. كما أخلت عليا السعادة بردك .. أسأل الله أن يدخل عليك السعادة يوم أن تلقاه أستاذي حاولت ونقلت الكائنات اكسس الى برنامج كالتالي: جدول UsystblUsefulData مايكرو autoexec مديول modUtilities ونسخت الكود عند الفتح نموذج شاشة الدخول Me.KeyPreview = True Call CenterFrm(Me) وعند مفتاح الى اسفل If Shift = acAltMask And KeyCode = vbKeyF11 Then KeyCode = 0 End If وقمت بتغير اسم النموذج في المايكرو بالنموذج شاشة الدخول الذي عندي لكن عند تشغيل الملف تظهر هذه الرسالتين وبعد الضغط على موافق تظهر هذه الرسالة فما سبب المشكلة ؟؟؟
-
علم أستاذنا الكبير @jjafferr مأريدة أستاذي أن أرى رد ممن حاولو ولم تنجح الطريقة حتى يمكنني أن أتخذ القرار .. أما المواصلة أو التحول الى فكرة أخرة
-
هل أرضخ للأمر الواقع بعدم أمكانية تعديل المديول وبفشله في تحقيق المطلوب .. ؟؟؟ أرجوا من استذتي الخبراء أعطائي تأكيد بذلك
