العريق

on error resume next شوف توقف عرض الرسالة ولكنها لن تحل المشكلة ... أخي أبو عمر 5 .. لو تضع الكود وتخبرنا ما عمله .. أعتقد بأن ذلك سيكون أسهل لنا للتعرف على المشكلة ومن ثم إعطائك الحل المناسب ... طريقة طرحك للسؤال وكأن الرسالة خاصة جداً .. هذي رسالة عامة بشكل …

السلام عليكم ... عند تجربتي للمثال المرفق .. واجهتني مشكلة تقول بأن الـ Drive المسمى ISAM غير موجود على جهازي .. ولذلك فشلت عملية الإتصال مع ملف الإكسل .. فما هو هذا الـ ISAM ؟ وكيف لي أن أركبة على جهازي ؟ أتمنى أن أجد الإجابة في أسرع وقت ممكن .. فأمر عاجل ...…

السلام عليكم ... موضوع رائع وأدوات جميلة ... ولكن .. بعض الملفات لا تعمل ... ثم أني لم أجد مبتغاي فيها ... فهل لك أن توضح لي .. ويعطيك العافية ... تحياتي ...

السلام عليكم ... أخي لم تذكر الطريقة التي أستخدمتها لعمل ذلك ... هناك العديد من الطرق .. فأيها أستخدمت ... تحياتي ...

السلام عليكم ورحمة الله وبركاته ... أريد أن أكتب إجراء معين يقوم بعملية نسخ قاعدة بيانات جديدة على آخرى قديمة ... وذلك بحذف القديمة ونسخ الجديدة مكانها ... لكن عملية الحذف لا تتمت .. حاولت بالستخدام الأمر Kill ... لم أتمكن .. كذلك أستخدم الدالة DeleteFile من A…

السلام عليكم ورحمة الله وبركاته ... أقوم بعمل برنامج يقوم بنسخ بعض الملفات إلى دليل يحدده المستخدم ... كيف أعرض على المستخدم نافذة أختيار الدليل .. حيث أن CommanDilog تتطلب تحديد ملف ... كذلك كيف أتأكد من أن الدليل الهدف موجود ... الدالة Dir تيتوجب وجود ملفات …

أواجه مشكلة مماثله ... لقد تمكنت من حل المشكلة وذلك كالتالي: 1- أزل ConnectionString من الـ Conneaction ... 2- أضف الكود التالي في قبل أستدعاء الداتا ريبورت أو في بداية تشغيل البرنامج : denEnveroments.cnnConnecation.ConnectionString = "Provider=Microsoft.Jet.O…

الأخ العزيز DreamNet ... نعم هذا هو الحل الأمثل .. لقد أصبت الهدف .. يعطيك العافية عزيزي .. بس بغيت منك شيئ واحد : ما هي الدوال التي تنصح باإستخدامها في هذه الحالة ؟؟ ولكم مني التحية والإكرام ... تحياتي ...

السلام عليكم ... يمكنك ذلك ببساطة بالستخدام الأداة Microsoft Muiltimidia Control التي تجدها في Componts .... تستطيع منها عمل كل ماتشاء بهذا الخصوص ... تستطيع ذلك من خلال الخصائص التالية : TimeFormat : التي تحدد مقدار ونوع الفتره الزمنية .. position : التي تعطي…

أخي العزيز عبدالكريم ... شكراً لك على اللنك .. ولكن كما قلت للأخ بلال حمدي ... فهذا ليس ما أريده ... لقد قمت بتصميم برنامج حافظ شاشات من قبل ولكن لم أواجه مثل هذه المشكلة لأنه كان على Form واحد ... شكراً مره آخرى ... تحياتي ...

السلام عليكم ورحمة الله وبركاته ... الأخ العزيز بلال حمدي .. شكراً لك على تفاعلك وعلى المثال ... عزيزي .. ما قلته أعرفه .. وهو ممكن التنفيذ على Form واحد فقط .. أي حركة الفأرة محسوبة على Form واحد فقط ... ما أريده هو جعل الحساب على جميع النماذج Forms في حالة ا…

السلام عليكم ... الأخت/الأخ ميمنة .... أعتقد بأن الخطأ هو في الجزء الملون ... Dim i As Integer For i = 1 To 2 With Me.ActiveForm.MSChart(i) Set .DataSource = rst .ShowLegend = True .chartType = VtChChartType3dLine End With Next i حيث لايمكن تغيير أسم النموذج f…

الله يهديك عزيزي COMFORT .. الذي قلته لا حل المسألة .. أعلم بأن الكود سيغلق النموذج بعد فرته تحدد داخل Timer ... ما أريده هو : كيف أجعل التايمر يبدأ عند توقف الفأره والكيبورد من التحرك أو أعطاء أوامر .. وذلك داخل MDI Envermintes ... أي أن حركة الفأره ومدخلات ا…

أعتقد بأنك تريد تعبأت combo box من قاعدت بيانات ... إذا كنت تستخدم أداة Data .. فهذا غير ممكن بشكل مباشر .. تستطيع أستعمال الكود التالي لعمل ذلك : Dim RecordCountDD As Integer Data1.Recordset.MoveLast RecordCountDD = Data1.Recordset.RecordCount Data1.Recordset…

الأخ العزيز neklawy1968 ... :lol: شغل عجيب فعلاً ... يعطيك العافية .. بس - ولو أني بتعبك - لكن .. كيف عملتها .. بس بدون كتابتة SQL ... وما هي وضيفة الجدولان المضافان ( T & M ) ؟؟؟ وشكراً .. شكراً ... وشكراً ... لك عزيزي مره أخرى .. تمنياتي لك بدوام التوفيق ...…

السلام عليكم ... لدي برنامج مكون من نموذج MDI ومجموعة نماذج Children عددها يفوق 10 ... وهي ليست على شكل Array of tool ... ما أريده هو : أريد من البرنامج أن يغلق إذا مضت فرته زمنية معينة على البرنامج من دون أي حركة من المستخدم .. أي لا حركة للفأره ولا نقره على …

مشكوررين على المعلومات ... سعطيكم العافة ... تحياتي ...

السلام عليكم ... كلامك غيير صحيح عزيز .. الدالة Split لا تحتاج إلى تحديد طول الكلمة التي تريد أقتطاعها ... أنظر إلى تفصيل الدالة : Split(Expression As String, [Delimiter], [Limit As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) :s :s :s :s :s :s …

السلام عليكم ورحمة الله وبركاته ... منذ فتره طويلة وأنا أبحث عن طريقة سهله لعمل صوره ذات خلفية شفافة ... آخر ما توصلت إليه هو أستخدام الـ Microsoft Word لعمل ذلك !!! :lol: :lol: أريد أعرف إذا كان هناك طريقة سهله عن طريق الفجوال بيسك أو دوال API لعمل ذلك ... تح…

للرفع ... ها شباب .. ما حد يعرف يجواب ؟؟؟ تحياتي ...