mokadem2000
مشرف منتدى الفيجوال البيسك
- Egypt
- musama.tripod.com
- musama@hotmail.com http://musama.tripod.com 1289308 10 0020 Egypt
- برنامجي يستنزف الذاكرة بشكل كبير ..
الأخ الفاضل ... لماذا لم تذكر أى هذه الطرق، كى تعم الفائده على الجميع ولكل من ستصادفه نفس المشكله ويبحث عنها ويجد هذا الموضوع؟؟؟ أود أيضاً أن الفت انتباهك إلى أن الحل الذى ارفقته لك لا يستخدم الـ Global Variables، - وبالطبع الـ Global Variables معروف لدى الجمي…
- إرسال الإيملات باستخدام SMTP
كذلك يوجد برنامج اخر مشابه الى حداما فى: برامج ارسال بريد الكترونى مباشرتاً بالمرفقات والصور
- نبارك ترقية الأخوة الكرام من قسم الأكسيس
ألف مبروك للجميع والى مزيد من النجاح بإذن الله
- برنامجي يستنزف الذاكرة بشكل كبير ..
الأخ الفاضل ... بالنسبه للكود الأول، يمكنك أضافة تعديل بسيط بعد الإنتهاء من استخدام المؤشر الذى ترجعه الدالة get ، وهو حفظ هذا المؤشر فى متغير داخلى pr وبعد الإنتهاء من أستخدامه ، حذف الذاكرة بأستخدام delete التى يشير لها هذا المؤشر والمحجوزة بـ new، وهذه الطر…
- النسخةالتجربية للبرنامج
الأخ الفاضل ... توجد بعض الاقتراحات التى يمكنك انتقاء منها ما يناسبك بهذا الخصوص فى: تحميل البرنامج مرة واحدة شكراً
- اجراء عمليات حسابية علي الوقت
الأخ الفاضل ... يمكنك أستخدام دالة DateAdd فى الأضافة أو الطرح (رقم سالب) من الوقت أو التاريخ، فلطرح 10 دقائق من 2:00 (أضف -10) أستخدم: MsgBox DateAdd("n", -10, CDate("2:00")) حيث n تعبر عن الدقائق، كذلك: yyyy: تعبر عن السنين q: ربع سنة (3 اشهر) m: شهر d: يوم …
- اريد ان اظهر عدد معين من Lables دون انشائهم يعني بالكود
الأخ الفاضل ... هذه الرسالة تظهر لك لأنك خصصت نفس الأسم للجميع، جرب أستخدام الكود التالى: Dim lblName(20) As Label Dim n As Integer For n = LBound(lblName) To UBound(lblName) Set lblName(n) = Me.Controls.Add("VB.Label", "lblName" & n) lblName(n).Caption = "My …
- Mido xp button
الأخ الفاضل ... أداة جميلة وبداية موفقة أن شاء الله، أى برنامج يبدء فى صوره عادية ثم يتم تطويره بعد ذلك وتلافى ما به من أخطاء Bugs إن وجدت، لذا انتظار المزيد وارجوا فى الأصدار الجديد من هذه الأداه إضافة امكانية (وضع صورة على الزرار Picture - التحكم فى الخط Fon…
- الحصول على MAC Address بمعرفة ال IP لذلك الجهاز
الأخ الفاضل... راجع: سؤال حيرني : كيف يمكن معرفة Mac Address الخاص بي Client شكراً
- سؤال برمجة لمحببي الرياضيااات .. قصير جدا
الأخ الفاضل ... بالنسبه للكود الذى وضعه الأخ aptx ، فقط قم بتغير علامة < إلى > فى الحلقة التكرارية، لتصبح: for (i=0; i < 28; i++) وإن شاء الله سيعمل معك. شكراً
- اريد ان اظهر عدد معين من Lables دون انشائهم يعني بالكود
الأخ الفاضل ... راجع الموضوع: كيف أستطيع اضافة أداة على الفورم برمجياً وسؤال مهم فى انشاء زر حيث يحتوى على مثال لوضع زرار على الفورم برمجياً (وبنفس الطريقة يمكنك أضافة أدوات أخرى) كما يمكنك إضافة Label برمجياً بأستخدام: Dim lblName As Label Set lblName = Me.Co…
- دمج بيانات 3 حقول فى حقل واحد
راجع: كيف استطيع تجميع قيم ثلاث حقول في حقل واحد ومن ثم التعامل مع هذا الحقل
- اريد دالة او طريقة تخرج العدد العشري من الرقم
الأخ الفاضل ... همام ابوعرقوب الله يبارك فيك، وانت أيضاً مميز جداً فى ردودك واجاباتك ومبروك عليك لقب (عضو مميز :)) وأن شاء الله المزيد فى المستقبل القريب أخى الفاصل ما قمت بوضعه فى ردى الأول هو فعلاً دالة (تعمل مع أى كسر بغض النظر عن طوله) وحيث أن سؤال الأخ را…
- كيفية تغيير قيمة عددصحيح كما في المثال؟
الأخ الفاضل ... أستخدم: =Round([a]/100)*100 فى الـ Control Source الخاصه بمربع النص الثانى شكراً
- كيف استخرج نص صفحة من أداة Inet
كيف يمكنني عرض HTML Source Code لأي موقع؟
- reversing string
الخ الفاضل ... جرب أستخدام التالى: #include<stdio.h> #include<string.h> int main() { char storm[20]; char restorm[20]; int count, rcount; printf("Enter string: "); gets(storm); count = strlen(storm); rcount = 0; while(count) restorm[rcount++] = storm[--count];…
- مشكله ظهور الوقت والساعات مع التاريخ
الأخ الفاضل ... لو لديك المتغير d يحتوى التاريخ، فأستخدم: DateValue(d) أو DateValue(Now) للحصول على التاريخ الحالى. شكراً
- اريد دالة او طريقة تخرج العدد العشري من الرقم
الأخ الفاضل ... جرب أستخدام: Public Function GetFractional(Num As Double) As Long Dim Pos As Integer Pos = InStr(1, Num, ".") If Pos <> 0 Then GetFractional = Mid$(Num, Pos + 1) End Function شكراً
- اريد تصميم صفحة ويب وربطها بقاعدة بيانات أكسس
الأخ الفاضل ... بغض النظر ما إذا كانت الصفحة (ASP Page) تم تصميمها ببرنامج Frontpage أو اى شيئ أخر، فيمكن استخدام الكود التالى لعرض محتويات الجدول Students الموجود فى قاعدة البيانات test.mdb على صفحة ويب (asp) : <% Dim ADO Dim rs Set ADO=Server.CreateObject("A…
- كود عندما يتحرك مؤشر الماوس فوق النص يتم النطق
راجع: hook & text under_mouse_pointer