jjafferr قام بنشر ديسمبر 13, 2016 قام بنشر ديسمبر 13, 2016 السلام عليكم اخي محمد فهم الكود اخذ مني وقت ، واعتقد بأني فهمته طيب ، اذا كنا في المسلسل رقم 6 ، وكان عندنا الملفين التاليين عند الادراج: Router_config.jpg Read_Router_config_Manual.doc . فكيف تريد حفظ هذين الملفين؟ جعفر 1
محمد سلامة قام بنشر ديسمبر 13, 2016 الكاتب قام بنشر ديسمبر 13, 2016 1 ساعه مضت, jjafferr said: السلام عليكم اخي محمد فهم الكود اخذ مني وقت ، واعتقد بأني فهمته طيب ، اذا كنا في المسلسل رقم 6 ، وكان عندنا الملفين التاليين عند الادراج: Router_config.jpg Read_Router_config_Manual.doc . فكيف تريد حفظ هذين الملفين؟ جعفر وعليكم السلام بارك الله فيك استاذ جعفر وشكرا علي ردك ومتابعتك الموضوع بخصوص الاستفسار عند الادراج يصبح الملف الاول At6-1.jpg الملف الثاني At6-2.doc شرحها At اسم ثابت 6 رقم المسلسل 1 او 2 هو رقم تلقائي مسلسل يارب اكون عرفت اوصل الفكرة
jjafferr قام بنشر ديسمبر 14, 2016 قام بنشر ديسمبر 14, 2016 9 ساعات مضت, محمد سلامة said: بخصوص الاستفسار عند الادراج يصبح الملف الاول At6-1.jpg الملف الثاني At6-2.doc شرحها At اسم ثابت 6 رقم المسلسل 1 او 2 هو رقم تلقائي مسلسل يارب اكون عرفت اوصل الفكرة السلام عليكم اخي محمد هاي سهلة ، والمرفق فيه طلبك (مع ملاحظة اني لاحظت خطأ في الكود في قراءة الملفات ذات اكثر من 3 حروف لصيغة الملف ، مثل docx و accdb و xlsx ، والملفات بدون صيغة) ، وتم تعديله في المرفق بدلا عن FileCopy File_Path_Name, Me.pate & "\" & File_Name استخدم FileCopy File_Path_Name, Me.pate & "\Alt_" & Me.id_m & "_" & i & "." & FileExt ولكن اسمح لي ان اعرض بعض التغيير: ايش رايك بدلا عن Alt_6_1.jpg Alt_6_2.doc ايش رايك في ، بحيث تحتفظ بإسم الملف ايضا Alt_6_1_Router_config.jpg Alt_6_2_Read_Router_config_Manual.doc وايش رايك في انه يوجد لكل سنه ملفاتها؟؟ جعفر 207.3.m.salama.accdb.zip 1
ًعبد من عباد الله قام بنشر ديسمبر 14, 2016 قام بنشر ديسمبر 14, 2016 (معدل) سلام الله على الجميع من الجميل أن تتضافر جهود وأفكار اساتذتنا الأفاضل ليخرجوا لنا أبداعاتهم فضلا عن جميل مساعدتهم. إذا سمح لى أخى أ / محمد سلامة. بطلب إضافة من أستاذنا / جعفر. أحتاجها على هذا الموضوع الجميل والذى كنت أبحث عن نظيرا له في فكرته لعمل أخر أقوم به وجاء هذا المثال في ابداعه قريبا جدا مما أريد. والإضافة تتمثل في إمكانية عمل نافذة استعراض مضغرة باسم Preview في النموذج الفرعى sfrm_emp_wared عند الضغط على هذا الاستعراض يقوم بفتح الملف. وهناك نقطة أخرى (وردت بخاطرى) أود "إن أمكن" إضافتها وهى عمل زر لإمكانية ارفاق بعض المحتويات دون البعض في نفس الفولدر من خلال تحديد ما نريد إضافته مع وجود زر أخر لإضافة محتويات كامل الفولدر كما هو الحال الآن وذلك إثراءً وتكاملا للعمل حتى يتسع الأمر لكل مستخدم حسب حاجته ورغبته في إضافة المرفقات. دمتم بكل خير وجعل الله تبذلون فيه وقتكم ومجهودكم وعلمكم في ميزان حسناتكم وشكرا لكم والسلام. تم تعديل ديسمبر 14, 2016 بواسطه وائل أبو عبد الرحمن
محمد سلامة قام بنشر ديسمبر 14, 2016 الكاتب قام بنشر ديسمبر 14, 2016 (معدل) 12 ساعات مضت, jjafferr said: ولكن اسمح لي ان اعرض بعض التغيير: ايش رايك بدلا عن Alt_6_1.jpg Alt_6_2.doc ايش رايك في ، بحيث تحتفظ بإسم الملف ايضا Alt_6_1_Router_config.jpg Alt_6_2_Read_Router_config_Manual.doc السلام عليكم استاذنا الحبيب جعفر .. يسلم عليم لما يكون بالك رايق بتبدع بالنسبة للتغيير انا لا يهمنى الاسم القديم للمرفق بقدر الاسم الجديد .. لان المرفق القديم موجود فى مكانه وباسمه القديم. بعد التجربة انظر الصورة هناك خطأ يدرج المرفق بالاسم القديم ثم بالاسم الجديد واذا ارادت مرة اخرى ادراج مرفق اخر يتم ادراجه بنفس الترقيم يعنى من المفترض ان الرقم الاخير يكون مسلسل وعند الادراج مرة اخرى يكمل على المسلسل 12 ساعات مضت, jjafferr said: وايش رايك في انه يوجد لكل سنه ملفاتها؟؟ فكرة ممتازة وجميلة وبدون ان اثقل عليك استاذي الفاضل تحياتي لك تم تعديل ديسمبر 14, 2016 بواسطه محمد سلامة
jjafferr قام بنشر يناير 1, 2017 قام بنشر يناير 1, 2017 السلام عليكم أخي محمد كل سنه وانت بخير ان شاء الله انا جربت المرفق ، وحسب تجربتي كُله تمام ، حيث يحفظ الملفات بالتنسيق التالي ، مثلا: At_7_1.jpg At_7_2.doc ولما تضيف ملف جديد ، فيتم الترقيم التلقائي (لم يكن موجودا في النسخ القديمة). جعفر 207.4.m.salama.accdb.zip 3
محمد ايمن قام بنشر يناير 1, 2017 قام بنشر يناير 1, 2017 (معدل) تحية طيبة للجميع و اذا سمح لي الاستاذ جعفر بالمداخلة على المرفق فقد قمت ببعض التعديلات حيث يتم ترقيم المرفق بنفس الاسم و لكن يضاف اليه التاريخ كاملا اضافة الى رقم تسلسلي مثلا 01-01-2017 000001 مرفق 1 ايضا يمكنك فتح المرفق بالنقر المزدوج على حقل اسم المرفق حيث يتم تشغيل المرفق بالبرنامج المرتبط به مثلا ملفات الصور يتم تشغيلها بواسطة عارض الصور و هكذا طبعا المرفقات يجب ان تكون في نفس مسار قاعدة البيانات 207.5.m.salama.rar تم تعديل يناير 1, 2017 بواسطه محمد ايمن 2
jjafferr قام بنشر يناير 1, 2017 قام بنشر يناير 1, 2017 حياك الله اخوي محمد ، واتشرف بمشاركتك واصبح لدى اخونا محمد اكثر من حل ، وذلك في السنة التالية لسؤاله جعفر 3
محمد سلامة قام بنشر يناير 1, 2017 الكاتب قام بنشر يناير 1, 2017 (معدل) 2 ساعات مضت, jjafferr said: السلام عليكم أخي محمد كل سنه وانت بخير ان شاء الله انا جربت المرفق ، وحسب تجربتي كُله تمام ، حيث يحفظ الملفات بالتنسيق التالي ، مثلا: At_7_1.jpg At_7_2.doc ولما تضيف ملف جديد ، فيتم الترقيم التلقائي (لم يكن موجودا في النسخ القديمة). جعفر 207.4.m.salama.accdb.zip وعليكم السلام وحضرتك بخير وسعادة وشكرا لك تفاعلك ومتابعة الموضوع.. بارك الله فيك استاذ جعفر 2 ساعات مضت, محمد ايمن said: تحية طيبة للجميع و اذا سمح لي الاستاذ جعفر بالمداخلة على المرفق فقد قمت ببعض التعديلات حيث يتم ترقيم المرفق بنفس الاسم و لكن يضاف اليه التاريخ كاملا اضافة الى رقم تسلسلي مثلا 01-01-2017 000001 مرفق 1 ايضا يمكنك فتح المرفق بالنقر المزدوج على حقل اسم المرفق حيث يتم تشغيل المرفق بالبرنامج المرتبط به مثلا ملفات الصور يتم تشغيلها بواسطة عارض الصور و هكذا طبعا المرفقات يجب ان تكون في نفس مسار قاعدة البيانات 207.5.m.salama.rar شكرا استاذ محمد وكل سنه وحضرتك طيب 1 ساعه مضت, jjafferr said: حياك الله اخوي محمد ، واتشرف بمشاركتك واصبح لدى اخونا محمد اكثر من حل ، وذلك في السنة التالية لسؤاله جعفر شكرا جزيلا استاذ جعفر هذا كان طمع في بحر خيركم وعطائكم وعدم بخلك علينا في الرد علي استفسارتنا فبارك الله فيكم جميعا وجاري المتابعة والاطلاع تم تعديل يناير 1, 2017 بواسطه محمد سلامة
jjafferr قام بنشر يناير 2, 2017 قام بنشر يناير 2, 2017 في 12/14/2016 at 10:31, jjafferr said: وايش رايك في انه يوجد لكل سنه ملفاتها؟؟ السلام عليكم أخي محمد سلامة المرفق الاخير تم تعديله ليكون جاهز للخطوة التالية ، خطوة السنة انظر في الكود المرفق . حاليا نستخدم السطر رقم 2 ، بينما نستطيع تغيير مسميات المرفق كما نشاء ، مثلا: كود السطر 1 ، يضيف الاسم الاصلي للمرفق ، الى اسم المرفق ، بينما اذا اردت ان تضيف السنة الى اسم المرفق ، فكل الذي عليك عمله هو اضافة كود السنة الى السطر رقم 1 او 2 year(date()) او Year(now()) هكذا في اول اسم المرفق New_File = year(now()) & ".At." & Me.id_m & "." & i & "_" & File_Name او في آخر اسم المرفق New_File = "At_" & Me.id_m & "_" & i + RC & year(now()) & "." & FileExt . جعفر
محمد سلامة قام بنشر يناير 4, 2017 الكاتب قام بنشر يناير 4, 2017 في ٢/١/٢٠١٧ at 23:32, jjafferr said: السلام عليكم أخي محمد سلامة المرفق الاخير تم تعديله ليكون جاهز للخطوة التالية ، خطوة السنة انظر في الكود المرفق . حاليا نستخدم السطر رقم 2 ، بينما نستطيع تغيير مسميات المرفق كما نشاء ، مثلا: كود السطر 1 ، يضيف الاسم الاصلي للمرفق ، الى اسم المرفق ، بينما اذا اردت ان تضيف السنة الى اسم المرفق ، فكل الذي عليك عمله هو اضافة كود السنة الى السطر رقم 1 او 2 year(date()) او Year(now()) هكذا في اول اسم المرفق New_File = year(now()) & ".At." & Me.id_m & "." & i & "_" & File_Name او في آخر اسم المرفق New_File = "At_" & Me.id_m & "_" & i + RC & year(now()) & "." & FileExt . جعفر جزاك الله خيرا وبارك الله فيك مهما احاول ان اشكرك لن اوافيك حقك شكرا جزيلا فعلا ونعمة الاخ والمعلم
ابو جودي قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 في 1/1/2017 at 21:42, jjafferr said: السلام عليكم أخي محمد كل سنه وانت بخير ان شاء الله انا جربت المرفق ، وحسب تجربتي كُله تمام ، حيث يحفظ الملفات بالتنسيق التالي ، مثلا: At_7_1.jpg At_7_2.doc ولما تضيف ملف جديد ، فيتم الترقيم التلقائي (لم يكن موجودا في النسخ القديمة). جعفر 207.4.m.salama.accdb.zip السلام عليكم ورحمة الله تعالى وبركاته استاذى الجليل ومعلمى القدير استاذ @jjafferr عتد استخدام الزر ادراج مرفقات من الكمبيوتر لو اراد المستخدم الرجوع عن هذه الخطوة عند الضغط على الزر cancel تظهر تلك الرسالة المزعجة كما فى الصورة الاتية كيف يمكن الغاء هذة الرسالة المزعجة
jjafferr قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 وعليكم السلام أخي اباجودي 8 ساعات مضت, ابا جودى said: لو اراد المستخدم الرجوع عن هذه الخطوة عند الضغط على الزر cancel تظهر تلك الرسالة المزعجة كما فى الصورة الاتية استبدل هذا السطر If UBound(strFileNames) = 0 Then بهذا السطر If Len(strFileNames & "") = 0 Then 7 ساعات مضت, ابا جودى said: وما هو الخطأ المسبب فى ظهور هذه الرسالة بسم الله عليك ايه يا اباجودي ، ما انت قلت انها تظهر لما تضغط على الزر cancel جعفر 207.5.m.salama.accdb.zip 3
ابو جودي قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 31 دقائق مضت, jjafferr said: وعليكم السلام أخي اباجودي استبدل هذا السطر If UBound(strFileNames) = 0 Then بهذا السطر If Len(strFileNames & "") = 0 Then بسم الله عليك ايه يا اباجودي ، ما انت قلت انها تظهر لما تضغط على الزر cancel جعفر 207.5.m.salama.accdb.zip هههههههههههه اقصد المسبب داخل الكود يا استاذى الحبيب 1
محمد سلامة قام بنشر أبريل 23, 2017 الكاتب قام بنشر أبريل 23, 2017 حمدالله علي السلامة استاذ @jjafferr يا @ابا جودى ايه رايك في الموضوع ده؟ 1
ابو جودي قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 31 دقائق مضت, محمد سلامة said: حمدالله علي السلامة استاذ @jjafferr يا @ابا جودى ايه رايك في الموضوع ده؟ الموضوع اكثر من رائع وللعلم انا استفدت منه واخذت منه افكار واكواد وعدلت عليها بما يتناسب مع فكرتى والمخرج موجود فى برنامج المسح الضوئى الاخير اللى انا ارفقته فى رابط خارجى فى موضوع الاستاذ @حسين العربى فى هذه المشاركة 1
حسين العربى قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 في ٤/١/٢٠١٧ at 19:43, jjafferr said: هلا والله جعفر استاذي الفاضل jjaffer ممكن لو تكرمت لقي نظره علي هذه المشاركة
jjafferr قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 7 ساعات مضت, ابا جودى said: هههههههههههه اقصد المسبب داخل الكود يا استاذى الحبيب الكود السابق: UBound(strFileNames) UBound معناه العدد الاكبر من strFileName ، ولكن للاسف بسبب الضغط على زر cancel ، فالمتغير strFileName يصبح Null ، لذلك لم يستطع الامر السابق اصطياد الخطأ، بينما الامر If Len(strFileNames & "") = 0 Then فيقوم محل امرين وهما: If isNull(strFileNames)=true or strFileNames= 0 Then جعفر 1 ساعه مضت, محمد سلامة said: حمدالله علي السلامة استاذ @jjafferr الله يسلمك ويعافيك ان شاء الله اخوي محمد جعفر 3
jjafferr قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 1 ساعه مضت, حسين العربى said: استاذي الفاضل jjaffer ممكن لو تكرمت لقي نظره علي هذه المشاركة حياك الله أخوي حسين هل في شيء معين تريدني انظر فيه؟ جعفر 1
حسين العربى قام بنشر أبريل 23, 2017 قام بنشر أبريل 23, 2017 (معدل) منذ ساعه, jjafferr said: حياك الله أخوي حسين هل في شيء معين تريدني انظر فيه؟ جعفر يسعدني جدا ويشرفني استاذي الفاضل ان ترد علي طبعا في البدايه ان مش عاوز زر سحب سكان من البرنامج انا سوف اسحب من الاسكان عن طريق الكمبيوتر. واخفظ في فولدر مؤقت. واذهب الي البرنامج واضغط علي زر ادراج صوره من ملف الاسكان المؤقت. فياخذ قص من الصور. ويدرجها في الفولدر المحدد مساره في مربع النص مسار الفولد ويدرج مسار الصور الجديد في النموذ الفرعي طبعا ده كله اتعمل وشغال تمام هنا مشكله هي لو في صوره بها نفس الاسم الموجود في فولدر الموظف. يقوم باستبدالها انا طبعا للتوضيح.برنامجي عامله لشئون موظفين وليس صادر واوارد. وطبعا يوجد لكل موظف فلودر علي السرفر به كل صوره. ارجو ان اكون طلبي واضح كيف نتفادي هذه المشكله تم تعديل أبريل 23, 2017 بواسطه حسين العربى
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.