• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

seaprince46

اعضاء
  • عدد المشاركات

    772
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

2 عادي

عن seaprince46

  • الرتبة
    عضو مميز
  • تاريخ الميلاد 09/11/1979

طرق الإتصال

  • MSN seaprince46
  • ICQ 0
  • Yahoo seaprince46

أحدث الزائرين لملفلك الشخصي

3,898 زياره للملف الشخصي
  1. السلام عليكم إخواني الكرام عندي الجملة التاليه rs.Source = "SELECT TblAssetHis.*, EmpMaster.EmpMain_FName FROM EmpMaster INNER JOIN TblAssetHis ON EmpMaster.Sys_EmpID = TblAssetHis.[EmpNo] Where Code LIKE '%" & TxtVar.Text & "%';" المطلوب هو معرفة قيمة EmpMaster.EmpMain_FName الموجوده في الجملة الماضيه ووضعها في ليبل موجود في داتاريبورت شاكر ومقدر لكم حسن تعاونكم
  2. أخي العزيز wael20004 مثال أروع من رائع ومختصر يفي بالغرض جزاك الله خيرا ياغالي مشكور وماقصرت
  3. معقول مافي أحد عارف الجواب لهالدرجه الموضوع صعب
  4. كتب وروابط برمجية (مشاركات مجمّعة)

    جزاك الله خيرا أخي على الرابط المفيد
  5. السلام عليكم إخواني الكرام عندي إستفسار بخصوص التعامل مع الجداول الرياضيه أكسل من خلال الفيجوال بيسك المطلوب كالتالي : يوجد ملف أكسل مرفق فيه عمليه حسابيه بسيطه وهي جمع قيمة خليتين ووضعهما في خليه ثالثه في برنامج الفيجوال بيسك المرفق يوجد فورم فيه 3 تيكست بوكس وكوماند يتم إدخال قيمة في التسكت الأول والثاني وعند الضغط على الكوماند يتم إرسال الرقمين لملف الأكسل في الخلايا المحدده مسبقا لعملية الجمع وتتم عملية الحساب في برنامج الأكسل وإرجاع القيمه الناتجه للتكست الثالث الموجود على الفورم ولكم جزيل الشكر مقدما VB___Excel.zip
  6. تفضل أخي هذا المشروع بعد التعديل عليه _.zip
  7. السلام عليكم إخواني الكرام شكرا لكم على تفاعلكم هذا ليس تحدي مني شخصيا بالعكس انا أوؤمن بهذا المنتدى الرائع وفيه قدرات هائله تضاهي فعلا مبرمجين عالميين وانا شخصيا تعلمت الكثير منه لكن هذه الصيغه اللتي طرحها علي أحد الأشخاص وهو أصلا لايعرف فيجوال بيسك يعمل على VBA الأكسس وقد رأي هذا المنتدى وطلب مني وضع السؤال بهذه الصيغه لأنه محتاج لحل لهذه المسأله وأرجو من الإخوان ان لايأخذو الموضوع على انه تقليل من قدرهم لاسمح الله بالعكس يجب أن يكون دافع للتعلم وإيجاد حل منطقي لمثل هذا المسائل المعقده شاكر ومقدر لكم حسن تعاملكم
  8. السلام عليكم هذه الجمله قالها لي أحدهم تحدي لعمالقة البرمجه ومايكروسوفت وانا بدوري أنقلها لكم أمل أن أجد عندكم الجواب الشافي في المثال المرفق صوره وتيكست المطلوب كتابة الموجود في الصوره في التيكست بنفس الترتيب بنإنتظار تفاعالكم New.zip
  9. ساعة حائط

    مشكور أخي الكريم وبإنتظار جديدك
  10. شكرا لكم إخواني الكرام على مجهودكم الرائع وجزاكم الله الف الف خير كل شي تمام التمام
  11. أخي الكريم أشكر لك تعاونك لكن مازالت المشكله قائمه هذا البرنامج مرفق أرجو التعديل عليه إذا إلى فورم Search المطلوب تحت الزر Command2 مع إختيار ال Request Date وال Status test.zip
  12. اخي الكريم مشكور على الرد السريع لكن للأسف جربت الطريقه ولم تفلح تظهر رساله Type mismatch Adodc2.RecordSource = "select * from T1 where Date between #" + DTPicker1 + "# and#" + DTPicker2 + "# and Status = Combo4.Text;"