nijiechao

引用:

原帖由 。▂.Get.out 于 2008-5-18 16:32 发表 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# Q! H6 w# f9 n  F. ?' a, |! F2 i
是的..可以检测标题,..!!!
4 {( h% a" U: k8 i- H8 e魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 W5 o9 @1 x3 l) m0 m$ X
比如..青蛙的源码里有..
( ]8 i% `! K0 u9 M
# g. Y- b2 Z; B5 @! x. D妖城在线论坛魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' K  d+ e  x0 m) z! R
S1(0) = "魔力宝贝"               'S(0)-S1(4)这些是关闭程序后自动关闭的窗口名字
4 A0 n7 `$ [3 l2 ]- v+ U魔力私服,最新魔力宝贝私服技术交流S1(1) = "魔力宝贝 梦回魔力"2 z: V7 W+ L. X, n1 ^* \" Z6 `% i
S1(2) = "魔力宝贝 梦回魔力 [梦回魔力 ...

—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& w( C+ v2 O; T2 t- f
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 `2 W9 v% c: f9 M; W* k7 w/ e# o
0 S5 k9 S# {! D0 r# p( g/ N# b
少了声明......HOHO~..这个是检测标题的...看我的....
6 a' Y  G, {( {( I. Y/ j) W# Kbbs.mocwww.com—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* y4 o* y, d' {5 {) V( t

# B, l/ y) ]; z) \妖城在线论坛Dim objWMIService As Object妖城在线论坛. S  j# H; A5 S: D' {: Y
Dim colProcesslist As Object
3 c. c; u" k0 E0 t8 Zbbs.mocwww.comDim objProcess As Object—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! K6 c/ E- t' i+ A
Set objWMIService = CreateObject("winmgmts:{impersonationLevel=Impersonate}!root\cimv2")
: b9 m" U# B/ \8 a# E—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートSet colProcesslist = objWMIService.ExecQuery("select * from win32_process where name='ML.exe'")
# w& Q5 `& _* }—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートFor Each objProcess In colProcesslist魔力私服,最新魔力宝贝私服技术交流& l7 C; U& }: \5 o7 k
objProcess.Terminate妖城在线论坛, q' P/ K. a; j
Next妖城在线论坛: m& M0 z! D2 A8 b. M
End