²é¿´: 2555  |  »Ø¸´: 5
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

yhwsmile

½ð³æ (СÓÐÃûÆø)

[½»Á÷] ¡¾ÇóÖú¡¿ÔõôÈÃvb³ÌÐòÔËÐнáÊøºó×Ô¶¯Í˳ö°¡ ÒÑÓÐ5È˲ÎÓë

ÎÒÓÃvbµ÷ÓÃÒ»¸öÍⲿ³ÌÐò£¬ÎÒÏëÔÚÍⲿ³ÌÐòdata_con.exeÔËÐнáÊøºó£¬vb×Ô¶¯Í˳ö£¬ÇëÎÊÔõôʵÏÖ°¡£¿Ð»Ð»¸÷λ´óÏÀÁË~~~~

ÏÂÃæÊÇ´úÂ룺
Option Explicit
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

Private Sub Form_Load()

Call Shell("data_con.exe", vbNormalFocus)

End Sub
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

yhwsmile

½ð³æ (СÓÐÃûÆø)

ajian04:лл²ÎÓë½»Á÷~ 2010-10-23 19:54:14
ÒýÓûØÌû:
Originally posted by magic7004 at 2010-10-22 17:00:35:
·½·¨1.
PID = Shell("data_con.exe",vbNormalFocus)
HANDLE = OpenProcess(PROCESS_ALL_ACCESS,0,PID)
WaitForSingleObject(HANDLE, INFINITE)
End

ÕâÑùµÄ»°£¬data.con.exeÍ˳ö֮ǰ£¬VB³ÌÐò¶¼ÊÇ ...

лл°¡£¬Ã¿´Î¶¼ÊÇÄ㼰ʱ°ïÎÒ½â¾ö~~~~
3Â¥2010-10-23 13:26:17
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 6 ¸ö»Ø´ð

magic7004

½ð³æ (Ö°Òµ×÷¼Ò)

¡ï ¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
resonant(½ð±Ò+3):ллÌṩ£¬Ò»ÖÖ·½·¨ÆÀÒ»·Ö£º-£© 2010-10-22 19:24:07
·½·¨1.
PID = Shell("data_con.exe",vbNormalFocus)
HANDLE = OpenProcess(PROCESS_ALL_ACCESS,0,PID)
WaitForSingleObject(HANDLE, INFINITE)
End

ÕâÑùµÄ»°£¬data.con.exeÍ˳ö֮ǰ£¬VB³ÌÐò¶¼ÊÇûÓÐÏìÓ¦µÄ¡£

·½·¨2
×öÒ»¸öTimer£¬Ò»Ö±¼ì²éProcessµÄExitCode
Call GetExitCodeProcess(HANDLE,ExitCode)
if ExitCode <> STILL_ALIVE then End

Õâ¸ö·½·¨ÓÃTimer±È½ÏÍÁ

·½·¨3
HookÄ¿±ê½ø³Ì£¬µ±Ä¿±ê½ø³Ì½áÊøÊ±£¬¸øVB³ÌÐò·¢ÏûÏ¢

Õâ¸ö·½·¨ÓÃVBʵÏֱȽÏÂé·³Ò»µã
Á÷Ã¥²»¿ÉÅ£¬¿ÉŵÄÊÇÁ÷Ã¥ÓÐÎÄ»¯£¬ÓÐÎÄ»¯ÓÖBHµÄÁ÷Ã¥ÎÞµÐ~~£¡
2Â¥2010-10-22 17:00:35
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÁõÕÑÈ»

гæ (СÓÐÃûÆø)

¼ÓÓÍ£¡

ѧϰÀ²£¬ÎÒÊÇÐÂÊÖ
4Â¥2010-12-11 08:43:13
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lwq911

гæ (СÓÐÃûÆø)

¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÓàÔó³É(½ð±Ò+2):лл²ÎÓëÓ¦Öú£¬»¶Ó­³£À´³ÌÐòÓïÑ԰棡 2010-12-24 16:37:44
¸ãÄÇô¸´ÔÓ°¡£¬¸Éʲô°¡£¡
Private Sub Command1_Click()
Dim ret As Integer
Call Shell("data_con.exe", vbNormalFocus)
end
End Sub
5Â¥2010-12-23 09:51:11
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 332Çóµ÷¼Á +6 032500 2026-03-25 6/300 2026-03-25 22:45 by 418490947
[¿¼ÑÐ] 321Çóµ÷¼Á +3 è±Óñ~~ 2026-03-25 3/150 2026-03-25 19:07 by Zhanglab-TJU
[¿¼ÑÐ] 26¿¼ÑÐ-291·Ö-ÏÃÃÅ´óѧ£¨085601£©-ÈáÐÔµç×ÓѧԺ²ÄÁϹ¤³ÌרҵÇóµ÷¼Á +3 min3 2026-03-24 4/200 2026-03-25 18:22 by xcjcqu
[¿¼ÑÐ] 289Çóµ÷¼Á +9 »³èªÎÕè¤l 2026-03-20 9/450 2026-03-25 11:02 by userper
[¿¼ÑÐ] 318Çóµ÷¼Á +3 plumÀî×Ó 2026-03-23 3/150 2026-03-25 09:42 by ÎíÉ¢ºóÏàÓölc
[¿¼ÑÐ] ²ÄÁÏѧÇóµ÷¼Á +6 Stella_Yao 2026-03-20 6/300 2026-03-25 00:37 by baoball
[¿¼ÑÐ] Ò»Ö¾Ô¸ÎäÀí085500»úеרҵ×Ü·Ö300Çóµ÷¼Á +3 an10101 2026-03-24 7/350 2026-03-25 00:00 by ɽ¹í0-
[¿¼ÑÐ] 070300»¯Ñ§Çóµ÷¼Á +9 Ô·¶¹¶¹ 2026-03-20 9/450 2026-03-24 17:15 by licg0208
[¿¼ÑÐ] 292Çóµ÷¼Á +4 ¶ì¶ì¶ì¶î¶î¶î¶î¶ 2026-03-24 4/200 2026-03-24 16:41 by peike
[¿¼ÑÐ] 080500Çóµ÷¼Á +3 zzzzfan 2026-03-24 3/150 2026-03-24 16:38 by barlinike
[¿¼ÑÐ] 361Çóµ÷¼Á +3 Glack 2026-03-22 3/150 2026-03-23 22:03 by fuyu_
[¿¼ÑÐ] 333Çóµ÷¼Á +3 ALULU4408 2026-03-23 3/150 2026-03-23 19:04 by macy2011
[¿¼ÑÐ] 336»¯¹¤µ÷¼Á +4 Íõ´ó̹1 2026-03-23 5/250 2026-03-23 18:32 by allen-yin
[¿¼ÑÐ] ÇóÀÏʦÊÕÎÒ +3 zzh16938784 2026-03-23 3/150 2026-03-23 12:56 by ztnimte
[¿¼ÑÐ] 317Çóµ÷¼Á +12 Éê×ÓÉêÉê 2026-03-19 18/900 2026-03-22 22:23 by luoyongfeng
[¿¼ÑÐ] 293Çóµ÷¼Á +3 ÌÎÌÎWjt 2026-03-22 5/250 2026-03-22 22:21 by jiangpengfei
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤£¨0856£©304ÇóBÇøµ÷¼Á +3 Çñgl 2026-03-20 7/350 2026-03-21 19:05 by 15709483992
[¿¼ÑÐ] 266Çóµ÷¼Á +3 ÍÛºôºßºôºß 2026-03-20 3/150 2026-03-21 16:46 by barlinike
[¿¼ÑÐ] ²ÄÁÏѧ˶297ÒѹýËÄÁù¼¶Çóµ÷¼ÁÍÆ¼ö +11 adaie 2026-03-19 11/550 2026-03-20 21:30 by laoshidan
[¿¼ÑÐ] ²ÄÁÏѧ˶318Çóµ÷¼Á +5 February_Feb 2026-03-19 5/250 2026-03-19 23:51 by 23Postgrad
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û