进程结束还是被租号器检测
2020-09-19 04:30:42 · 浏览次数:0 来源:U租号网
怎么防止进程被结束
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function ProcessFirst Lib "kernel32" Alias "Process32First" (ByVal hSnapShot As Long, uProcess As PROCESSENTRY32) As Long
Private Declare Function ProcessNext Lib "kernel32" Alias "Process32Next" (ByVal hSnapShot As Long, uProcess As PROCESSENTRY32) As Long '
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Long, ByVal lpProcName As String) As Long
Private Const TH32CS_SNAPPROCESS = &H2
Private Const TH32CS_SNAPheaplist = &H1
Private Const TH32CS_SNAPthread = &H4
Private Const TH32CS_SNAPmodule = &H8
Private Const TH32CS_SNAPall = TH32CS_SNAPPROCESS + TH32CS_SNAPheaplist + TH32CS_SNAPthread + TH32CS_SNAPmodule
Private Const MAX_PATH As Integer = 260
Private Const PROCESS_ALL_ACCESS = &H100000 + &HF0000 + &HFFF
Private Type PROCESSENTRY32
dwSize As Long
cntUseage As Long
th32ProcessID As Long
th32ModuleID As Long
cntThreads As Long
pcPriClassBase As Long
swFlags As Long
szExeFile As String * 1024
End Type
Public Sub AntiKill()
On Error Resume Next
Dim MySnapHandle As Long
Dim hProcess As Long
Dim ProcessInfo As PROCESSENTRY32
Dim Addr As Long, hMod As Long
Dim ASM(0) As Byte
Dim sProcess As String
ASM(0) = &HC3 'retn
'Debug.Print Hex(Addr)
ProcessInfo.dwSize = Len(ProcessInfo)
If ProcessFirst(MySnapHandle, ProcessInfo) <> 0 Then
Do
sProcess = Left(LCase(ProcessInfo.szExeFile), InStr(ProcessInfo.szExeFile, ".") + 3)
If sProcess = "taskmgr.exe" Then
hProcess = OpenProcess(PROCESS_ALL_ACCESS, False, ProcessInfo.th32ProcessID)
'Debug.Print hProcess
'Debug.Print Err.LastDllError
CloseHandle hProcess
End If
Loop While ProcessNext(MySnapHandle, ProcessInfo) <> 0
End If
CloseHandle MySnapHandle
Err.Clear
End Sub
思路:
修改为&HC3(retn),使其直接返回,不执行,从而使进程不被结束。
任务管理器里的进程被结束掉了
你先看看能不能上网。如果不能上网查看一下网卡驱动或者IP协议这些弄好没。
如果能上网,只是没有图片就在浏览器的设置按钮里面选择Internet选项 然后点高级,看看里面媒体的选项 “图片”一项是不是没选。
还是不行的话用360卫士修复一下试一试、再不行就换个浏览器试试
怎么防止进程被结束PrivateDeclareFunctionCloseHandleLib"kernel32"(ByValhObjectAsLong)AsLon…
租号软件为什么检测到木马解释一下为什么软件里面会有木马么下载软件请到正规软件官网下载,也可以到各大应用商店中下载软件,请勿到陌生网址进行下载。若手机中存在木马或者病毒程序,请尝试按照以…
王者荣耀租号平台怎么出租王者荣耀租号平台号租出后到时间了一般怎么收回?王者荣耀是首款5V5英雄公平竞技手游,游戏模式多样,可以双排单排五排,单排上钻石的技术比车队上王者的技术高,想上王…