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

أيقاف عمل Ctrl + Alt + Delet

مغلق
بدأه بدر2009 في 16 أكتوبر 2006 · 20 رد · 1,695 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

اريد كود لـ أيقاف عمل Ctrl + Alt + Delet

بحثت بالمنتدى ولكن لم أجد شيء

استخدم فجول بيسك 2005

ياليت تساعدوني ابها ضروري

#2

يمكن عمل Disable للـ Task Manager عن طريق وضع القيمة التالية في الـ Registry

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system]
"DisableTaskMgr"=dword:00000000
#3

يعطيك العافيه

هل يوجد طريقة ثانية بدون أضافة قيه في Registry ؟؟

وثاني شي

أين اضع هذا الكود في البنامج ؟؟

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system]
"DisableTaskMgr"=dword:00000000

تم تعديل هذه المشاركة بواسطة بدر2009 في 16 أكتوبر 2006 في 20:59

#4
اقتباس
أين اضع هذا الكود في البنامج ؟؟

ريح دماغك واشتغل بالداله دي وربنا يكرمك ,

Dim _Key As Microsoft.Win32.RegistryKey
	Public Sub DisableTaskManager(ByVal Value As Boolean)
		Try
			If Value = True Then
				_Key = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\system", True)
				_Key.SetValue("DisableTaskMgr", 1)
				_Key.Close()
			Else
				_Key = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\system", True)
				_Key.SetValue("DisableTaskMgr", 0)
				_Key.Close()
			End If
		Catch ex As NullReferenceException
			_Key = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies", True)
			_Key.CreateSubKey("system")
			_Key.SetValue("DisableTaskMgr", 1)
			_Key.Close()
		End Try
	End Sub
#6

ممكن مثال :D

#8
اقتباس
ممكن مثال

حااااااازم .... هوا فيه ايه :blink:

It's hard to stay in such ridiculous situation

#9

:^)

#10

ايقافها من الريجستري فكره فاشله

#11
اقتباس
ايقافها من الريجستري فكره فاشله

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

------------------

بدر2009

أخي أعطال حازم الكود جاهز لا عليك إلا وضعه في برنامجك لماذا المثال ؟!

لكن تفضل

Dis.rar

تم تعديل هذه المشاركة بواسطة MiCcSoft في 18 أكتوبر 2006 في 10:39

#12

فشلها أقصد فيه

النظام راح يعطي مسج للعمليه والمستخدم ممكن يعيد الوضع بسهوله

#13
اقتباس
النظام راح يعطي مسج للعمليه والمستخدم ممكن يعيد الوضع بسهوله

أولا كلامك أنا مقتنع بيه , ثانيا هل عندك فكره أفضل ؟ , ثالثا انت مش واخد بالك اذا كان المبرمج اللي مفروض انه يتعامل مع الريسجتري برمجيا ميعرفش حاجه في أي حاجه , قم المستخدم هيعرف يعدل فيه , صباح الخير أنت تكلم المستخدم العربي :D

#14
اقتباس
صباح الخير أنت تكلم المستخدم العربي

:D

مش للدرجه هذي المستخدم مايفهم <_<

Lock Windows Desktop

winlock_source.zip

#15
اقتباس
مش للدرجه هذي المستخدم مايفهم

بالعكس لهذه الدرجه وأكثر والدليل هذا الموضوع :D

بس حلوة المرفقات شكرا جزيلا :D

تم تعديل هذه المشاركة بواسطة hazzoom في 18 أكتوبر 2006 في 19:57

#16

جزك الله خير

انا وضعت الكود بس ماعرفت كيف تعطيله وا تشغيله

لم اكن عرف هذا الكود

DisableTaskManager(False)

يسلمووو

تم تعديل هذه المشاركة بواسطة بدر2009 في 18 أكتوبر 2006 في 23:00

#17

أخي xc-delphi-cx شوف الكود المكتوب في C++ !!!!

int DLL_EXP_IMP WINAPI TaskManager_Enable_Disable(BOOL bEnableDisable)
{
	#define KEY_DISABLETASKMGR  "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System"
	#define VAL_DISABLETASKMGR  "DisableTaskMgr"

	HKEY	hKey;
	DWORD   val;
	LONG	r;

	if (RegOpenKey(HKEY_CURRENT_USER, KEY_DISABLETASKMGR, &hKey) != ERROR_SUCCESS)
		if (RegCreateKey(HKEY_CURRENT_USER, KEY_DISABLETASKMGR, &hKey) != ERROR_SUCCESS)
			return 0;

	if (bEnableDisable) // Enable
	{
		r = RegDeleteValue(hKey, VAL_DISABLETASKMGR);
	}
	else				// Disable
	{
		val = 1;
		r = RegSetValueEx(hKey, VAL_DISABLETASKMGR, 0, REG_DWORD, (BYTE *)&val, sizeof(val));
	}

	RegCloseKey(hKey);

	return (r == ERROR_SUCCESS ? 1 : 0);
}

وهي دالة لتعطيل Taskmgr لكن بإستخدام ل Registry !!!!!!!!!!!!!! إذا لا فائدة !

تم تعديل هذه المشاركة بواسطة MiCcSoft في 19 أكتوبر 2006 في 01:25

#18

المطلوب في الموضوع أيقاف عمل Ctrl + Alt + Del

مش للـ Taskmgr في أكثر من طريقه لظهور Taskmgr مش فقط الضغط على CAD

تم تعديل هذه المشاركة بواسطة xc-delphi-cx في 19 أكتوبر 2006 في 19:48

#19
بدر2009 كتب:
جزك الله خير

انا وضعت الكود بس ماعرفت كيف تعطيله وا تشغيله

لم اكن عرف هذا الكود

DisableTaskManager(False)

يسلمووو

يا سيدي الفاضل أولا أتمني انك متكونش زعلان لما آل اليه الموضوع وأتمني انك تستفيد منه , ثانيا الداله التي كتبتها تأخذ قيمة من النوع Boolean فعندما تعطيها القيمة True فانها تقوم بوضع القيمة 1 في المسار المحدد في الريجستري لعمل المطلوب وعندما تعطيها القيمة False فانها فانها تضع القيمة 0 في المسار هذا ان كنت تريد عكس المطلوب , وفي حالة حدوث Null Reference Exception لعدم وجود المفتاح في الريجستري فانها تقوم بانشاء المفتاح ووضع القيمة وأي خدمه يا عم بدر ,,,

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

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