17 12
发新话题
打印

[提问] 問問VB的問題

問問VB的問題

1. 如何實現 不讓任何程式 刪除製程
6 I0 ?# f+ Z' Ibbs.mocwww.com例如,
6 c7 m0 ?& k- J  g1 [如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?
6 k' U8 o2 F+ U' L. o6 T—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- ]* e7 W/ I5 ]( Z, ?' B9 c
2. 如何實現監控—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 w  \  E" `6 O* J/ Y( a6 l
例如,bbs.mocwww.com3 ?2 i5 j" Q" J: B6 i
當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打開 1.exe妖城在线论坛" u+ X1 T/ V6 ]. K: k& e' `1 Z
當關閉程式 2.exe 時  ,如被 1.exe 偵測到 2.exe 不存在時,則自動再度打開 2.exe

TOP

这个方法我试过..由于需要用到API函数来时刻检测系统内1.exe或者2.exe的进程..所以占用CPU必定100%..无论是多牛X的机器..必定是这样的.....AMD5000+2GB内存照样100%CPU..

TOP

曾经好玩编译了这样一个程式...
4 a6 D5 ]: V7 z( C& @- {* r* z( X6 m8 l魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
1 {' u. ?" r3 b, d0 }當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打開 1.exe
+ M" r6 d, u" H! _8 Y—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート當關閉程式 2.exe 時  ,如被 1.exe 偵測到 2.exe 不存在時,則自動再度打開 2.exe
/ ]1 x8 u5 y  A4 _" hbbs.mocwww.com當關閉程式 1.2.exe 時  ,如被 3.exe 偵測到 1.2.exe 不存在時,則自動再度打開 1.2.exe—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) {& j% j+ a7 u- k$ H; V
妖城在线论坛6 S/ s& W1 k5 r8 M  E
一共做了4个玩....巨强大=  =
  k) s3 @9 x$ |魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
& v3 G* ]- M- j& J妖城在线论坛发给朋友恶作剧用的...

TOP

不知道楼主要的是不是这样的软件?
售反挂登录器:(反外挂,反掉线,防卡服,防复制,内挂.防重名 防刷屏  .QQ:285651407

TOP

额```LS的软件什么用 介绍下?

TOP

引用:
原帖由 yaoguai 于 2008-3-13 11:56 发表 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* f' n9 M- s1 K; `6 m
额```LS的软件什么用 介绍下?
9 `3 m) Y8 ~. R1 H( cbbs.mocwww.com5 Y$ w& A* `0 n2 ?9 _
                                                        .
8 t  z8 z/ z+ d# l魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
9 V. l6 Z. R6 w0 j: v6 H1 x# M  D—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
引用:
原帖由 sunnymao1213 于 2008-3-12 21:34 发表 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 p: M$ ]' L( Q& z
1. 如何實現 不讓任何程式 刪除製程
6 e9 I8 u+ }+ j4 q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート例如,
+ K: f$ `4 \& f& g2 n; Z- k7 V魔力私服,最新魔力宝贝私服技术交流如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?
) g* \$ d9 T" v- o- y7 p2 J—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
1 \3 L3 d) f- ?7 @魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2. 如何實現監控
0 T4 a: C3 o/ N0 ]4 N3 _% Tbbs.mocwww.com例如,
( }- U, v: W; K" {+ J' C( A- P6 |bbs.mocwww.com當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打 ...
' K2 O! E6 R6 F  e, }$ I6 ~# N魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
" F1 d. u/ k# C: Y( [. m5 |/ w" A1 A% k3 R# d
这种软件的防挂 1点意义都没有  冰刃1关就Over了魔力私服,最新魔力宝贝私服技术交流( m  b& I4 J# _% ^% g

2 C. [9 v4 R' m) e" H7 }2 D1 Y3 S—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート[ 本帖最后由 wren315 于 2008-3-13 12:05 编辑 ]
售反挂登录器:(反外挂,反掉线,防卡服,防复制,内挂.防重名 防刷屏  .QQ:285651407

TOP

对@@" 就是这个!!bbs.mocwww.com3 C- O" \% _: P. T8 u: o

* J9 e5 j" N; v. W% u. _# H魔力私服,最新魔力宝贝私服技术交流你可以放出 原始码 给我参考吗@@?
. _" V7 ?, J! h) o: w7 B$ ~魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
' \. E( ^9 t" Q* U( [妖城在线论坛我就是想要你放上来的这样的程式

TOP

我用e做的登陆器就这样`2个运行才1%-5%cpu但是随便下个能暂停进程的就搞定了。。。

TOP

1.exe运行时候释放出2.exe并运行....
- F) J3 c/ k3 D( s4 f—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート怎么感觉象是写病毒啊.- -...

2007年10月6日至今已过去十三个春夏秋冬,感谢妖友的一路陪伴!
2020年6月12日 By.xuyaoxy

TOP

改掉进程名也没用的....就算是写病毒..也很无聊

TOP

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
0 E+ G6 |- e6 w; G—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
6 `% W6 v5 z- [; C/ O+ P# }  a0 o魔力私服,最新魔力宝贝私服技术交流Dim sCmd As Stringbbs.mocwww.com( h4 B: f3 w+ n' \. Y/ @/ I* p4 N
Dim eName As String妖城在线论坛, q  }5 @% c5 Y, U- n

9 [; D; v  I& ?5 Z' @  b- G  B6 l魔力私服,最新魔力宝贝私服技术交流Private Sub Form_Load()bbs.mocwww.com7 h& d$ ~! m, a) u
   eName = App.EXEName & ".exe"—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. [1 O0 e  }& r7 v
   sCmd = Command
! u, [+ o5 x; k% D2 |/ I: t; r魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   If sCmd <> "" Then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ T( s# [, r) l: t- o) x
      Me.Hide魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* D- @" R  ~# e; [4 x
      App.TaskVisible = False
* F+ X4 }# L6 W魔力私服,最新魔力宝贝私服技术交流   Elsebbs.mocwww.com4 @- Q1 z1 L; Q3 C- D& A
      Shell (App.Path & "\" & eName & " 1")
9 V5 r7 x6 x1 n2 p3 L魔力私服,最新魔力宝贝私服技术交流   End If
2 a8 A# w( [  |—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートEnd Sub—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# l$ b; m$ m1 t3 J
. e# U3 [* n5 y2 U* l
Private Sub Timer1_Timer()
4 I4 \$ G1 ?+ q1 ]  D魔力私服,最新魔力宝贝私服技术交流   Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
  _( C& N* A3 L6 T魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   Set colprocesslist = objWMIService.ExecQuery("SELECT * FROM Win32_Process where name='" & eName & "'")
8 {. T, p% S* Z: A' {+ N8 ]bbs.mocwww.com   If colprocesslist.Count < 2 Then
5 X$ ?' v+ [3 E" w—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート      Shell (App.Path & "\" & eName & " 1")/ P6 e% v6 ~5 G( `6 |1 T: \
      Me.Show
3 e! t% U6 [# d5 \6 S# L! v8 ?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   End If
5 W$ b! R9 F5 S3 i' w0 {: [bbs.mocwww.comEnd Sub
售反挂登录器:(反外挂,反掉线,防卡服,防复制,内挂.防重名 防刷屏  .QQ:285651407

TOP

没什么意义来的  冰刃1下就搞死了
售反挂登录器:(反外挂,反掉线,防卡服,防复制,内挂.防重名 防刷屏  .QQ:285651407

TOP

真的很感謝,妖城在线论坛/ {9 A. {9 ~" ^8 L' C+ M
冰刃一下子搞死 可是對我來說已經很重要了—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) ?( F7 ~: {( o, A. }
很感謝^^
; M5 i; c! g3 R—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 O& F; M" L) W4 X) w) ?5 [

TOP

DEBUG 問題
% ]  f, n! j. ]4 j: J; Cbbs.mocwww.com(App.Path & "\" & eName & " 1")
& C! N) \; @( h9 ?9 X+ e魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! i: U' B5 p* K8 ?2 y
" 1" 代表什麼呢??

TOP

(App.Path & "\" & eName )( n0 U; n& t& W5 n" }' A) l
你改成这样 马上就知道什么意思了  
售反挂登录器:(反外挂,反掉线,防卡服,防复制,内挂.防重名 防刷屏  .QQ:285651407

TOP

 17 12
发新话题