Lamyaa
-
Posts
86 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
مشاركات المكتوبه بواسطه Lamyaa
-
-
5 ساعات مضت, Moosak said:
هذه طريقتي في إعادة تسمية العناصر الكثيرة في النموذج بأسماء متتسلسلة مثل : ( Box2 , Box1 , ... )
هو كود وقد عملت له نموذج لتسهيل العمل .. 🙂
الكود يقوم أيضا بترتيب وتنسيق العناصر في شكل منتظم لتسهيل عملية التصميم 😊
إقرأ الملاحظات جيدا قبل أن تطبق 😉👌🏻
النموذج :
النتيجة ستكون هكذ : ( من >>>> إلى )
>>>> 
>>>> 
للاستفادة من هذا النموذج .. قم بنقل النموذج لقاعدة البيانات عندك وسيتعرف تلقائيا على النماذج التي عندك 🙂
ملف التحميل :
ما شاء الله .. دائما متميز
أستاذ موسى .. هل لديك شيء لكتابة دالة iif فحينما تكون الشروط كثيرة تصبح معقدة
-
قم بنسخ الأداة إلى مجلد C:\WINDOWS\SysWOW64
ثم افتح Command Prompt كمسؤول
وقم بتسجيل الأداة regsvr32 RotateLabelVer2.ocx
والآن يمكنك في برنامج إضافة الأداة
ستظهر الأداة بهذا الاسم:
يمكنك تعديل نوع الخط والحجم واللون من صندوق الخصائص
-
1
-
2
-
-
شخصيا استخدم مكتبة ActiveX تصنع لك Label يمكنك أن تحدد من خلالها زاوية الكتابة وهي مجانية من الأستاذ عباس الملاحي
لو أردتها سأقوم برفعها لك
-
2
-
-
HEUR:Trojan-Downloader.Win32.Banload.gen
-
السلام عليكم ورحمة الله وبركاته
تأكد من تثبيت النواة المناسبة لك .. قد تكون قمت بتثبيت أوفيس 64 بت وأنت كنت تستخدم إصدارة 32 بت أو العكس
-
1
-
-
يبدو أن شركة الوتساب حدثت البرنامج
اليوم رجعت إلى مثال الأستاذ موسى الكلباني .. وإذا به يعمل بشكل صحيح ودون مشاكل
-
23 ساعات مضت, ابوخليل said:
ابشروا
وما زلت في محاولة التحسين
كنت اظن انني احكمت العمل
فوجئت بظهور ثغرات ... يجب ان اغلقها تماما .. يجب ان يكون العمل محكم
للأسف لم يعمل معي بشكل صحيح
يتم وضع رقم الجوال المرسل إليه والرسالة في صندوق البحث
-
19 ساعات مضت, Mohameddd200300 said:
سلام عليكم قمت بتعديل ملف الاخ @Moosak ليعمل على التحديث الجديد للوتساب لرساله فردية مع المرفق او بدون مرفق اتمنا ان يقوم بمراجعته ليعرف الاخطاء التي واجهتنا وعدلتها على حسب معرفتي البسيطة وشكرا لكم
السلام عليكم ورحمة الله وبركاته
شكر على المشاركة
جربت المرفق وللأسف لم يعمل معي بشكل صحيح
الصورة يتم إرسالها كمستند مرفق
في أحيان أخرى يتم إرسال ملف غير الملف المحدد !
-
في 28/4/2023 at 19:50, Moosak said:
وعليك السلام أخي محمد .. 🙂
كان لدي كود لفتح البرنامج من ملف الريجيستري مباشرة .. ولكنه مع التحديثات الجديدة لم يعد يعمل ..أستاذي الفاضل أنا افتح الوتساب بهذه الطريقة
' أولا يتم التعريف Enum MSStoreAppName WhatsApp End Enum 'ثم يمكن استخدام هذا الكود لتشغيل الوتساب CreateObject("WScript.Shell").Run "whatsapp:", 0, False-
1
-
-
في 21/4/2022 at 04:28, Hema_Elhelow said:
احتاج باسورد الدخول
12345
-
شكرا جزيلأ
أجد صعوبة في الفهم .. وكأن الكلام مكتوب من خلال مترجم قوقل !
هل أنا وحدي من يعاني من ذلك ؟
-
السلام عليكم ورحمة الله وبركاته
في نافذة خصائض أداة Tbarcode قم بتغيير إعداد Code Page إلى UTF-8
وسيظهر بعدها النص العربي بشكل صحيح
-
1
-
1
-
-
ما شاء الله يا أهل عـــــــــــمــــــــــان
جزيل الشكر على هذا الإثراء الرائع
-
هذا باركود ميزان إلكتروني وباركود الميزان يحتوي على رقم الصنف و مقدار الوزن بالكيلو الجرام
يمكنك لاطلاع على هذا الفيديو لفهم آلية التعامل مع هذا النمط من الباركود
-
-
VB6 حكاية عشق لا يمكن لعشاقها تركها ، وما VBA إلا بنتها
-
1
-
2
-
-
لله ما أعطى ولله ما أخذ إنا لله وإنا إليه راجعون.
عظم الله اجركم ورحم الله ميتكم والهمكم وذويكم الصبر والسلوان.
-
1
-
-
-
12 ساعات مضت, AbuuAhmed said:
جربي المرفق
الجدول يحتاج إلى تحجيم حقلي الكيوآر واسم المحل أما بقية الحقول أنا قمت بتعديلها.
جزيل الشكر يا أبا أحمد .. رحم الله والديك وقضى حوائجك
-
1
-
-
السلام عيكم ورحمة الله وبركاته
أود أن استخرج بيانات QR هيئة الضريبة والزكاة من حقل واحد إلى عدة حقول (توزيع على الحقول)
قمت بمحاولات تنجح في البعض وتفشل في أخرى
وضعت الملف في المرفقات آمل المساعدة
حينما أضع نص QR في برنامج Notepad++ يظهر بشكل كامل أما حينما يكون في مربع نص داخل الأكسيس يظهر رقم التاق وطوله مربعات لذا أضع هذه الصورة للتوضيح
-
شكرا لك ..
أعتقد أنه من حقك أن تعلن عن منتجك .. ولكن في قسم (إعلانات شخصية بأجر للاعضاء)
نحن هنا نتبادل المعرفة . وموضوعك إعلان تجاري ولكن بصيغة مغلفة
-
1
-
-
هنيئا لنا بك .. وهنيئا لك بها
وفقك الله ورعاك
-
1
-
-
السلام عليكم ورحمة الله وبركاته
في البداية أشكرك جزيل الشكر على مشاركتك لنا للحل.
قمت بتزيل ملفات VB6 بغرض الاستفادة منها في الأكسس
قمت بتشغيل ملف register.cmd لتسجيل المكتبات إلا أن الملف التنفيذي التجريبي QR_Zatca.exe يظهر رسائل خطأ :
Run-time error '-2147221164 (80040154)':
Class not registered هل هناك مكتبات أخرى تحتاج تسجيل؟
-
في 17/2/2022 at 16:28, SEMO.Pa3x said:
السلام عليكم ورحمة الله وبركاته..
من المعروف ان الواتس اب يسمح لك بارسال 5 رسائل فقط في كل مرة
يعني لو كان لدينا 15 شخص نريد ان نرسل له رسالة علينا ان نقوم باعادة توجيه الرسالة 3 مرات كل مرة 5 اشخاص..
قمت بعمل اداة صغيرة في الـ NET. لتقوم بهذه المهمة.
صورة مشروع الاكسس:
قم بتحديد الاشخاص الذين تريد ارسال الرسالة لهم مع وضع نص الرسالة مع امكانية تحديد الكل
يمكنك شروط البرنامج بحسب ماتراه مناسباً.
النتيجة:
ملاحظة يجب ان يكون برنامج الواتس اب موجود في جهاز الكومبيوتر
واهم ملاحظة هي يجب كتاب رقم الواتس اب الذي تريد ان ترسل له الرسالة كما يظهر في البرنامج، مثال:
لتحميل الواتس اب من الرابط الاتي:
https://www.whatsapp.com/download
لا تنسوني ووالدي من صالح دعائكم.
تم بحمد الله.
رائع جدا .. ما مدى إمكانية إرفاق مستند مع الرسالة؟
بحيث يتم تخزين مسار المستند المرفق في حقل خاص في نفس الجدول
جعل الباركود QR يضيف بياناته الى مربعات نص متعددة
في قسم الأكسيس Access
قام بنشر · تم تعديل بواسطه Lamyaa
هذه طريقتي
Dim QRLines As Variant QRLines = Split(Replace(QRText, Chr(13), ""), Chr(10)) ' يتم قراءة الأسطر من حقل QR ومن ثم تجزئتها إلى مصفوفة ' من ثم يتم إسناد القيم من المصفوفة إلى الحقول Textbox1 = QRLines(0) Textbox2 = QRLines(1) Textbox3 = QRLines(2) Textbox4 = QRLines(3)