aspÒýÓÃvb6±àдµÄdll
aspÒýÓÃvb6±àдµÄdll ×¢²ádll£¬regsvr32 E:\abc.dll£¬ÏÔʾ³É¹¦¡£ µ«ÊÇÔÚaspµ±Öд´½¨¶ÔÏó³É¹¦£¬µ÷ÓÃdllµ±Öеķ½·¨¶¼²»³É¹¦£¬Ò²Ã»Óб¨´í¡£Ôõô»ØÊÂÄØ£¿
ÊDz»ÊÇcreateobjectÀïµÄ×Ö´®²»¶Ô°¡¡£ÒýÓà ÊDz»ÊÇcreateobjectÀïµÄ×Ö´®²»¶Ô°¡¡£ ÊǶԵģ¬Èç¹ûд²»¶Ô£¬¾ÍÏÔʾ´´½¨¶ÔÏóʧ°ÜÁË¡£ ÎÒÏÖÔÚÄÜ´´½¨¶ÔÏó¡£µ«Êǵ÷ÓÃÀïÃæµÄ·½·¨¾Í²»ÐÐÁË¡£ ûÈËÖªµÀÂð£¿Ã»ÈËÖªµÀÂ𣿠ûÓб¨´í,¼ì²é On Error .... È¥µô --------- ¼ì²éÊÇ·ñÊÇÂß¼ÉϵÄÎÊÌâ,µ¼Ö³ÌÐòûÓб»Ö´ÐÐ --- ¼ì²éÊÇ VB ÖеÄÎÊÌ⻹ÊÇ VBS ÖгöµÄÎÊÌâ Èç¹û³ÌÖÐÓÐOn Error resume Next ×îºÃÊǰÑÒì³£´òÓ¡³öÀ´.Èç¹ûÄ㲻ϣÍû¿Í»§¿´µ½ÕâЩ,¿ÉÒÔ×Ô¶¨ÒåÒì³£ÐÅÏ¢ if err then response.write err.description End if ÒýÓà aspÒýÓÃvb6±àдµÄdll ×¢²ádll£¬regsvr32 E:\abc.dll£¬ÏÔʾ³É¹¦¡£ µ«ÊÇÔÚaspµ±Öд´½¨¶ÔÏó³É¹¦£¬µ÷ÓÃdllµ±Öеķ½·¨¶¼²»³É¹¦£¬Ò²Ã»Óб¨´í¡£Ôõô»ØÊÂÄØ£¿ ÄãÊ×ÏÈ£¬ÖØÆôIIS ÔÙ°Ñ regsvr32 /u E:\abc.dll ÔÙÓÃVB6 Éú²ú¹ý abc.dll ÔÙ regsvr32 E:\abc.dll ÎÒ¾ÍÊÇÕâÑù¾ÍµÃÁË¡£
Ïà¹ØÎÊ´ð£º
ÓÐÒ»¸öÀà class adc { dim a,b,c } ÈçºÎÔÚÁíÍâÒ»¸öÀàÖÐÈ¡µÃÀà³ÉÔ±¼°³ÉÔ±¸öÊý class getmenber { dim menbers() function getmenbers(resclass) 'resΪһδ֪Àà 'getmenber ......
aspÐéÄâÖ÷»úʵÏÖα¾²Ì¬µÄ·½·¨£º 1¡¢ ÖØÐ´url²ÎÊý Step1: ½¨Á¢Ç°Ì¨Îļþindex.asp£¬ÐÞ¸Äurl²ÎÊýÐÎʽ¡£ÓÉÓÚ¶ÁÈ¡Êý¾Ý¿âÖеļǼ²»ÊÇרÌâµÄÖØµã£¬¹ÊÖ±½Ó¸ø³ö: <!--#include file="config.asp" --> &l ......
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£© ¾¹È»²»ÊÇzero¡£ ²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»° Õâ¸öÖ»ÄܶÁÎı¾, VB code: Private Sub Command1_Click() Dim WordApp As Object Set WordApp = CreateObject(& ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£ Õâ¸ö£¿¡£¡£¡£ Ã²ËÆÃ»·¨¡£ ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£ Ï´εã»÷µÄÈç¹ ......