الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اول برنامج لي (برنامج لحساب كلفة استخدامك للانترنت

مغلق
بدأه هوب في 9 مارس 2005 · 8 رد · 2,110 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

هذا هو اول برنامج شبه كامل لي .. وهو عبارة عن برنامج لحساب كلفة استخدامك للانترنت ..

لابد ان يكون هناك اخطاء كثيرة فيه .. فأرجو من الكل الافادة واكون لكم شاكرا ..

احب ان اشكر الاخ ناصر الذي لولا موضوعه(انشأ مشروعك في الفيجوال بيسك 6 من الالف الى الياء) وجهده ما استطعت ان اتم برنامجي ..

اخيرا حاولت ان اجعل البرنامج بجانب الساعة في شريط المهام ولكنني واجهة مشاكل كثيرة .. فأرجو من لديه الخبره الافاده وله جزيل الشكر ..

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

internet.zip

اني ابتليت باربع ما سـلطوا ***** الا لشدة شقوتي و عنائي

ابليس والدنيا ونفسي والهوى **** كيف السبيل وكلهم اعدائي

شكوت الى وكيع سوء حفظي ***** فارشدني الى ترك المعاصي

و اخـبرنـي بـان الـعلم نـور ****** و نور الله لا يهدى لعاصي

#2

جميل ورائع ... استمر

سجل ايميلك هنا

googlejb5.gif ليصلك كل ما هو مفيد في عالم البرمجة
#3

بداية موفقة ...... وتفكير ابتكاري جميل

إن شاء الله تحاول تطويره الى الأفضل

#5

مو معقوول برنامج رائع وفكرته عبقرية بس لدي سؤال (كيفية الحصول على هذه الدوال الخاصة بالرجستري ؟ )

بارك الله فيك

#6

اشكر لكم مروركم الكريم جميعا واطرأكم ..

وان شاء الله اطوره .. واستمر ..

الاخت rsh76 :

انا لا املك الخبرة في التعامل مع دوال ال API ولا التعامل مع الريجستري وانما (الحاجة ام الاختراع ) ..

يعني لاني كنت محتاج لهذه الدوال في برنامجي بحث عنها والحمدلله وجدتها . واشكر الاخ JASS الذي استفدت كثيرا من موضوعه في الرابط :

/index.ph...hl=المنافذ&st=0

ايضا سأرفق لك ملف جميل جدا بل رائع .. حملته من الموقع الرائع موقع ال VB4ARAB .. الذي نتمنى ان يعود .. قد تجدي فيه مبتغاك.

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

من قائمة ابدأ (START) اذهب الى تشغيل (RUN) واكتب REGEDIT سيظهر لك محرر الريجستري(REGISTRY EDITER) ادخل على المجلدات بالترتيب التالي :

HKEY_LOCAL_MACHINE / SOFTWARE / MICROSOFT / WINDOWS / CUURENT VERSION / RUN

وقم بحذف MY PROGRAM

REGESTRY_CODE.zip

اني ابتليت باربع ما سـلطوا ***** الا لشدة شقوتي و عنائي

ابليس والدنيا ونفسي والهوى **** كيف السبيل وكلهم اعدائي

شكوت الى وكيع سوء حفظي ***** فارشدني الى ترك المعاصي

و اخـبرنـي بـان الـعلم نـور ****** و نور الله لا يهدى لعاصي

#7

السلام عليكم ورحمة الله وبركاته

جزاك الله كل الخير

وشكرا جزيلا على هذه المساعدة الكبيرة لي

نوّر الله لك دربك وسقاك من علمه ورحمته

#8

الاخت rsh76

لا شكر على واجب ..

هناك خطاء في البرنامج واحببت التنويه :

Else
    Form1.Visible = False
    frmshow = False
    T = False
End If

يجب اضافة T=False كما هو مبين اعلاه .. وهذه الشفرة موجودة في اخر 5 اسطر من البرنامج في form1 . في حالة عدما وجود هذا الشرط لا يتغير شيء في البرنامج عدى انه لا يسجل وقت الدخول ولاخروج بشكل صحيح اذا كان هناك اكثر من جلسة انترنت ..

ملاحظة :

لاحظة مؤخرا عندما احاول ان اطفىء الجهاز لا يستجيب لامر ايقاف التشغيل الا بعد انهاء البرنامج .. فأحببت التأكد اذا كان اي من الاعضاء الدين حملوا البرنامج يواجهون نفس المشكلة.

واي استفسار في الكود انا جاهز بأذن الله ..

اني ابتليت باربع ما سـلطوا ***** الا لشدة شقوتي و عنائي

ابليس والدنيا ونفسي والهوى **** كيف السبيل وكلهم اعدائي

شكوت الى وكيع سوء حفظي ***** فارشدني الى ترك المعاصي

و اخـبرنـي بـان الـعلم نـور ****** و نور الله لا يهدى لعاصي

#9

الى الان لم اجد نصيحة واحدة او تعليق واحد على الاخطاء في البرنامج .. فهل هذا يعني ان البرنامج متكامل وخالي من العيوب

انا نفسي بالرغم من قلة خبرتي اجد فيه الكثير من العيوب اهمها :

تكرار اكواد في اكثر من حدث بدلا عن استخدام (الاجراء procedure)

عدم استخدام تسمية لها دلالة او علاقة بالحدث نفسه .

استخدام متغيرات من النوع string للتعبير عن متغيرات رقمية

استخدام متغيرات تأخذ حجم كبير في الذاكرة بالوقت الذي لا تأخذ قيم اكبر من 3 او 4 .

عندي الجهاز لا يستجيب لايقاف التشغيل الا بعد انهاء البرنامج

عدم انزال البرنام بجوار الساعة .. فهو يأخذ مساحة في الشريط ويكون شكله مزعج . وطلبة المساعدة ولم اجد جواب .. واليوم حصلت على الاجابة بالصدفة على الرابط التالي :

/index.ph...55entry291955

والكثير الكثير الذي اراه انا فهل لذوي الخبر من الوقت القليل القليل ليمر ويضع عيب 1 واكون له شاكر ...

ودمتم اخوة كرماء .

اني ابتليت باربع ما سـلطوا ***** الا لشدة شقوتي و عنائي

ابليس والدنيا ونفسي والهوى **** كيف السبيل وكلهم اعدائي

شكوت الى وكيع سوء حفظي ***** فارشدني الى ترك المعاصي

و اخـبرنـي بـان الـعلم نـور ****** و نور الله لا يهدى لعاصي

هذا الموضوع مغلق.

مواضيع مشابهة