بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|
-
Posts
435 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو at_aziz
-
بارك الله فيك وجزاك الله خير اخي الفاضل @kkhalifa1960 اللي سويته يعتبر حل مناسب جدا اذا لم يتوفر الحل على Web Browser في المثال الاول لان ترتيب وعرض الصور افضل فيه وبالامكان اضافة تحسينات عليه ب html و css الف شكر لك استاذي الكريم والله يعطيك العافيه ومازلنا بانتظار استاذنا الغالي @أبو إبراهيم الغامدي
-
جزاك الله خير وبارك فيك اخي الفاضل @kkhalifa1960 جربت المثال لكن ظهرت لي بعض الملاحظات منها انك ثبت عدد الصور في النموذج وهذا مايمشي مع اليه البرنامج لان عدد الموظفين اللي يظهر في الصفحه غير مستقر احينا يكون ثلاثه او اثنين او او خمسه واحيانا اكثر من عشره على حسب القسم اللي راح يختاره الزائر كل قسم له موظفين غير محدد عددهم ايضا لماحذف اخر سجلين بالجدول تكررة الصوره الاخيره في اخر مربعين هذي بعض الملاحظات اللي مرت علي والف شكر لك اخي الكريم على اهتمامك ومساعدتك
-
جزاك الله خير أستاذي بيانات التقيم هي كالتالي اختيار من متعدد:- راضي جدا راضي راضي الى حد ما غير راضي غير راضي أبدا راح ارفق لك جدول فيه البيانات المطلوبه مع نفس المثال المرفق Tbl1 والحقيقه انا اللي كان يهمني اني امسك رقم الموظف واسمه عند الضغط على الصوره ويظهر في نموذج اخر او يظهر في الاسفل في النموذج الاساسي بحيث اني اقدر اربط خيار التقييم برقمه الموظف اما باقي الامور الاخرى ماعندي بها مشكله لاني للحين مااشتغلت على البرنامج الاساسي حتى اعرف الطريقة على هذا المثال وانقلها لملف المشروع الاساسي جزاك الله خير وبارك فيك وبعلمك Photo.rar
-
حياك الله وبياك استاذي الفاضل ابو ابراهيم الفكره سلمك الله هي انه عندي شاشه للتقييم أداء الموظفين تعرض فيها صور الموظفين والزائر اللذي تعامل مع الموظف يختار صورته لانه احيانا مايعرف اسم الموظف ثم يفتح له نموذج عند الظغط على الصوره فيه بيانات التقييم وبيانات الموظف اسمه ورقمه وبعدها يقوم بتقييم الموظف اللي اختاره او عند اختيار الصوره يظهر رقم الموظف واسمه في النموذج الاساسي بحيث اني اقدر اربط بيانات التقييم برقم الموظف شكرا لك استاذي وارجو اني وضحت الفكره
-
السلام عليكم ورحمة الله وبركاته اخواني عندي مشكله ماعرفت احلها في المرفق مثال لعرض الصور بشكل شبكي لاستاذنا الفاضل @أبو إبراهيم الغامدي حاول اعدل عليه بعض الشغلات لكن ماعرف الطريقة والذي اريده انه عند النقر على صورة الموظف يفتح لي النموذج frm1 فيه بيانات الموظف وأيضا عتد الضغط على الصورة تظهر البيانات في الحقول اللي في النموذج الاساسي frm ارجو المساعده بارك الله فيكم وجزاكم الله خير Photo.rar
-
جزاك الله خير وبارك فيك اخي وان شاء الله يكون مثال مكتمل
- 16 replies
-
- zatca integration
- الفاتورة الالكترونية
-
(و1 أكثر)
موسوم بكلمه :
-
شاركوني تهنئة اخونا سامي الحداد لترقيته الى درجة خبير
at_aziz replied to jjafferr's topic in قسم الأكسيس Access
ألف مبرووك لأخونا @سامي الحداد تستاهل الله يوفقك وينفع بك فالك التوفيف والنجاح الدائم -
للحين باقي عندنا المرحلة الثانيه ومانستغني عنك بعد الله انت صاحب المعروف الاول وفقك الله ومنتظرين ابداعاتك
- 16 replies
-
- zatca integration
- الفاتورة الالكترونية
-
(و1 أكثر)
موسوم بكلمه :
-
بارك الله فيك وجزاك الله خير استاذنا الفاضل @ابو جودي الف شكر لك دائما سباق لما فيه نفع للجميع الله يعطيك الصحة والعافيه
- 16 replies
-
- 1
-
-
- zatca integration
- الفاتورة الالكترونية
-
(و1 أكثر)
موسوم بكلمه :
-
السلام عليكم ورحمة الله وبركاته اخواني كما تعلمون انه خلال الفتره القادمه في بداية سنة 2023 سوف يتم تطبيق المرحلة الثانية من متطلبات الفاتورة الاكترونيه في المملكة العربية السعودية وسبق انه تم النقاش في المرحله الاولى في هذه المواضيع رمز الاستجابه السريع QR CODE حسب متطلبات هيئة الضرائب السعودية: 1. https://www.officena.net/ib/topic/112126-موضوع-مهم-للنقاش-ماهو-مستقبل-الاكسس-بعد-تطبيق-المرحله-الثانيه-للفاتوره-الاكترونيه/ 2. الموضوع والمرفقات النهائية لرمز الاستجابه السريع QR CODE حسب متطلبات هيئة الضرائب السعودية 3. https://www.officena.net/ib/topic/112589-مكتبة-الموقع-الفاتورة-السعودية-المبسطة/ وتم حلها بشكل كامل ولله الحمد وهذا بفضل الله ثم بجهود اخواننا الكرام جزاهم الله خير وبارك فيهم وبعلمهم وهذه المواصفات المطوبة للمرحلة الثانيه تحت الرابط التالي https://zatca.gov.sa/ar/E-Invoicing/SystemsDevelopers/Pages/E-Invoice-specifications.aspx وكما تعلمون ان بعض المبرمجين لهم برامج تعمل على الاكسس عند عملائهم وبكل تاكيد راح يتطلب منهم تحديث برامجهم لمتطلبات الفاتوره الأكثرونية المرحله الثانيه وإلا سوف يخسر عملائه ويقع في احراج ارجوا من أساتذتنا الكرام ومبرمجينا الافاضل النظر في هذا الموضوع بعين الاعتبار لاننا بحاجة ماسه جدا لحل هذا الموضوع ووضع امثله عليه حتى يستفيد منه الجميع ويتحقق الهدف السامي اللي قام عليه هذا المنتدى القدير
- 16 replies
-
- 2
-
-
-
- zatca integration
- الفاتورة الالكترونية
-
(و1 أكثر)
موسوم بكلمه :
-
حياك الله وبياك استاذنا القدير جعفر اخي اللي تم مناقشته وحله هو المرحله الاولى من نظام الفاتوره الاكترونيه اما الان المرحله الثانيه لها طريقة اخرى كما ذكر اخونا صاحب الموضوع الاول وسوف يتم تطبيقها في النصف الاول من عام 2023 على مااظن وهذي المرحله تعتبر الاهم
- 12 replies
-
- الفوترة الالكترونية
- هيئة الزكاة والدخل
- (و16 أكثر)
-
احسنت اخي نحن بحاجة لنسخة مفتوحه يستفيد منها الجميع وتناقش جميع المشاكل فيها نرجو التفاعل من الجميع لاهميه هذا الموضوع وفقنا الله واياكم لما يحب ويرضى
- 12 replies
-
- الفوترة الالكترونية
- هيئة الزكاة والدخل
- (و16 أكثر)
-
جزاك الله خير وبارك فيك اخي الفاضل فعلا هذا الموضوع مهم جدا ارجوا اخواننا الكرام التفاعل معه للضروره الملحة ووضع امثله تخص هذه المرحله على الاكسس بارك الله فيكم وجزاكم الله خير جميعا
- 12 replies
-
- الفوترة الالكترونية
- هيئة الزكاة والدخل
- (و16 أكثر)
-
حياك الله اخي لم اجد حل الى الان
-
حياك اخوي حامل المسك الحل بيسط ان شاء الله احذف كلمة ErrTO راح تروح الرساله باذن الله هذا الكود بالكامل اللي اانا استخدمة حاليا Sub SendEmaile() On Error Resume Next myemail = DecodeQP2(DLast("Emaile", "EmaileData")) mypassword = DecodeQP2(DLast("Password", "EmaileData")) Set iMsg = CreateObject("CDO.Message") Set iConf = CreateObject("CDO.Configuration") iConf.Load -1 Set Flds = iConf.Fields With Flds .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = myemail .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = mypassword .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 .update End With With iMsg Set .Configuration = iConf .To = [EmpEmail] .From = """" & "شهادات الحضور" & """ <" & myemail & ">" .subject = Titletxt .HTMLBody = Messagetxt .AddAttachment DstFile .Send End With Debug.Print Kill DstFile End Sub
-
السلام عليكم ورحمة الله وبركاته اخواني ظهرت عندي مشكله قبل كم يوم ان قوقل وقفت خدمة الوصول التطبيقات الأقل أمانًا في البريد الاكتروني بشكل نهائي من قبل كانت شغاله معي تمام والان ما اقدر ارسل عن طريق الاكسس ايميل الى عدة اشخاص في المثال المرفق لاحد الاخوه استخدمت الكود فيه وشغال عليه من فتره وماشي زي الفل لكن الان توقفت الخدمة وتوقف الارسال عن طريق الاكسس هل هناك اخواني حل او طريقة اخرى لهذه المشكله لان بالنسبه لي ارسال الايميل عن طريق الاكسس مهم جدا وعملي متوقف عليه الان وكثير من الاخوه ايضا يحتاج هذه الخدمه ارجو المساعده بارك الله فيكم وجزاكم الله خير Course certificates -Mohd+Moosa.zip