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

هل هناك طريقه لاخفاء البرنامج من task manger

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

اريد طريقه تعمل مع كل النوافز لاخفاء البرنامج من الtask manager بس تكون طريقه

متجربه

مع تحياتى..........لكم جميعا

#2
Option Explicit

Const RSP_SIMPLE_SERVICE = 1
Const RSP_UNREGISTER_SERVICE = 0

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

Public Enum EnumWindowsVersion
 wvWindows32 = 0
 wvWindows9x = 1
 wvWindowsNT = 2
End Enum

Private Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (lpVersionInformation As OSVERSIONINFO) As Long
Private Type OSVERSIONINFO
 dwOSVersionInfoSize As Long
 dwMajorVersion As Long
 dwMinorVersion As Long
 dwBuildNumber As Long
 dwPlatformId As Long
 szCSDVersion As String * 128
End Type

Public Sub HideApplication()
On Error Resume Next
Dim Ret As Long
Dim m_OSInfo As OSVERSIONINFO

m_OSInfo.dwOSVersionInfoSize = Len(m_OSInfo)
'Get the Windows version
Ret = GetVersionEx(m_OSInfo)

If Ret = wvWindows9x Then
   MakeMeService
ElseIf Ret = wvWindowsNT Then
   App.Title = ""
End If

End Sub

Private Sub MakeMeService()
On Error Resume Next
Dim PId As Long, regserv As Long
'Get the current process ID
PId = GetCurrentProcessId()
'Register as service
regserv = RegisterServiceProcess(PId, RSP_SIMPLE_SERVICE)
End Sub

للاستخدام اكتب

HideApplication

في اي جزء من الكود

Ali Sayed

#3

شكرا VODOO على الرد السريع و سوف اجرب هذة الطريقه

و إن شاء الله تنجح.

#4

voodo انا جربت الكود ووضعته فى وحده نمطيه و كتبت hid...... عند تحميل الفورم

ولكن الغريب ان لا شىء يحدث فاذا تستطيع اعطينى مثال اكثر و ضوح مع العلم انى اعمل على winxp

و شكرا لك....

#5

بمنتهى البساطه فى خصائص الفورم اجعل خاصية

show in task bar = false

#6

لقد قصد السائل task manager وليس task bar والأمر ليس بالبساطة كما ذكرت ..

لدي طريقة لإلغاء عمل ال task manager من أساسه في الويندوز إكس بي إذا كنت تريدها فانا مستعد لشرحها لك ..

ani.gif
#7

ياريت يا عبد الله تقوم بشرح الطريقه

#8

أهلاً بك أخي mrezzuz:

الطريقة تعتمد بالأساس على وضع حظر أو قيد على برنامج إدارة المهام task manager ويتم ذلك من خلال الريجستري:

فيما يلي سأشرح الطريقة نظرياً، ولعمل ذلك بالفيجول كل ما عليك هو تحويلها إلى كود:

--> افتح محرر التسجيل

--> اذهب إلى المسار التالي:

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System

في حال عدم وجود المفتاح الفرعي System قم بإنشائه

--> قم بإنشاء مدخل قيمة جديد من نوع DWORD وأعطه الاسم: DisableTaskMgr

--> اجعل قيمته تساوي (1)

بعد ذلك مباشرة لن تستطيع فتح إدارة المهام إلا إذا قمت بتغيير القيمة السابقة إلى صفر بدلاً من واحد ..

طبعاً الطريقة السابقة يمكن ترجمتها إلى كود بكل بساطة .. وأنا متأكد من قدرتك على عمل ذلك ..

ولكن لمن لا يجيد التعامل مع الريجستري بإمكانه الاستفادة من الرابط التالي والذي سيسهل عليه الكثير من العناء بهذا الخصوص:

http://www.al-ebda3.info/ib/index.php?showtopic=3081

تحياتي

وبانتظار آرائكم

ولكن لا تنسوا هذه الطريقة تعمل على ال XP فقط ..

ani.gif
#9

أخي العزيز عزوز ,

على حسب فهمي تريد أن يكون برنامج المصمم بالفجوال بيسك مختفي من التاسك منيجر هنا سطر واحد فقط يفعل لك ذلك و لكن هذا السطر يخفيه فقط من Application و ليس من ال Process إذا كان هذا ما تريد أي إخفاءه من التاسك منيجر ( Application ) فإليك الكوووود.

Private Sub Form_Load()

App.TaskVisible = False

End Sub

مع تحيات العضو الجديد

و شكرا

#10

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

طريقة أخفاء البرنامج من قائمة Applications الخاصة ب Task Manager هذه طريقة سهلة جدا وأعتقد أنكم ذكرتموها في الردود

السابقة وكمان عمل Disable For Task Manager أعتقد أنها أسهل بكثير من الأولي والتي ذكرها الأخ عبد الله فتحي

لكن المشكلة التي لا تأخذوها في أعتباركم هي كيفيه عمل تقيد علي العملية نفسها في تاب Process الموجود ضمن Task Manager

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

أعذروني للمداخلة أردت الإفادة لي ولكم

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

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