Foksh

جرب استخدام الكود On error resume next

مجرد فكرة ؛ جرب اعمل Private Function وسميه بأي اسم تريده مثلاً Private Function Requ واجعل الأوامر المتكررة فيه وانهي الـ Function وبدل ما تكرر الكود كـ Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate فقط قم باستدعاء الـ Function , وتكون وفرت واختصرت حجم الكود تقريباً 28 سطر واستبدلتهم بـ 7 فقط . *لإستدعاء الوظيفة :- Call Requ هذا مجرد رأي ، وممكن يكون هناك أفضل من رأيي فالخبراء في المنتدى تبارك الرحمن دائماً متواجدون

أسعد الله مسائك بكل طيب و ود ,, أشكر الأخ Moosak ؛ على طرحه الفكرة في تصحيح الخطأ الذي واجهته ؛ وأتمنى أن يكون الجواب شافي و وافي

صديقي العزيز ، برنامجي ليس نسخة تجريبية بالوظائف أبداً ، ولكن الفكرة كانت أنه لابد من تسجيل المستخدم المسؤول بداية Admin ، ثم وهو بدوره يملك الصلاحيات لتفعيلها لمن يشاء ؛ وغذا لاحظت إنه عند فتح البرنامج لأول مرة وتسجيل المستخدم الأساسي المسؤول جعلته يملك الصلاحية للدخول للإعدادات والصلاحيات فقط ، ثم هو بدوره يكمل باقي الصلاحيات ، اما بالنسبة لبرنامج التنصيب الذي استخدمه فهو هنا تفضل 🙂 يسعدني مرورك وكلامك الطيب أخي الكريم ، ليس هناك من مشكلة في رفع البرنامج كملف مضغوط ؛ ولكني ارتأيت أن يكون للبرنامج شكل جمالي ليس إلا ؛ ولإستغلال فكرة تثبيت الخطوط على الويندوز بدلاً من إرفاقها والعمل عليها ضمن برنامجي فقط 😅 كل الإحترام والتقدير لشخصك الكريم

https://virusscan.jotti.org/en-US/filescanjob/37juzykt1c أو لربما لأن الملف التنصيبي تم انشاءه عن طريق برنامج لا يحمل ترخيص من مايكروسوفت او ( شهادة ) ؛ ان لم يخني التعبير

https://www.virustotal.com/gui/file/e7fca1184c07065e28e7bcb6e9b7208fc56035bd0d0d62d96862fc42c6826e1e?nocache=1 يتم تنصيب وتثبيت البرنامج على الدرايف D ، في حال حبيت يكون على الدرايف C تستطيع التبديل على اي قرص تريد ( حسب كمبيوترك طبعاً ) :)

مشكور على المجهود ، 😊 أعتقد هذه الفكرة مشابهة هنا تقبل مروري

السلام عليكم ورحمة الله وبركاته ، لا أعلم إن كنت قد حللت المشكلة أم لا ، إلا أنني قمت بفحص الملفات جميعها على أكثر من أنتي فايروس ولم يظهر لي أي واحد منهم إن هناك مشكلة في الملفات وخصوصاُ كونها ملفات تنفيذية EXE ؛ ولكن على كل حال فقد قمت بتنويع مواقع الرفع ؛ بعد أن تم بعض التعديل البسيط . نسخة 64 نسخة 32 ----------------------------------------------------------------- نسخة 64 Wj00_8SIX6L3QsvWmXSZPrNOSdNhjZwRh5VPxCE2d1k نسخة 32 pljbP2Ix2u4X16TCjy5KIwsfdYY2dVz-h7x8Da6MwCQ ----------------------------------------------------------------- نسخة 64 نسخة 32 على أمل أن تكون المشكلة قد تم حلها ، كل الشكر والتقدير لكم.

غريب جداً 😬 أعتذر منكم أخواني ، ولكن صدف اليوم أني قمت بتنزيل البرنامج من الروابط نفسها على الميجا من جعاز كمبيوتر آخر ليس له علاقي بس ، وتم التثبيت بدون أي تعارض حتى بوجود انتي فايروس كاسبر. سأعمل على إيجاد حل بالروابط أو سأغير فكرة التنصيب واستبدلها بملف مضغوط. حتى أن مواقع الرفع لم تحذرني بإنه احتمالية وجود فايروس اعتذر مرة أخرى ☺️

السلام عليكم ورحمة الله وبركاته ،، تم تحديث الروابط على ميجا كالتالي :- نسخة 32 بت نسخة 64 بت تفضل في المشاركة السابقة ، تم تحديث الروابط على موقع ميجا 🙂 تفضل في المشاركة السابقة ، تم تحديث الروابط على موقع ميجا 🙂

تحديث طريقة التنصيب ، وتعديلات مهمة 😍

تفضل أخي الكريم ، نسخة ٣٢ طازجة 😅 https://www.mediafire.com/file/vqm0k47tdk58qf9/Wisso_2023_x32.zip/file

أخونا الشايب يسعد مسائك ،، على يقين أنه لا شك في كلامك ، ولكن هي الفكرة إنك تقدر تستغني عنها طالما أنها لا تؤثر على سريان وقدرة البرنامج ☺️

حاضرين أخوي ، ولا يهمك 😊 قريباً دعم نسخة الـ ٣٢ بت

السلام عليكم ورحمة الله تعالى وبركاته ،، بعد النصائح والإرشادات من الأخ Moosak ، تم التعديل بالشكل اللائق والمطلوب 😁. وتم إضافة جديدة لأصحاب الأجهزة التي لا تدعم اللغة العربيــة ( الأشخاص اللي كانوا يعانوا من هذه المشكلة 😅 ) - ويا حبذا لو جربتوها واعطوني رأيكم . وأيضاً تم ضغط الملفات لملف Rar بهذا الرابط. https://www.mediafire.com/file/qd8ije0kk2a5yt3/Wisso_V2.0_RAR.rar/file وسيتم التحديث دائماً بإذن الله.

أخي Moosak أشكرك تفاعلك معي ، وإليك ردي على النقاط التي ذكرتها .. ١ يبدو أن فكرة التنصيب ستواجهني كمشكلة عند تعارضها مع برامج الأنتي فايروس. ٢ معظم الأزرار لا تعمل لأنه عند انشاءك المستخدم Admin حصراً ، فإنك ستكون المخول الوحيد بمنح الصلاحيات ، فمن تبويب اعدادات - ادارة المستخدمين تستطيع تفعيل كل الأزرار ، والنسخة التجريبية كاملة التفعيل موظائف وأزرار وهي بالمدة فقط تجريبية. ٣ ملف الجداول قد أكون أغفلته سهواً لكثرة حاجتي مؤخراً بالتجارب والتعديلات. 😅 ٤ تحذيرات الإجراءات تستطيع إيقافها من نفس اعدادات أكسيس ( إلا إن كنت تملك طريقة لجعل المشروع يقوم بإلغائها تلقائياً ) 😊 ٥ لعبة إكس أو وغيرها من النماذج جعلت مفتاح Esc لإغلاق النموذج ( سيتم إضافة زر إغلاق تحرزاً 😅 ) ٦ عند إتمام الإعدادات كبداية لابد من إضافة مورد + عميل ، ثم إضافة أسماء الأصناف التي تريدها ، ثم نقوم بشرائها من فواتير الشراء لنجعل لها رصيد 😅 * من تبويب اعدادات - إعدادات النظام هناك أمور أتمنى أن تكون مفيدة ، متطلعاً لإضافات أخرى. حالياً جاري إضافة بعض التغييرات والتعديلات.

تم حل المشكلة 😅 بس لو إني شغلت مخي 🤭

السلام عليكم ورحمة الله وبركاته.. خطرت لي فكرة كانت تدور في رأسي الممتلىء بالأحاديث حتى في نومي 🤣 أنه كيف لي أن أجعل البرنامج ينشىء ملف ريجيستري (تفعيل) يستخدمه المستخدم في حال عمل فورمات لممبيوتره دون الرجوع لي. مع العلم أن مشروعي ( برنامج الوسام المحاسبي 2023 ) يعتمد عند تشغيله على مدة تجريبية ١٥ يوم ( تضاف في الريجيستري ) مع إمكانية تفعيل النسخة بالكود قبل نهاية المدة التجريبية . أرجو أن أكون قد قمت بتوصيل الفكرة بشكل واضح 😬

تابع موضوعي إن أعجبك.

السلام عليكم ورحمة الله وبركاته.. بعد الإستفادة من مجموعة كبيرة من مواضيع المنتدى والإخوة الأعضاء جميعاً بدون الحصر ، أرجو ممن يهتم بإبداء رأيه حول مشروعي الأول ببرنامج محاسبي ( اتمنى ان يكون متكامل من حيث المحتوى والخدمة المقدمة ) .... رابط التحميل على ميديافاير إن لم يتعارض مع سياسة الموقع https://www.mediafire.com/file/0tti9if8w3p1zbz/Wisso_2023.zip/file البرنامج تم إنشاءه على أوفيس 2016 ارتأيت أن أضع المقال بموضوع منفصل حتى يتسنى لي الإستفادة من خبرة الكثيرين بنقاط الضعف ، أو إن غاب عني شيء أثناء التصميم.

السلام عليكم ورحمة الله أخواني في المنتدى ،، أرجو المساعدة فيما يلي : في فورم إنشاء مستخدم جديد مصدره جدول users احتاج كود يتحقق من أن اسم المستخدم غير مكرر عند الحفظ برسالة خطأ ، وغير ذالك يقوم بالحفظ. أيضاً يتأكد من أن حقل password غير فارغ برسالة خطأ. وان يقوم بالحفظ فقط عند استكمال الحقول الثلاثة التي يتكون منها النموذج ) username, password,full_name)