VBµ÷ÓÃDLLÖеĺ¯Êý - VB / COM/DCOM/COM+
ÎÒÏëµ÷ÓÃDLLÖк¯Êý
ÒýÓÃ
dim obj as Object
set obj=new ¡¡
obj.function()
ÄãµÄdllÊÇʲôÀàÐ͵ģ¿
Èç¹ûÊÇAPIÀàÐ͵ģ¬ÄãµÃÏÈÉùÃ÷ÐèÒªµ÷Óõĺ¯Êý
Èç¹ûÊÇActive X Dll£¨active dll¾ÍÊÇ·â×°ÁË×é¼þµÄdll£©£¬ ÄÇôÄã¾ÍÒªÏÈÒýÓã¬È»ºóÉùÃ÷¶ÔÏ󣬲¢ÊµÀý»¯¡£ÔÙ½øÐе÷ÓÃ
ÏÈÒªÇå³þDLLÀï·â×°ÁËʲôÑùµÄº¯Êý ¼°Æä²ÎÊýÀàÐÍ
ÖªµÀÁËÖ®ºóÖ±½Ó¼ÓÔØÒýÓþͿÉÒÔÁË
xuexile
·ÖÇå³þdllÊÇʲôÀàÐ͵Ä
activex dll£¬¿ÉÒÔʹÓà createobject£¬Èç¹ûÕâ¸öcomÖ§³Ö×Ô¶¯»¯½Ó¿ÚµÄ»°¡£
·ñÔò¿ÉÒÔÓÃcoinitialize cocreateinstanceµÈһϵÁÐapi¡£
native dll£¬¿ÉÒÔʹÓÃdeclareÉùÃ÷º¯ÊýÔÐÍ£¬È»ºóʹÓ㬻òÕßʹÓÃLoadLibrary¶¯Ì¬¼ÓÔØ¡£
.net dll£¬¿ÉÒÔÏȰü×°³Écom dll£¬È»ºóʹÓá£
ÌáÎʵÄÒ¯.
·ÖÇå³þdllÊÇʲôÀàÐ͵Ä
activex dll£¬¿ÉÒÔʹÓà createobject£¬Èç¹ûÕâ¸öcomÖ§³Ö×Ô¶¯»¯½Ó¿ÚµÄ»°¡£
·ñÔò¿ÉÒÔÓÃcoinitialize cocreateinstanceµÈһϵÁÐapi¡£
native dll£¬¿ÉÒÔʹÓÃdeclareÉùÃ÷º¯ÊýÔÐÍ£¬È»ºóʹÓ㬻òÕßʹÓÃLoadLibrary¶¯Ì¬¼ÓÔØ¡£
.net dll£¬¿ÉÒÔÏȰü×°³Écom dll£¬È»ºóʹÓá£
End_rbody_64640724//-->
¸Ã»Ø¸´ÓÚ2010-04-14 08:55:19±»¹ÜÀíԱɾ³ý
¶ÔÎÒÓÐÓÃ[0]
¶ª¸ö°åש[0]
ÒýÓÃ
¾Ù±¨
¹ÜÀí
TOP
vvhh33qq13
(vvhh33qq13)
µÈ¡¡¼¶£º
#9Â¥ µÃ·Ö£º0»Ø¸´ÓÚ£º2010-04-14 11:59:20
Ïà¹ØÎÊ´ð£º
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£
hÊÇxml¸ñʽµÄ×Ö·û´®
ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿
ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......
form1ÖÐÓÐtext1-8£¬ ºÍcommand1
text8ÖÐΪ³ÌÐò´úÂ루Éú³É´°ÌåΪform2£¨ÒÑ×öºÃ£©£©
µ¥»÷command1ºó½«text2ÖеĴúÂëÉú³ÉEXEµ½d:\ ²¢ÇÒtext1-7·Ö±ð¶ÔÓ¦
²úÆ·Ãû ¹«Ë¾Ãû ºÏ·¨°æÈ¨ ºÏ·¨É̱ê ÎļþÃèÊö ×¢ÊÍ ±êÌâ
......