ÓÃVB±àдActiveX DLLʵÏÖASP±à³Ì
ASPÊÇĿǰһÖÖ¹ãΪӦÓõÄÓÃÀ´¿ìËÙ¹¹½¨¶¯Ì¬WEBÕ¾µãµÄ±à³ÌÓïÑÔ£¬Ä¬ÈϵÄÄÚÖÿª·¢ÓïÑÔÊÇVBScript£¬ÓÉÓÚASPºÍ΢ÈíWindowsϵÁвÙ×÷ϵͳµÄ½áºÏ·Ç³£µÄºÃ£¬Ê¹µÃASPÒѾ³ÉΪÁËNT¿ª·¢Æ½Ì¨ÉÏÃæ½øÐÐWEB¿ª·¢µÄÊ×Ñ¡ÓïÑԺͻ·¾³¡£
ËûÓÐ׿òµ¥Ò×ѧ£¬·½±ã¿ìËÙ¿ª·¢µÄÖÖÖÖÓŵ㣬µ«ÊÇËûÒ²ÓÐ×ÅÖÂÃüµÄÈõµã£¬¾ÍÊÇËûÊǽű¾ÓïÑÔ½âÊÍÖ´Ðеģ¬ËÙ¶È»áÊܵ½Ò»¶¨µÄÓ°Ï죬¸üΪ¹Ø¼üµÄÊÇ£¬Ê¹ÓÃASPÀ´¿ª·¢Íê³ÉÒ»¸öÏîĿ֮ºó£¬Õû¸öÏîÄ¿ÔÚ½»¸¶¿Í»§Ê¹ÓõÄʱºò£¬ÊÇ»áÁ¬´øËùÓеÄASP½Å±¾Ô´´úÂëµÄ£¬Ò²¾ÍÎÞ·¨½«ÉÌÒµ³ÌÐò±£ÃÜÁË£¬Ô´´úÂëй©»á¸ø×Ô¼ºÔì³ÉºÜ´óµÄËðʧ£¬ËäȻ΢ÈíÒ²ÏàÓ¦µÄÍÆ³öÁËÓÃÀ´¼ÓÃÜASP³ÌÐòµÄÈí¼þ£¬µ«ÊÇÓÐ×ÅÖî¶àµÄÏÞÖÆ£¬ÒÔ¼°»á½µµÍ³ÌÐòÔËÐеÄËٶȺͶþ´Î¿ª·¢µ÷ÊÔµÄÄѶȣ¬ÄѵÀASP×ö³öÀ´µÄÏîÄ¿¾ÍÕæµÄÒª±©Â¶ËùÓеÄÔ´´úÂëÂð?¡¡
µ±È»ÁË£¬´ð°¸µ±È»ÊÇ·ñ¶¨µÄ£¬ÒòΪÊÀ½çÉÏûÓоø¶Ô²»¿ÉÄܵÄÊÂÇ飬½ÓÏÂÀ´¾Í¸úËæÎÒÀ´¿´¿´ÈçºÎÀûÓÃVBµÄActiveX DLLÀ´ÊµÏÖ½«ASP³ÌÐò·â×°ÆðÀ´°É£¬Ò²¾ÍÊÇÎÒÃÇ¿ÉÒÔʹÓÃActiveX DLLÀ´Íê³ÉËùÓÐASPÄÜÍê³ÉµÄÊÂÇ飬¶øActiveX DLLÊDZàÒëºÃµÄDLLÎļþ£¬±ðÈËÊÇÎÞ·¨µÃÖªÄãµÄÔ´´úÂëµÄ£¬Ò²¾Í±£Ö¤µÄ×Ô¼ºµÄÉÌÒµ»úÃܺͺËÐļ¼Êõ£¬²¢ÇҴﵽͬÑùµÄЧ¹û£¬Ê¹ÓÃÍêÈ«·â×°µÄActiveX DLL»á±ÈÍêÈ«ÊÊÓÃASP½Å±¾ÓïÑÔµÄÖ´ÐÐËÙ¶ÈÒª¿ìºÜ¶à£¬ÓÈÆäÊÇ´óÔËËãÁ¿µÄʱºò¸úΪÃ÷ÏÔ£¡
¾¹ýÎÒÃǵľßÌå²âÊÔ£¬ÔÚ²Ù×Ý10000ÌõÊý¾Ý¿â¼Ç¼µÄʱºò£¬·â×°³ÉΪActiveX DLLµÄWEBÓ¦ÓóÌÐò±È´¿ASP´úÂëµÄÓ¦ÓóÌÐò£¬ËÙ¶ÈÉÏÃæÒª¿ì´óÔ¼21%×óÓÒ£¬ÔÚĿǰ¹úÄÚ¹ýÓÚ»ºÂýµÄÍøÂçÀ´½²£¬ËٶȾÍÊÇÒ»¸öWEBÕ¾µãµÄºÜ¹Ø¼üµÄÒ»²¿·Ö¡£²¢ÇÒ²ÉÓÃÁËActiveX DLLÀ´¿ª·¢WEB³ÌÐò£¬Òª±Èµ¥´¿Ê¹ÓÃASPºÃµÃ¶à£¬±Ï¾¹ASPÖ»ÄÜʹÓÃVBScriptÀ´¿ª·¢£¬ÎÞ·¨ÏíÓÃVB´óÁ¿µÄÓŵ㣬¶øActiveX DLLÔò¿ÉÒÔ³ä·ÖÀûÓÃVBÀïÃæËùÓеÄÌØÐÔ¡£
ÏÂÃæÎÒÃÇÏÈÀ´¿´¿´Ê²Ã´ÊÇActiveX DLL°É¡£ActiveXÊÇ΢ÈíÌá³öµÄ¹ã·ºÓ¦ÓÃÓÚWindowsϵÁеÄÒ»ÖÖ´úÂë·â×°¼¼Êõ£¬Ìá¸ßÁ˳ÌÐò´úÂëµÄ¿ÉÖØÓÃÐÔ£¬¼Ó¿ìÁ˳ÌÐòÏîÄ¿µÄ¿ª·¢ËÙ¶È£¬Ò»°ã±»³ÆÎª“×é¼þ”¡£ÔÚVB6µÄ¼¯³É¿ª·¢»·¾³µ±ÖУ¬ÎÒÃÇ¿ÉÒÔ¿´µ½Ò»Ï¼¸ÖÖActiveXÏîÄ¿£º
¡¡¡¡1¡¢ActiveX EXE
¡¡¡¡ÕâÊÇÔÚ“¹ý³ÌÍâ”ÔËÐеÄActiveX/COM·þÎñÆ÷×é¼þ£¬Ò²¾ÍÊÇ˵ËûÃÇÔËÐеĹý³ÌºÍ³õʼ»¯×é¼þµÄ¿Í»§»ú´úÂ벻ͬ¡£¾¡¹Ü¿ÉÒÔÓÃASP·ÃÎÊActiveX EXE£¬µ«ÊDz»ÍƼö¸Ä¶¯IISÔª¿â£¬¸Ã¿âÔÊÐíËùÓеĿÉÖ´ÐÐÎļþÓÉ·þÎñÆ÷ÉÏÔËÐеĽű¾´úÂëÆô¶¯¡£
¡¡¡¡2¡¢ActiveX OCXs
¡¡¡¡ÕâÐ©ÌØÊâµÄ×é¼þ°ÑÖ÷»úÓ¦ÓóÌÐòÏÔʾºÍ²Ù×÷×é¼þËùÐèµÄ¸½¼ÓÖ§³Ö°üº¬ÔÚGUI»·¾³ÖС£»¹¿ÉÒÔ°ÑOCX×é¼þ·ÅÔÚÍøÒ³µ±ÖÐ
Ïà¹ØÎĵµ£º
³öÏÖÕâ¸öÔÒòÊÇinternetÓû§·ÃÎʵÄȨÏÞ²»¹»£¬ÏµÍ³Ä¬ÈÏȨÏÞÊÇÖ»¶ÁµÄ£¬ËùÒÔÎÒÃÇÒª¸øËü·ÖÅä¿ÉÐÞ¸ÄȨÏÞ£¬·Ï»°²»¶à˵£¬½øÈëÖ÷Ì⣺
1.×ÊÔ´¹ÜÀíÆ÷——>¹¤¾ß——>Îļþ¼ÐÑ¡Ïî——>²é¿´
2.½«"¼òµ¥Îļþ¹²Ïí(ÍÆ¼ö)"Ñ¡ÏîÈ¥µô
3.Ñ¡ÔñÄãµÄWEBÎļþ¼Ð£¬¿´ÆäÊôÐÔ£¬ÕâʱÄã»á·¢ÏÖ¶àÁ˸ö"°²È«"Ñ¡Ï£ ......
Option Explicit
Private rsMain As ADODB.Recordset
Private rsTerm As ADODB.Recordset
Private strSql As String
Private Sub cmdAbout_Click()
frmAbout.Show
End Sub
Private Sub cmdAddObject_Click() '³ÌÐò¶Î
......
ת×Ô£ºhttp://www.52arm.com/Article_Show.asp?ArticleID=186
×÷Õߣºweidian ---±¾Õ¾Ô´´ µã»÷Êý£º4721 ·¢±íʱ¼ä£º2008-5-7 ±à¼£ºsanzang
Winsock¿Ø¼þ½¨Á¢ÔÚTCP¡¢UDPÐÒéµÄ»ù´¡ÉÏ£¬Íê³ÉÓëÔ¶³Ì¼ÆËã»úµÄ ......
Õâ¶Îʱ¼äÔÚÒÆÖ²ÏîÄ¿µÄ¹ý³ÌÖУ¬Æð³õÎÒÏëÅжÏÒ»¸ö×Ö·û´®ÖÐÊÇ·ñ´æÔÚij×Ö·û£¨´®£©£¬Ö±½ÓµÄʹÓ÷½·¨ÊÇÓÃinstr£¨start£¬string1£¬string2£¬VB compare£©£¬µ«¾¹ý·ÖÎöÔÚVBÖпÉÒÔÖ»ÓÃһϷ½·¨À´Åжϣ¡
1.³£ÓõÄINStr·½·¨
Function InStr([Start], [String1], [String2], [Compare A ......