Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBÖйØÓÚÃÜÂëÈÏÖ¤

ÔÚÎҵijÌÐòÀ½øÈ롰ɾ³ýÓû§¡±£¬"Ìí¼ÓÓû§"´°Ìå֮ǰ¾ùÏȵ¯³öÒ»¸ö´°ÌåÒªÇóÊäÈë¹ÜÀíÔ±ÃÜÂ룬ÊäÈëÕýÈ·Ö®ºó²ÅÄܽøÈëÏàÓ¦½çÃæ£¬ÈçºÎÉè¼Æ´úÂ룿
¶ÁÊý¾Ý¿âÀïÃæ¹ÜÀíÔ±µÄÃÜÂë
È»ºó¸úÊäÈëµÄÄÚÈݱȽÏ
ºÜ¼òµ¥µÄ¶«Î÷ÔõôҲҪ´úÂë

²»ÊÇ£¬ÎÒÊÇÒªÊäÈëÕýÈ·Ö®ºóµ¯³ö²»Í¬µÄ´°Ì壬±ÈÈ磬ÎÒµãµÄÊÇ¡°É¾³ýÓû§¡±Õâ¸öʱºòµ¯³ö´°ÌåÒªÇóÊäÈë¹ÜÀíÔ±ÃÜÂ룬ÊäÈëÕýÈ·Ö®ºó¾Í½øÈëɾ³ýÓû§µÄ½çÃæ£¬µ«ÊÇÈç¹ûÎÒµãµÄÊÇ¡°Ìí¼ÓÓû§¡±£¬Õâ¸öʱºòµ¯³öÒªÇóÊäÈë¹ÜÀíÔ±ÃÜÂ룬ÊäÈëÕýÈ·Ö®ºóÊǽøÈëÌí¼ÓÓû§½çÃæ£¬ÈçºÎÔÚÊäÈë¹ÜÀíÔ±ÃÜÂëÕýÈ·Ö®ºó¸ù¾Ý²»Í¬µÄ²Ù×÷½øÈ벻ͬµÄ½çÃæ£¿

ÔÚͨÓÃÀﶨÒåÒ»¸ö±äÁ¿,µã¡°É¾³ýÓû§¡±µÄʱºò ÓÃÕâ¸ö±äÁ¿¼Ç¼һÏÂÄã²Ù×÷µÄÊÇɾ³ýÓû§»¹ÊÇÌí¼ÓÓû§
È»ºóÔÚÅжÏÕýÈ·Óë·ñºóÔÙÇø·Ö


ʹÓÃAccessÊý¾Ý¿â¼´¿É£¬Êý¾Ý¿âÖÐÉè¼ÆÒ»¸ö±í£¬±íÖк¬ÓУºÓû§ÃûºÍÓû§ÃÜÂëÁ½¸ö×ֶΣ¬´ò¿ªÊ±½øÐÐÌõ¼þ²éѯ¼´¿É£¬Èç¹ûÂ¥Ö÷ÊdzõѧÕߵϰ£¬½¨ÒéÄãÏÈ¿´Ò»Ð©¹ØÓÚÊý¾Ý¿â±à³Ì·½ÃæµÄ»ù´¡Êé¼®¡£

1.Êý¾Ý¿âÖмǼÕ˺ÅÃÜÂë;
2.Èç¹û½öÐèÑéÖ¤¹ÜÀíÔ±ÃÜÂë,¶ø²»ÓÃÊäÈëÕ˺Å,Ö±½ÓÓøöinputbox¾Í¿ÉÒÔÁË;·ñÔò,ÐèŪһ¸öСµÄµ¯³ö´°¿ÚÑéÖ¤;
3.¸ù¾Ý²»Í¬µÄÐèÒª(ɾ³ýÓû§orÌí¼ÓÓû§)½øÈ벻ͬµÄ²Ù×÷½çÃæ;

ÒýÓÃ
²»ÊÇ£¬ÎÒÊÇÒªÊäÈëÕýÈ·Ö®ºóµ¯³ö²»Í¬µÄ´°Ì壬±ÈÈ磬ÎÒµãµÄÊÇ¡°É¾³ýÓû§¡±Õâ¸öʱºòµ¯³ö´°ÌåÒªÇóÊäÈë¹ÜÀíÔ±ÃÜÂ룬ÊäÈëÕýÈ·Ö®ºó¾Í½øÈëɾ³ýÓû§µÄ½çÃæ£¬µ«ÊÇÈç¹ûÎÒµãµÄÊÇ¡°Ìí¼ÓÓû§¡±£¬Õâ¸öʱºòµ¯³öÒªÇóÊäÈë¹ÜÀíÔ±ÃÜÂ룬ÊäÈëÕýÈ·Ö®ºóÊǽøÈëÌí¼ÓÓû§½çÃæ£¬ÈçºÎÔÚÊäÈë¹ÜÀíÔ±ÃÜÂëÕýÈ·Ö®ºó¸ù¾Ý²»Í¬µÄ²Ù×÷½øÈ벻ͬµÄ½çÃæ£¿


Äã¿ÉÒÔÔÚµãµÄÊÇ¡°É¾³ýÓû§¡±°´Å¥µÄʼþÀïÉèÖÃתµ½ÄǸö´°Ì壬µ«ÔÚÕâ֮ǰҪ¼ÓÉÏÑéÖ¤Óû


Ïà¹ØÎÊ´ð£º

¶ÔÏó´ò¿ªÊ±£¬²»ÔÊÐí²Ù×÷¡£ vb·â×°asp

ÔÚ×öÊ÷ÐÍĿ¼ʱ³öÏֵģ¬ÒÔÏÂÊDz¿·Ö´úÂë

VB code:

Function TreeMenu(id)
sql = "select * from Class where CateID=1"
rs.Open sql, cover, 1, 1
While Not rs.EOF
Response.Write rs(&quo ......

VBÓëLINUXÏÂÊý¾Ý¿âÁ¬½ÓµÄÎÊÌâ

¸÷λ´óÏÀ£¬ÏÖÓÐÒ»ÄÑÌâÇó½Ì£º¼ÙÉèÊý¾Ý¿â£¨mysql»òoracle¡­¡­µÈÊý¾Ý¿â£©°²×°ÔÚLINUXϵͳµÄ·þÎñÆ÷ÉÏ£¬ÎÒÔÚ¿Í»§¶Ë£¨windowsϵͳ£©Óà VBÈçºÎ½¨Á¢ÓëÊý¾Ý¿âµÄÁ¬½Ó£¬ÊÇ·ñ¿ÉÒÔʹÓÃÀàËÆADO»òDAOµ±ÖеÄÁ¬½ÓÓï¾ä£¿ÇëÄÄλ´óÏÀÖ¸µ¼ ......

vb±àдdllÎļþÌáʾÕÒ²»µ½dllinstall×¢Èëµã

ÎÒÏëдһ¸öasp¶ÁÈ¡±¾µØ»ú×ÓµÄÍøÍ«µÄ¹¦ÄÜ£¬ÐèÒªÓÃvbдһ¸ödll ÔÚÍøÉÏÕÒÁËһϣ¬°ÑÏÂÃæµÄ¶Î¿½Èëvb¹¤³ÌÀ
Option Explicit

Private Const NCBASTAT = &H33
Private Const NCBNAMSZ = 16
Private ......

VB ½ûÖ¹Ö¸¶¨´°¿Ú±êÌâÀ¸²Ëµ¥

Õâ¸ö³ÌÐòÊǹ̶¨µÄ£¬±ÈÈçcmd.exe
´ò¿ªCMDºó£¬Êó±êÔÚCMDµÄ±êÌâÀ¸¿ÉÒÔµã»÷ÓÒ¼üºÍ×ó¼ü£¬µ¯³öÏàÓ¦µÄ²Ëµ¥¡£

ÎÒÒª´ïµ½µÄÄ¿µÄÊÇ£ºÎÞÂÛÊÇ×ó»÷»¹ÊÇÓÒ»÷CMDµÄ±êÌâÀ¸¶¼²»Äܵ¯³ö²Ëµ¥¡£
»òÕßÄܳöÏֲ˵¥Ò²ÐУ¬µ«Ö»Äܳö ......

VB HOOK API

    ¸÷룬ÇëÎʹ³×ÓÊÇÔõôÔËÐеİ¡£¿ÇëÏÈ¿´¿´ÎÒдµÄ´úÂ룺
Public hhook
Private Sub Command1_Click()
hhook = SetWindowsHookEx(2, AddressOf testhook, 0, App.ThreadID)
End Sub
ÒÔϵ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ