vb ÔõôÅжϵ±Ç°»î¶¯´°¿ÚΪϵͳ×ÀÃæ
ÈçÌâ ¾ÍÊÇÅжÏÏÖÔÚÏÔʾµÄÊÇxp×ÀÃæ£¬ÈçºÎ²Ù×÷£¬Ð»Ð» £¨²»ÊÇÅжϻ´°¿Ú¹þ£©
XP×ÀÃæµÄ¾ä±úÊÇ¿ÉÒÔÕÒµ½µÄ. ÓÃÀàÃûÒ²¿ÉÒÔ.ÒýÓà ÓÃÀàÃûÒ²¿ÉÒÔ. ÎÒÓÃÀàÃû²»Í¬µÄÇé¿öµÃµ½µÄ»î¶¯´°Ìå¾ä±ú²»Ò»Ö°¡£¬°ïÎÒ¿´Ï£¬Ôõô»ØÊ£¬ °´Ï¿ìËÙÆô¶¯ÏÔʾ×ÀÃæ£¬»òÕßÔÚµã»÷Ò»ÏÂÒѾ´ò¿ªµÄÎļþ¼Ð£¬ÔÚµã»÷¿ìËÙÆô¶¯µÄÏÔʾ×ÀÃæÖµ²»Ò»Ö£¬ÔõôÅжÏÄØ£¬ÎÒÏëÒªÒ»¸öЧ¹û¾ÍÊÇ£¬°´ÏÂÏÔʾ×ÀÃæ£¨¿ìËÙÆô¶¯µÄ»òÕßwin+d¼ü£©¶¼Äܼì²âµ½£¬È»ºó²ÉÈ¡²Ù×÷ VB code: Private Declare Function GetForegroundWindow Lib "user32" () As Long Private Declare Function GetActiveWindow Lib "user32" () As Long Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long Private Const HWND_TOPMOST = -1 Private Const HWND_NOTOPMOST = -2 Private Const SWP_NOMOVE = &H2 Private Const SWP_NOSIZE = &H1 Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String,
Ïà¹ØÎÊ´ð£º
±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£ ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£ È»ºóÔÊÐíºó·ÅÐС£ ±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£ ¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£ ÉèÖ ......
ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......
ÔõôÓÅ»¯²éѯµÄЧÂÊ£¬±ÈÈçÎÒÏë´Ó100ÍòÌõ¼Ç¼ÖÐÿ´ÎÖ»²éѯ100Ìõ¼Ç¼µÄ»°£¬ÄÇôÕâÌõsqlÓï¾ä¸ÃÔõôʵÏÖ£¬×¢Ò⣺ÓïÑÔÊÇVBScriptµÄ£¬ http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html Éæ¼°µ½Ëã·¨£¬goog ......
Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔÀ´µÄÊýÖµÁË ´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ ´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£ »Ø¸´ ......