nijiechao

引用:

原帖由 。▂.Get.out 于 2008-5-18 16:32 发表 bbs.mocwww.com6 Q  J% o5 N9 a: o
是的..可以检测标题,..!!!—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 b: V  G1 S, C8 ]

) d4 a  @% I4 M: N—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート比如..青蛙的源码里有..魔力私服,最新魔力宝贝私服技术交流+ I4 X) f: ]  m  i8 z" C
+ ~0 m. t, _# ]/ [
妖城在线论坛% s9 \% o: f8 {$ z+ H; G7 H
S1(0) = "魔力宝贝"               'S(0)-S1(4)这些是关闭程序后自动关闭的窗口名字
2 F% \  c4 N0 a8 ]S1(1) = "魔力宝贝 梦回魔力"妖城在线论坛/ \4 J8 K+ o6 W* m8 z& r% [1 r- V
S1(2) = "魔力宝贝 梦回魔力 [梦回魔力 ...

魔力私服,最新魔力宝贝私服技术交流2 }, P8 j4 k" r/ n: c! U

' Y% @  x& e3 B* J! ]1 X, T! qbbs.mocwww.com妖城在线论坛7 }! _2 t! _6 U6 G
少了声明......HOHO~..这个是检测标题的...看我的....魔力私服,最新魔力宝贝私服技术交流; d4 w0 I' \! Q6 x. @

; k, ^$ e" Z! E0 i$ P4 O7 \8 ]妖城在线论坛  x: F# k  F0 i) l% q
Dim objWMIService As Object—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# I9 `: }1 N5 `) ]; p
Dim colProcesslist As Object
3 g: T, h0 A6 b- |4 g妖城在线论坛Dim objProcess As Object妖城在线论坛2 j" e4 V6 s4 q( @0 C
Set objWMIService = CreateObject("winmgmts:{impersonationLevel=Impersonate}!root\cimv2")
/ \! I0 O  \% h3 r; g魔力私服,最新魔力宝贝私服技术交流Set colProcesslist = objWMIService.ExecQuery("select * from win32_process where name='ML.exe'")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 J6 d, c6 j8 a! m4 ~3 M
For Each objProcess In colProcesslistbbs.mocwww.com6 E' S* A! Z- t: x6 g5 _8 C" C4 l
objProcess.Terminate
. ^; h: A2 B* q/ k. X3 K3 X魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表Next
* m& \7 X: K- @; B6 {5 O& S: A9 N' a4 ^End