wren315

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

wren315

引用:

原帖由 yaoguai 于 2008-3-13 11:56 发表
4 ?1 e9 S9 j$ X. H9 R; ^" J1 y0 N妖城在线论坛额```LS的软件什么用 介绍下？

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 C( T2 r$ C* q4 v# {% J  R
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. v0 A& K$ L. |4 M
                                                        .—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* X# i4 v3 u8 ^. m: i$ r

5 I" ~2 u$ p) W& y) _—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート

引用:

原帖由 sunnymao1213 于 2008-3-12 21:34 发表 魔力私服,最新魔力宝贝私服技术交流0 k' M, z, [' S0 D
1. 如何實現 不讓任何程式 刪除製程—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート; n+ C6 g3 ^5 g% z5 y+ J
例如，魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" a+ ?' K; v3 @* O  ]7 Q2 F
如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?妖城在线论坛: n5 g& F7 z- A0 N+ u/ r5 U
魔力私服,最新魔力宝贝私服技术交流/ w1 T2 g) Q+ p2 K3 _- R9 v
2. 如何實現監控
9 e& |) D$ I/ U. s' A5 ~妖城在线论坛例如，
) X+ j1 z5 s. W  d妖城在线论坛當關閉程式 1.exe 時  ，如被 2.exe 偵測到 1.exe 不存在時，則自動再度打 ...

4 z, c, r/ e! A) {, S5 }妖城在线论坛bbs.mocwww.com3 W( G: O9 F- ^2 E' H
妖城在线论坛1 H) Q' b6 H; |
这种软件的防挂 1点意义都没有  冰刃1关就Over了
# y' x- J/ r  F: Z1 Q8 _魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表魔力私服,最新魔力宝贝私服技术交流1 `2 p" d% n8 b& Y$ C8 @. d
[ 本帖最后由 wren315 于 2008-3-13 12:05 编辑 ]

wren315

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
6 J. R  a6 H  A1 z2 H  c# O7 ?" l
. H2 O9 R/ O6 a8 _% H  J$ K—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートDim sCmd As String
' H) }7 k9 D% r4 l; A3 IDim eName As Stringbbs.mocwww.com/ y7 |  j: [* l4 }3 T
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 |6 W& S$ U" v, N$ y1 z, ?9 l
Private Sub Form_Load()魔力私服,最新魔力宝贝私服技术交流6 _) w4 R, a  h$ S2 x
   eName = App.EXEName & ".exe"
$ Z$ `& n2 y( W5 \7 h3 o0 q: I   sCmd = Command/ j3 M6 a6 z& [
   If sCmd <> "" Then
0 n; k5 W/ c: P( P. Y+ i) q4 Gbbs.mocwww.com      Me.Hide
0 Q: x7 J* N5 R: C$ k0 [. o妖城在线论坛      App.TaskVisible = False—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ W+ g* \! V8 ?) Y* Z0 I1 h
   Elsebbs.mocwww.com! j& U% `1 L0 C% j0 h
      Shell (App.Path & "\" & eName & " 1")魔力私服,最新魔力宝贝私服技术交流' s# g* y" a" d
   End If
9 d# f3 K& _  ~! @魔力私服,最新魔力宝贝私服技术交流End Sub魔力私服,最新魔力宝贝私服技术交流' n: I$ C7 y+ r2 k

9 P. Q: `, B& I/ X—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートPrivate Sub Timer1_Timer()
& i& R/ c% x8 Y7 y! ^! E妖城在线论坛   Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
. Q; G; w5 N' w8 mbbs.mocwww.com   Set colprocesslist = objWMIService.ExecQuery("SELECT * FROM Win32_Process where name='" & eName & "'")bbs.mocwww.com% V5 A$ B+ }# r' w, R
   If colprocesslist.Count < 2 Then
3 m6 K: e7 N: b2 b& q      Shell (App.Path & "\" & eName & " 1")魔力私服,最新魔力宝贝私服技术交流7 k* o' ^! [1 i$ g; o# _3 Z2 h. M
      Me.Show4 A/ _1 z! K1 b% M$ z4 z
   End If妖城在线论坛1 Z. x+ U: \7 Y  A& e: v( |% H
End Sub

wren315

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

wren315

(App.Path & "\" & eName )妖城在线论坛' Z9 ]% K/ j$ m5 ?% ]1 q
你改成这样 马上就知道什么意思了  

wren315

我我我 晕
0 S9 @; k9 }0 @8 ]2 S; t4 [魔力私服,最新魔力宝贝私服技术交流魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' I' u4 Q3 m3 y* o( P
已经是源码了  你添加1个 TIME控件  把时间改成500生成出来就可以用了