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

اريد اغلاق الوندوز (الجهاز)

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

انا اريد اغلاق الجهاز

شفت كود لعمل restart لكن احتاج لاغلاقه

انظروا هل هذا الكود هو المطلوب :

Public Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long)

Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4

Public Sub ExitWindows(bytCloseType As Byte)
  If ExitWindowsEx(bytCloseType, 0) = 0 Then
	' Insert Error handling code here
  Else
	End
  End If
End Sub

جربته لكن لم ارى شيئا يحدث

startingprogremmer.jpg
#2

سيعمل على الـ Win9X أما الأنظمة المعتمدة على الـ NT فلأ علشان الـ Privilege .

راجع : حالة النظام

#3

مشكوور اخي على الرجوع الى المنتدى

لم اجد الحل

startingprogremmer.jpg
#4

شفت الرابط بتاعى !

#5

شفته

والكود وضعته في موديول

لكن لم اجد حل

سؤال :

هل يمكنني اغلاقه بواسطة send key

startingprogremmer.jpg
#6

اخي الكريم

ارجوا عمل بحث في المنتدي اولا قبل طرح الموضوع

و الكود المطلوب بالمرفقات

shutdown.zip

تم تعديل هذه المشاركة بواسطة جمال علي في 12 يوليو 2007 في 20:02

#7

اخي جمال علي

هل ادمج كودك مع كود الاخ محمد السيد ؟

startingprogremmer.jpg
#8

مشكووور اخي جمال علي

واسف على السؤال لاني لم ارى المرفق بل رايت الكود

والان لم ارى الكود بل المرفق

يبدو بانك حررت المشاركة

startingprogremmer.jpg
#9
اقتباس
والكود وضعته في موديول
وضعته و خلاص , مش لازم تشوف الدوال اللى فيه و تناديها.
#10

بس وضعته

سويت run للبرنامج لم يغلق الجهاز

بالنسبة لمثال الاخ جمال علي فقد عمل معي

هذا الكود :

shell "shutdown -s -t 0"
startingprogremmer.jpg
#11
اقتباس
بس وضعته

سويت run للبرنامج لم يغلق الجهاز

للمرة التانية هل مجرد وضع Module بالبرنامج هينفذ حاجة منه لوحده بدون نداء الوظائف اللى فيه ؟!
#12

انا اريد اسالك

ما هو الكود لنداء الوظائف :)

هناك شيء يحزنني

عندما يريد اغلاق الجهاز

والفوتوشوب مفتوح يطلع لي (حفظ العمل) و ما يغلق الجهاز

يعني الفوتوشوب يبقى مفتوح و لا يغلق الجهاز

startingprogremmer.jpg
#13

اما عندما اريد انهاء svchost من تاسك منجر يطلع لي عداد ليعمل ريستارت للكمبيوتر

انا اريد عداد كذا بس لاغلاق الكمبيوتر

startingprogremmer.jpg
#14

اريد حل لاغلاق الجهاز وحتى لو كان الفوتوشوب مفتوح

او اي برنامج عند اغلاقه يطلع مسج بوكس

startingprogremmer.jpg
#15
مبرمج مبتدا كتب:
انا اريد اسالك

ما هو الكود لنداء الوظائف :)

أخبط راسى فى الحيط ؟!

أنتحر يعنى ؟!

هو أنت مش شغال VB برده , اللى هو ليه IDE و منها نافذة كود , و تقدر تقرأ الكود , مش بس كده فيها كمان Combo box لكل نافذة كود فيه الوظائف و الخصائص و خلافة ؟!

post-92969-1184324340_thumb.jpg

نادى الوظيفة اللى أسمها SetPowerState , و علشان حتة الفوتوشوب دى خللى Forced على True

:angry: :angry: :angry: :angry:

#16

مشكوووووور اخي محمد السيد

هل هذا الكود من صنعك ؟؟

بصراحة جان زين اعرف بروحي اكتبه

على العموم تعبتك و اذا كان واحد مثلي ما يفهم لا تطق راسك في الحيط بس قوله

اكتب :

setpowerstate shutdown , true
startingprogremmer.jpg
#17

الكود الأصلى بواسطة الـ KPD Team أنا عدلت عليه و أضفت وظيفة PowerStateAllowed و غيرت وظيفة IsNT و كتبت الوظيفة الأساسية SetPowerState بطريقة أسهل.

أعتذر عن ردى السابق , بس أنت غيظتنى شويتين تلاتة أربعة :P ............................. :lol:

#18

على العموم مشكور اخي

اقتباس
أعتذر عن ردى السابق , بس أنت غيظتنى

وليش تعتذر ؟؟ انت هتخبط راسك فالجدار انا ما بعورني راسي ;)

تم تعديل هذه المشاركة بواسطة مبرمج مبتدا في 14 يوليو 2007 في 23:21

startingprogremmer.jpg

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

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