فتى الوادي

السلام عليكم : كيف استطيع إظهار رقم الدنقل المتصل بالجهاز ...؟

يعطيك العافية أخي الكريم .. الرابط ممتاز وأعتقد أنه هو المطلوب إن شاء الله . شكرا لك مرة أخرى .

لم أجد فيها مقصدي .. الموضوع للرفع ..

السلام عليكم : دلوني على طريقة تجعل برنامج ما لا يعمل إلا على فلاشة يو أس بي ... مع العلم بأن الفلاشه ممكن نضعها في جهاز يعتبر انها محرك ( D ) وممكن نضعها في جهاز آخر يفترض أنها ( E ) .. فما هي الطريقة المناسبة لعمل البرنامج على الفلاشة ,,, مع عدم إمكانية نسخه…

السلام عليكم وجدت هذا الكود في أحد الأمثلة ... ويفترض به أن يقوم بوضع علامة الصح عند الأختيار الصحيح .. ولكن بدلا من ظهور علامة الصح تظهر حرف ( يو ) ( u ) وعليه نقطتين .... فهل منكم أحد يعرف إصلاحه أو المشكلة فيه ؟ الكود مرفق بالمثال في التقرير ... سيطلب منك ر…

السلام عليكم : هل بالإمكان إظهر رقم الهاردسك الذي يعمل عليه البرنامج مهما كان ...!؟ يعني ممكن أضع البرنامج على السي ويطلع لي رقمه وممكن اضعه على الدي ويطلع رقمه .. أو أي محرك أضع البرنامج فيه يظهر لي رقمه .. وذلك لمحاولة وضع حماية مناسبة . شكرا لكم .

السلام عليكم : لدي نموذج وتقرير ... وفيه بيانات للسجلات .. من حقول السجل علامة خيار ( نعم - لا ) تقرأ من الجدول .. أنا أريد إذا ظهرت علامة الخيار = 1 أن يظهر بديلا عنها علامة ( الصح ) صورة حتى تكون أكبر وأوضح .. المرفق مشروح به المطلوب .. لا أستغني عن فزعاتكم …

السلام عليكم : الكود هذا هو للترقيم التلقائي .. ياخذ آخر قيمة في الجدول ويضيف عليه زيادة رقم واحد .. وإذا كان الجدول فارغا من السجلات فيعطيه رقم 1 عموما تقدر تستعيض بهذا الكود بكود آخر وهو : txt1 = DCount("[id]", "[table1]") If txt1 = 0 Then Me.id = 1 Else id …

بارك الله فيك ونفع الله بك البلاد والعباد وزادك الله من علمه .. وما على المحسنين من سبيل ...

السلام عليكم : بعد التجربة ما زالت الرسالة تظهر .. ولا يتم عمل مشاركة للمجلد .! واعتقد انك نسيت ان تعدل الكود الأخير : If ShareIt("user-174f906813.", Me.txtloc) = 0 Then MsgBox "Êã Úãá ÇáãÔÇÑßÉ ááãÌáÏ ÈäÌÇÍ" Else MsgBox "ÍÏË ÎØà ÑÈãÇ ÇáãÌáÏ ÛíÑ ãæÌæÏ Ãæ ÇáãÌáÏ…

برنامج جميل جدا ومفيد ... واسمح لي ببعض الأقتراحات : 1- لو كان فيه زر لأستعراض الملف المرفق بالرسالة .. يعني ممكن اشوف الصور بدون تنزيلها .. أو افتح الملف مباشرة بدون تنزيله . 2- لو كان الرسائل بالعربي . 3- لو كان فيه رسالة تخيير هل تريد إرسال الرسالة لفلان مع…

أخي الكريم : أرفق المثال الموجود به الكود حتى اقدر أساعدك وأتعرف على الجداول والحقول ومسمياتها ...

بارك الله فيك ونفع الله بك البلاد والعباد وزادك الله من علمه ..

السلام عليكم أعتذر أخي الكريم عن الرد متأخرا حيث كنت مسافرا خارج البلاد ... أخي الكريم : جربت المثال المرفق وتظهر رسالة : مع ان المجلد موجود وغير مشترك ..

ماشاء الله .. تمام .. لكن لو كان المجلد موجود مسبقا ... سيظهر رسالة ( المجلد موجود مسبقا ) ... نود أن يضاف على الرسالة : هل تود بعمل مشاركة للمجلد ؟ لا أملك لك إلا دعوة صالحة في ظهر الغيب ...

اللهم لا سهل إلا ما جعلته سهلا ... إنك سبحانك تجعل الصعب سهلا ....

ما شاء الله عليك ... شرح وافي وما قصرت بيض الله وجهك ..

تعقيب بسيط : ممكن شرح لهذا السطر : myPath = myPath & Mid$(rs.Fields(1), p, Len(rs.Fields(1))) حيث اني اضفت حقول للجدول وكان تريب الحقل الذي تجرى عليه العملية هو 6 وحاولت اغير الرقم 1 إلى 6 في السطر السابق ولم تنفذ العملية ! هل رقم (1) في السطر السابق هو رقم تر…

السلام عليكم :: أريد طريقة عمل مشاركة لمجلد محدد مثال لدي حقل txtloc وفيه يدخل المستخدم مسار واسم المجلد مثال : D:\mot وعند الضغط على الزر يقوم الكود بعمل مشاركة لهذا المجلد إذا كان موجود أو يقوم بإنشاءه ثم رسالة ( هل تريد عمل مشاركة لهذا المجلد ؟ ) مشاركة مجل…

ودي اسدي نصيحة : استخد كلمات ومسميات أنجليزية للحقول والجداول أفضل لك وأريح لك في كتابة الكود .