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

VB³õ¼¶Ä¾Âí

   Ò» ľÂíµÄÓÉÀ´
       ľÂí£¬¼´“ÌØÂåÒÁľÂ픣¨trojan horse£©¡£
   ¶þ ËùÐèÒªµÄ¼¼Êõ
     Ò»¸ö³É¹¦µÄľÂí£¬³ýÁËÖÆ×÷³öÏà¹ØµÄ³ÌÐòÒÔÍ⣬»¹ÐèҪʵÏÖÒÔϼ¸·½ÃæµÄ¹¦ÄÜ¡£1£¬Ä¾ÂíµÄÒþ²Ø 2£¬Ä¾ÂíµÄÔËÐÐ 3£¬Ä¾ÂíµÄ¸´ÖÆ 4£¬Ä¾ÂíµÄ´«²¥µÈ£¬½øÒ»²½»¹ÓмÓÍâ¿ÇºÍ·´É±¶¾µÈ£¬ÕùÈ¡×öµ½“µÀ¸ßÒ»³ß£¬Ä§¸ßÒ»ÕÉ”¡£
 ¡¡Èý ³ÌÐòµÄÖÆ×÷
 
     1£¬winsock¿Ø¼þ
 
     ÔÚ³ÌÐòÖн«Ê¹ÓÃWinsock¿Ø¼þ¡£Winsock¿Ø¼þÊÇÒ»¸öActiveX¿Ø¼þ£¬ÀûÓÃTCPЭÒé»òUDPЭÒéÁ¬½Óµ½Ô¶³Ì¼ÆËã»úÉϲ¢ÓëÖ®½»»»Êý¾Ý¡£ÎÒÃǵÄÄ¿±ê¾ÍÊǽ¨Á¢Á½¸ö³ÌÐò£¬Ò»¸öÊÇ·þÎñÆ÷¶Ë³ÌÐòmyserver£¬ÁíÒ»¸öÊǿͻ§¶Ë³ÌÐòmyclient¡£
 
    2£¬winsockµÄÌí¼Ó
    ²¹¶¡µØÖ·£ºhttp://msdn.microsoft.com/download/vstudio60ent/SP5/Wideband-VB/WIN98Me/CN/VS6sp5VB.exe
¡¡¡¡3£¬·þÎñÆ÷¶Ë³ÌÐò
    £¨1£©±àÂë
      Private Sub Form_Load()
       myserver.LocalPort = 5211
       myserver.bind
       myserver.Listen
      End Sub
      Private Sub myServer_ConnectionRequest(ByVal requestID As Long)
       If myserver.State <> sckClosed Then
          myserver.Close
       End If  
       myserver.Accept requestID
      End Sub
      Private Sub myServer_DataArrival(ByVal bytesTotal As Long)
       Dim strData As String
       myserver.GetData strData
       If strData = " hello " Then
         MsgBox ("ÊÕµ½Êý¾Ý£¡")
       End If
      End S


Ïà¹ØÎĵµ£º

VB6.0ÈçºÎÓà libmySQL.dll API·ÃÎÊMYSQLÊý¾Ý¿â

MYSQL Ó¦ÓÃÊ®·Ö¹ã·¶£¬ºÜ¶àÍøÕ¾¼¸ºõ¶¼ÔÚÓÃËû£¬ÒòΪËûµÄСÇɺÍÁé»îÐԵȷ½ÃæÈÃÎÒ¾ö¶¨Òª¶ÔËû½øÐÐÑо¿£¬µ½ÏÖÔÚÒѾ­³É¹¦µÄ²»Óþ­¹ýODBC£¬ADOµÈ·½Ê½¾Í¿ÉÒÔ¶ÁÈ¡ºÍ¸üÐÂÊý¾Ý¡£
 
ºÃÁ˲»¶àÂÞ࣬ÒÔÏÂÎÒÀ´½éÉÜ×ܸö³ÌÐòµÄϸ½Ú:
 
£¨Ò»£©APIÉùÃ÷
 
1.  '·ÖÅä»ò³õʼ»¯ÊʺÏmysql_real_connect()µÄÒ»¸öMYSQL¶ÔÏñ¡ ......

vb½çÃæ×ÔÊÊÓ¦²»Í¬·Ö±æÂÊÖÕ¼«½â¾ö·½°¸

ÏÖÔÚ¿íÆÁ£¬´óÆÁÄ»ÏÔʾÆ÷Ô½À´Ô½ÆÕ±é£¬Ô­À´ÔÚ800*600ÏÂÉè¼ÆµÄÈí¼þ½çÃæ£¬ÔÚ´óÆÁÄ»ÏÔʾÆ÷£¨1680*1050£©ÉϽçÃæ×ÜÊÇËõµ½Ò»½Ç£¬·Ç³£ÄÑ¿´£¬Òª½«ÀϳÌÐòµÄ½çÃæ°´ÕÕ²»Í¬µÄ·Ö±æÂÊÔÚÖØÐ½øÐÐÉè¼Æ±à³Ì£¬Õû¸ö¹ý³Ì±È½Ï¸´ÔÓ¶øÇÒʵÓÃÐÔ²»´ó£¬Èç¹ûÔ­À´³ÌÐò±È½Ï´óÇÒ½çÃæ±È½Ï¶àµÄ»°ÄÇô¹¤×÷Á¿Ò²½«ÊǾ޴óµÄ£¬¶øÇÒ»¹¿ÉÄܳöÏÖÆäËû´íÎó£¬ÓÐûÓÐÒ»ÖÖÖØ ......

¸øÒ»´ó¶Î VB ³ÌÐòÒ»´ÎÐÔ¼ÓÉÏ×¢ÊÍ·ûºÅ

VB ×¢ÊͳÌÐò´úÂëµÄ·ûºÅÊÇ '£¬Ö»ÒªÔÚijÐгÌÐòÇ°Ãæ¼ÓÉϸ÷ûºÅ¾Í¿ÉÒÔ×¢Ê͸ÃÐгÌÐò¡£µ«Èç¹û³ÌÐò´úÂëÓï¾äºÜ¶àµÄʱºò£¬Ò»ÐÐÒ»ÐеØ×¢Ê;ͷdz£²»·½±ã¡£Æäʵ VB
±¾ÉíÌṩÁËÒ»´ÎÐÔ×¢ÊͶàÌõÓï¾äµÄ¹¦ÄÜ£ºÔÚÖ÷²Ëµ¥“ÊÓͼ”Ñ¡ÏîµÄ“¹¤¾ßÀ¸”Ï£¬Ñ¡ÖГ±à¼­”£¬VB
µÄ½çÃæ»á³öÏÖÒ»ÅŹ¤¾ß°´Å¥£¬ÆäÖоÍÓÐÓà ......

vb³ÌÐòÖÐwebbrowser ½ÓÊÜSendMessage µÄÏûÏ¢

webbrowser ²»ÄÜÊÕµ½SendMessageµÄÏûÏ¢
Ö÷ÒªÊÇÒòΪ1webbrowser µÄ¾ä±úÕÒ²»µ½¡£¾­¹ýŬÁ¦ËÑË÷£¬ÖÕÓÚ½â¾öÁË¡£×ö¸ö¼Ç¼.
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Declare Function ......

vbºÍaspÈçºÎÓÃremote·ÃÎÊÔ¶³ÌÊý¾Ý¿â

·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔ­ÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£¬ÆäÓàÌõ¼þ²»±£Ö¤ÄÜÕý³£ÔËÐÐ
ÔÚmdacµÄService ProvidersÖаüÀ¨Microsoft ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ