wren315

不知道楼主要的是不是这样的软件?

wren315

引用:

原帖由 yaoguai 于 2008-3-13 11:56 发表
' n# q) l6 D7 I) L1 K2 K额```LS的软件什么用 介绍下？

$ J9 H- x2 h- F* o* c
魔力私服,最新魔力宝贝私服技术交流4 {/ v$ G7 Y: k0 t
                                                        .
' V$ X2 \) q9 u" ?& z—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
# M4 W3 ~) q+ T) A* V: f

引用:

原帖由 sunnymao1213 于 2008-3-12 21:34 发表
0 I5 j# y9 V$ q! O妖城在线论坛1. 如何實現 不讓任何程式 刪除製程—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' P# g0 d& o/ ^, S" [( a4 o( {! E
例如，
. S% C# ^+ Z  v6 l+ Z6 N魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?
: ?$ {1 m( c; s" S9 S# D—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
! k: s3 U& E6 o  E' {" ^3 h" Hbbs.mocwww.com2. 如何實現監控
" k- {& f" O+ f# u* S; @5 }妖城在线论坛例如，魔力私服,最新魔力宝贝私服技术交流5 b7 g+ M8 o8 Q. o0 z4 W) z$ R
當關閉程式 1.exe 時  ，如被 2.exe 偵測到 1.exe 不存在時，則自動再度打 ...

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; H0 Y+ K* Q' J8 z9 X

, e5 }# D, N' {5 q: nbbs.mocwww.com—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( ^) A' r! E5 Y' v+ j* [
这种软件的防挂 1点意义都没有  冰刃1关就Over了魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' M  H' x; L+ K" }

3 Q4 O6 j2 r" e1 O. [# s5 v魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表[ 本帖最后由 wren315 于 2008-3-13 12:05 编辑 ]

wren315

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
3 o4 G* g' [+ ]. x& b魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 N! b/ S! }$ S' s" V4 b3 E
Dim sCmd As String
0 H& E) j  ~/ A+ j5 V' \Dim eName As String5 D& R4 l) w7 s2 A

# V4 r& h! i1 ^+ b- [% O魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表Private Sub Form_Load()
- c8 `: b9 o  v& y魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   eName = App.EXEName & ".exe"
2 P2 U5 @( ]. Z# b2 s魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   sCmd = Command妖城在线论坛! Y. B' ~# \1 y1 w% I  s( @
   If sCmd <> "" Then
5 x- i0 ~1 e( w5 _' g; D0 pbbs.mocwww.com      Me.Hide妖城在线论坛; H0 D( n* u( [8 P* F( L* @
      App.TaskVisible = False
, X8 h# r/ @" E+ g6 i妖城在线论坛   Else魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 a$ `" i$ Y  ]% i! h8 J/ v7 P5 i
      Shell (App.Path & "\" & eName & " 1")
9 S8 }6 w6 O5 e$ ?% C& ?   End If
3 q, x6 _: v1 V: \% I* l& s3 f魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表End Subbbs.mocwww.com2 n8 W& s. i0 W# L& L3 O
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& Y8 S' X0 r4 Y, y" }
Private Sub Timer1_Timer()
3 K4 s3 k8 p3 i9 M3 S) O7 g   Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
9 A! F/ n8 k8 \. K+ q$ C6 `魔力私服,最新魔力宝贝私服技术交流   Set colprocesslist = objWMIService.ExecQuery("SELECT * FROM Win32_Process where name='" & eName & "'")魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# _* o- h1 k. }1 D; O' j
   If colprocesslist.Count < 2 Then
& y) |! N" `# Y0 Sbbs.mocwww.com      Shell (App.Path & "\" & eName & " 1")
5 n- I# ~7 d: l5 {0 g3 n; a! a—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート      Me.Show
. p6 Y1 \+ [8 Y& F: n) M/ _魔力私服,最新魔力宝贝私服技术交流   End If
: r4 I# t0 q" V! y4 \$ p4 \4 n魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表End Sub

wren315

没什么意义来的  冰刃1下就搞死了

wren315

(App.Path & "\" & eName )
" S" {: A" l/ ~) b6 wbbs.mocwww.com你改成这样 马上就知道什么意思了  

wren315

我我我 晕魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( u# o  H* T6 j' t; ~9 l5 ?: G3 F

0 O. m& [+ W  I! |8 ^0 ^, W已经是源码了  你添加1个 TIME控件  把时间改成500生成出来就可以用了