Board logo

标题: [提问] 問問VB的問題 [打印本页]

作者: sunnymao1213    时间: 2008-3-12 21:34     标题: 問問VB的問題

1. 如何實現 不讓任何程式 刪除製程魔力私服,最新魔力宝贝私服技术交流5 W8 p+ C4 h0 N! r2 j
例如,
$ P3 V! X7 T" ?  s, h( g—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' e$ B: J* N* t# f- E7 e

1 \& u/ s  O8 p$ g2 _4 N2. 如何實現監控
4 \& o2 g4 ?" K7 x魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表例如,魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; d. Y9 V6 u; A$ ?
當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打開 1.exe妖城在线论坛& S1 \. R  Q  |  l/ h& y2 e9 q
當關閉程式 2.exe 時  ,如被 1.exe 偵測到 2.exe 不存在時,則自動再度打開 2.exe
作者: nijiechao    时间: 2008-3-12 22:15

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

曾经好玩编译了这样一个程式...—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 d0 w* C/ Z' m8 T; _* n
bbs.mocwww.com" ~+ y% ?& l8 R# ~5 W3 j% N6 X7 Z
當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打開 1.exe—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 O! L1 w$ P* Y
當關閉程式 2.exe 時  ,如被 1.exe 偵測到 2.exe 不存在時,則自動再度打開 2.exe
( n' |) q4 n4 f1 k( t! ~- \當關閉程式 1.2.exe 時  ,如被 3.exe 偵測到 1.2.exe 不存在時,則自動再度打開 1.2.exe
  ?. u9 h2 F2 X/ _, A5 S
" `9 q( R# F8 V# `, y; x* w( r妖城在线论坛一共做了4个玩....巨强大=  =
' t4 a0 i: b# I3 c妖城在线论坛bbs.mocwww.com" J3 T) ^/ R4 M* C* b- P
发给朋友恶作剧用的...
作者: wren315    时间: 2008-3-13 11:48

不知道楼主要的是不是这样的软件?
作者: yaoguai    时间: 2008-3-13 11:56

额```LS的软件什么用 介绍下?
作者: wren315    时间: 2008-3-13 12:00

引用:
原帖由 yaoguai 于 2008-3-13 11:56 发表 —魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 \- M4 ~3 u1 [/ i  I
额```LS的软件什么用 介绍下?
bbs.mocwww.com: v  H" v) [# s% k
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 z0 I0 Z$ Q! ?/ z% E
                                                        .
" B0 B! I+ e& S# n# J
, n  H* e, f% D* s' X5 Y+ f# {- v
引用:
原帖由 sunnymao1213 于 2008-3-12 21:34 发表
: k5 A, N, D+ y$ z魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1. 如何實現 不讓任何程式 刪除製程bbs.mocwww.com9 ]$ h9 k4 P/ a8 |
例如,
9 e) d; L) `. ?2 T1 D- d—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート如何不讓 processxp 或 windows 工作管理員 等工具 強迫刪除呢?bbs.mocwww.com5 C) T/ E6 U1 f, G  t  l5 ?

7 p3 K8 a" N# r) U, ~7 K/ O: E  Q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2. 如何實現監控
( B- v2 L- I& {* t4 t1 \$ V* F% \魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表例如,妖城在线论坛; R4 u9 ~7 h) T8 J
當關閉程式 1.exe 時  ,如被 2.exe 偵測到 1.exe 不存在時,則自動再度打 ...
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" L3 r* j: D6 ~* W6 P2 ?+ M
魔力私服,最新魔力宝贝私服技术交流" O: g& \+ P5 J$ o9 b* S$ M

- k" u! W/ l9 x4 Q魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表这种软件的防挂 1点意义都没有  冰刃1关就Over了
$ L# P2 W  ~* w: [3 }* }—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
+ O) ?3 H) Z7 U( ~2 _0 j魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表[ 本帖最后由 wren315 于 2008-3-13 12:05 编辑 ]
作者: sunnymao1213    时间: 2008-3-13 13:46

对@@" 就是这个!!
( a5 K) w$ q2 T* v- h9 k—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- S2 K6 I: ?5 g0 L& P) ^
你可以放出 原始码 给我参考吗@@?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# B$ X' v# y, c, y. b
bbs.mocwww.com# z# f9 l9 R& k
我就是想要你放上来的这样的程式
作者: thegod12    时间: 2008-3-15 07:31

我用e做的登陆器就这样`2个运行才1%-5%cpu但是随便下个能暂停进程的就搞定了。。。
作者: xuyaoxy    时间: 2008-3-15 09:50

1.exe运行时候释放出2.exe并运行....妖城在线论坛3 v) j) d/ j' w
怎么感觉象是写病毒啊.- -...
作者: nijiechao    时间: 2008-3-15 11:31

改掉进程名也没用的....就算是写病毒..也很无聊
作者: wren315    时间: 2008-3-16 12:41

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Longbbs.mocwww.com! a2 \, x, K1 K1 W7 ^, l
/ o! p1 g6 B, X! T. s8 I
Dim sCmd As String
, A% F: L3 I, |妖城在线论坛Dim eName As Stringbbs.mocwww.com- |3 ~8 O: K" E
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 Q, M% E1 l' @. [; V- W- P  ~
Private Sub Form_Load()
* j2 J2 }* r( n—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート   eName = App.EXEName & ".exe"魔力私服,最新魔力宝贝私服技术交流8 ~  l2 g4 F) r! F! m* g: T/ B% [
   sCmd = Command
8 F- v. f5 O- \0 v! {* t魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   If sCmd <> "" Then
' u5 H+ F9 t# s4 L: w. g魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表      Me.Hide
/ T$ c0 {* _+ n/ K. G, V0 ?2 m魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表      App.TaskVisible = False妖城在线论坛1 U- f# U& x  @  X
   Else妖城在线论坛" T! l. R& D: @
      Shell (App.Path & "\" & eName & " 1")
( k. u) L# v" Z4 F8 g  @# {bbs.mocwww.com   End If
& k) x* F4 X4 E; h% V# }: G) r2 _- ubbs.mocwww.comEnd Sub妖城在线论坛3 A* e, K( i0 r- @8 h* f
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 q+ w. _# ]  h
Private Sub Timer1_Timer()—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ ]( i4 ]. g2 O5 L, w6 ~
   Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
) Y$ c( c5 T4 v5 ^—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート   Set colprocesslist = objWMIService.ExecQuery("SELECT * FROM Win32_Process where name='" & eName & "'")
9 f$ |' k3 q$ a0 J2 a+ I% Z魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表   If colprocesslist.Count < 2 Then
, ]' \9 F" z5 K6 W! g& Q+ W6 A5 K魔力私服,最新魔力宝贝私服技术交流      Shell (App.Path & "\" & eName & " 1")
' C) ]! ]! \* b+ A. C& C9 `妖城在线论坛      Me.Show妖城在线论坛4 R. }, T* B! w; M
   End If妖城在线论坛8 l* b; }* {8 u, G+ x! d
End Sub
作者: wren315    时间: 2008-3-16 12:42

没什么意义来的  冰刃1下就搞死了
作者: sunnymao1213    时间: 2008-3-16 13:05

真的很感謝,—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ C: A5 k) a+ {) P- r: e
冰刃一下子搞死 可是對我來說已經很重要了
) [2 o4 N3 j7 X( y* F妖城在线论坛很感謝^^5 y6 t4 U  S7 J3 L2 r

4 j. i5 r! V' f, m2 Y9 G+ e- \) s
作者: sunnymao1213    时间: 2008-3-16 13:14

DEBUG 問題
5 p. m' I/ D) H. @- h6 {! `bbs.mocwww.com(App.Path & "\" & eName & " 1")8 m7 m6 w1 A  I# N& W4 C7 o4 W7 @
bbs.mocwww.com% d2 D5 q7 Y/ n- j0 H' s: D/ y
" 1" 代表什麼呢??
作者: wren315    时间: 2008-3-16 13:49

(App.Path & "\" & eName )
1 j. g$ w' Z, b( {, P魔力私服,最新魔力宝贝私服技术交流你改成这样 马上就知道什么意思了  
作者: sunnymao1213    时间: 2008-3-16 14:34

我還是搞不出來
3 E! a/ V# u& K6 v) J# k$ Y# qbbs.mocwww.com你可以放出原始碼讓我下載嗎
# I+ S5 J( w& [魔力私服,最新魔力宝贝私服技术交流
+ r  r+ X. d  F8 e+ W4 Wbbs.mocwww.com
作者: wren315    时间: 2008-3-16 15:18

我我我 晕魔力私服,最新魔力宝贝私服技术交流& \# w. l7 U2 T" I6 {/ G. K
) i+ \( O) R1 N, r
已经是源码了  你添加1个 TIME控件  把时间改成500生成出来就可以用了




欢迎光临 妖城在线论坛 (http://bbs.mocwww.com/) Powered by Discuz! 6.0.0