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

هذي المرة...من يريد دعوة صالحة صادقة من طالبة مسلمة فليدخل

مغلق
بدأه dedee في 17 أبريل 2003 · 15 رد · 1,322 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

(f)السلام عليكم

ارجوا الصلاح والتوفيق والجنة وزيادة الدخل والوظيفة الحسنة والشريك الصالح وخير الدنيا والاخرة لمن ساعدني انا وصديقاتي في المرة السابقة و لمن سيساعدني الان......

هذة المرة نفس المرة السابقة اريد ان اراقب كمبيوتر شخص ما نتصل انا وهو بشبكة محلية ولكن باستخدام function قال الدكتور انها موجودة في الفيجوال بيسك (لان برنامجنا فيجوال بيسك )

وعند البحث في قائمة الـ help لم اجد سوى getwindowname لمراقبة الشاشة ولاغلاق جهاز الكمبيوتر وجدتexitwindows.ex ...هل بحثي صحيح؟؟

واذا كان كذلك فكيف استخدمها ؟؟هل يوجد كود لذلك؟؟

وشكرا(f)

#2

عفواً لو توضحي أكثر ما المطلوب اختي

#3

انا مطلوب مني برنامج بلغة الفيجوال بيسك ، هذا البرنامج يطبق في معمل لشرح الدروس بحيث يمكن للمعلم مراقبة شاشات الطلاب وعندم يجد احد الطلاب قد غير شاشة الدرس يستطيع حينها المعلم ان يغلق له جهازه من مكانه ...

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

ارجوا المساعدة بسرعة وشكرا

#4

السلام عليكم

لا بد من وجود برنامج (سيرفر) في جهاز الطالب لكي يقوم بخدمة البرنامج الرئيسي عند الدكتور.

ولا يوجد اي دالة تقوم بهذا الشي في الفيجول بيسك وحتى بقية بيئات التصميم الآخرى.

تحياتي

#5

بسم الله الرحمن الرحيم

تعليقا على ماورد وذكر

اتفق مع الاستاذ / خالد الصالح بأن لابد من وجود سيرفر ( خادم ) يقوم بأخذ صورة لسطح المكتب كل نصف ثانية ( مثلا ) ثم يرسلها للكلينت ( العميل )

بهذا تستطيعي مراقبة الجهاز الذي يحتوي على السيرفر .

يتوافر لدي برنامج ( مكتوب بلغة السي ) يقوم بهذا العمل لكن بشكل بسيط

ولكن للعلم الفيجوال بيسك يقوم بذلك بجدارة .

فقط القدرة على التعامل مع WINSOCK و API .

البرنامج مرفق ولا تنس استخدام الIP 127.0.0.1

تحياتي .

try_this.zip

#6

ايضا يمكن اغلاق الجهاز عن طريق السيرفر

باستخدامالدالة ExitWindowsEx

مثال على ذلك

'In general section
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Sub Form_Load()
msg = MsgBox("This program is going to reboot your computer. Press OK to continue or Cancel to stop.", vbCritical + vbOKCancel + 256, App.Title)
    If msg = vbCancel Then End
    'reboot the computer
    ret& = ExitWindowsEx(EWX_FORCE Or EWX_REBOOT, 0)
End Sub
#7

الله ياحي ياقيوم يامن لا يشغله سمع عن سمع و لا تغلطه المسائل ولا يضجره إلحاح الملحين اللهم اذقهما برد عفوك وحلاوة مغفرتك ورزقك الذي لا ينقطع و سترك الذي لا ينكشف و نعمتك و رضاك اللذان لا يزولان ابدا

مرة مممرررررررررررررررررررررررررة شكرا وجزاكم الله الف خير

بس ليت ياخوي hazemnetلو تفسر ايش قصد بـ(ولكن للعلم الفيجوال بيسك يقوم بذلك بجدارة .) و هل الكود المرسول هو بالفيجوال بيسك ؟

وكيف استخدم البرنامج المرسول وشكرا

#8

:confused::confused::confused::confused:

OK

يا اختي العزيزة

لا شكر على واجب بالنسبة لما تريدين معرفته فقط اتركيني بضعة دقائق

وسف تجدي ما طلبتيه ..

تحياتي

hazemxp@yahoo.com

#9

بسم الله الرحمن الرحيم

إلى الأخت العزيزة وجميع أصدقاء المنتدى .

بالنسبة إلى المشكلة والتي عرضتها اختنا العزيزة أعلاه .

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

فكيف ذلك ؟

( اعتذر عن عدم كتابة الكود لطوله وثانيا غير جاهز معي الآن ولكن إذا أردتم المثال كاملا اخبروني بذلك واتركوني يوم او اثنين او ثلاثة بالكثير ويكون المثال جاهز إن شاء الله )

في البداية

عليك تصميم برنامجين أحدهما يدعى ( server ) والأخر ( CLIENT ) … لمـــــــاذا ؟

البرنامج الأول السير فر سوف يتم وضعه في الجهاز المراد مراقبته والإشراف عليه . أما البرنامج الثاني والذي يدعى كلينت سوف يتم وضعه في الجهاز الذي سوف تتم منه المراقبة .

الفكرة الرئيسية ( أو المهام ) للبرنامج تتلخص في هذه النقاط :

1- يقوم البرنامج الأول بأخذ صورة لسطح المكتب كل نصف ثانية او اقل ومن ثم تخزينها في الذاكرة ( وهذا يعتمد على API ) ثم إرسالها إلى برنامج الكلينت والذي يعمل على الجهاز الذي تتم عملية المراقبة منه .

( يعتمد ذلك على WINSOCK أو API )

2- استقبال الأوامر الصادرة من البرنامج الكلينت ( إغلاق الجهاز ، إعادة التشغيل ، إغلاق برنامج ، توجيه رسالة …… الخ ) وتنفيذها .( WINSOCK وAPI )

اما عن الكود المكتوب فنعم يا اختي الكود مكتوب بلغة الفيجوال بيزيك ( API FUNCTIONS ) .

بالنسبة عن طريق استخدام البرنامج والذي ارفقته من قبل .

المرفقات تحتوي على ثلاث برامج .

البرنامج الاول (Controller.exe ) وهو البرنامج السيرفر .

البرنامج الثاني (Nets.exe ) وهو البرنامج الكلينت .

البرنامج الثالث (Help.chm ) وهو ملف مساعدة لاستخدام البرنامج . )

اما عن طريق استخدام البرنامج فراجعي الملف الثالث وسوف تجدي الطريقة .

كل ما ارجوه هو الاستمرار في مناقشة الموضوع لانه موضوع شيق للغاية .

للتواصل

hazemxp@yahoo.com

#10

بسم الله الرحمن الرحيم

أختي الكريمة لا تنسي أداة winsok...

إذا أردتي الشرح فسأدرجه مع أمثلة

#12

الاخ / hamohd70

اشكرك على الموقع

لكن الا تعتقد انه بعيد عن الموضوع شوية

ارجــوا مشاركتك في الموضوع

تحياتي

#14

قد لا يكون المطلوب تماما ولكن هي مشاركة قد توحي بفكرة !

#15

للجمع شكرررررررررررررررررررررراً جزيلا وجزاكم الله عني الف خير

#16
اقتباس
قد لا يكون المطلوب تماما ولكن هي مشاركة قد توحي بفكرة !

لك الف شكر اخي

على ما اعتقد ان الموضوع غير شيق بالنسبة لكم على العموم ساحاول وضع

مجموعة من المشاركات بخصوص البرنامج المطلوب بالغرض الوصول الى الشكل النهائي له .

مع رجــــــــائي مشاركة كل من قرأ الموضوع .

OK

تحيـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــاتي

للتواصل

hazemxp@yahoo.com

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…