ÈçºÎÓÃVBд°²È«¿Ø¼þ
×ÜÊö
±¾ÎÄÐðÊöÁËÈçºÎÔÚVBÖÐʵÏֿؼþµÄIobjectSafety½Ó¿Ú£¬ÒÔ±êÖ¾¸Ã¿Ø¼þÊǽű¾°²È«ºÍ³õʼ»¯°²È«µÄ¡£VB¿Ø¼þĬÈϵĴ¦Àí·½Ê½ÊÇÔÚ×¢²á±íÖÐ×¢²á×é¼þÀàÀ´±êʶÆä°²È«ÐÔ£¬µ«ÊµÏÖIobjectSafety½Ó¿ÚÊǸüºÃµÄ·½·¨¡£±¾ÑÔÓï°üÀ¨ÁËʵÏÖ¹ý³ÌÖÐËùÐèµÄËùÓдúÂë¡£
Çë×¢Ò⣬¿Ø¼þÖ»ÓÐȷȷʵʵÊǰ²È«µÄ£¬²ÅÄܱ»±êʶΪ“°²È«µÄ”¡£±¾ÎIJ¢Î´ÂÛ¼°ÈçºÎÈ·±£¿Ø¼þµÄ°²È«ÐÔ£¬Õâ¸öÎÊÌâÇë²ÎÔÄInternet Client Software Development Kit (SDK)ÖеÄÏà¹ØÎĵµ "Safe Initialization and Scripting for ActiveX Controls"£¬ËüÔÚComponent Development À¸Ä¿ÖС£
Ïà¹ØÐÅÏ¢£º
<´Ë´¦ÂÔÈ¥ÁËÒ»¶ÎÒ²ÐíÎ޹ؽôÒªµÄ¾¯¸æ>
ÏÖÔÚ¿ªÊ¼ÑÐò½¥½øµØ¾ÙÀý˵Ã÷ÔõÑù´´½¨Ò»¸ö¼òµ¥µÄVB¿Ø¼þ£¬ÒÔ¼°ÔõÑù½«Ëü±êʶΪ½Å±¾°²È«ºÍ³õʼ»¯°²È«¡£
Ê×ÏÈн¨Ò»¸öÎļþ¼ÐÀ´´æ·ÅÔÚ±¾ÀýÖÐËù²úÉúµÄÎļþ¡£
´ÓVB CD-ROMÈ¡µÃOLE ×Ô¶¯»¯Àà¿âµÄÖÆ×÷¹¤¾ß¡£½«VB°²×°¹âÅÌÖÐ\Common\Tools\VB\Unsupprt\Typlib\Ŀ¼ÏÂËùÓÐÄÚÈÝÒ»²¢¿½±´µ½Ç°ÃæÐ½¨µÄÏîÄ¿Îļþ¼ÐÖС£
°ÑÏÂÁÐÄÚÈÝ¿½±´µ½“¼Çʱ¾”ÖУ¬È»ºó±£´æµ½ÉÏÊöÎļþ¼Ð£¬ÎļþÃûΪObjsafe.odl£º
[
uuid(C67830E0-D11D-11cf-BD80-00AA00575603),
helpstring("VB IObjectSafety Interface"),
version(1.0)
]
library IObjectSafetyTLB
{
importlib("stdole2.tlb");
[
uuid(CB5BDC81-93C1-11cf-8F20-00805F2CD064),
helpstring("IObjectSafety Interface"),
odl
]
interface IObjectSafety:IUnknown {
[helpstring("GetInterfaceSafetyOptions")]
HRESULT GetInterfaceSafetyOptions(
[in] long riid,
[in] long *pdwSupportedOptions,
[in] long *pdwEnabledOptions);
[helpstring("SetInterfaceSafetyOptions")]
HRESULT SetInterfaceSafetyOptions(
[in] long riid,
[in] long dwOptionsSetMask,
[in] long dwEnabledOptions);
}
}
ÔÚÃüÁîÐÐÌáʾ·ûÏÂÇл»µ½ÏîÄ¿Îļþ¼Ð£¬ÊäÈëÏÂÁÐÃüÁî´´½¨Ò»¸ö.tlb Îļþ£º
MKTYPLIB objsafe.odl /tlb objsafe.tlb
ÔÚVBÖÐн¨Ò»¸öActiveX Control ÏîÄ¿¡£ÐÞ¸ÄÊôÐÔ£¬°ÑÏîÄ¿ÃüÃûΪIobjSafety£¬¿Ø¼þÃüÃûΪDemoCtl¡£ÔڿؼþÉÏ·ÅÖÃÒ»¸ö°´Å¥£¬ÃüÃûΪcmdTest£¬ÔÚËüµÄClickʼþÖмÓÈëÒ»¾ä´úÂë MsgBox "Test" ¡£
´ò¿ª²Ëµ¥“¹¤³Ì->ÒýÓÔ£¬µã“ä¯ÀÀ”£¬ÕÒµ½¸Õ¸Õ½¨Á¢µÄObjsafe.tlb£¬°ÑËü¼ÓÈëµ½ÒýÓÃÖС£
Ôö¼ÓÒ»¸öÐÂmoduleÃûΪbasSafeCtl£¬²¢ÔÚÆäÖм
Ïà¹ØÎĵµ£º
Ò»¡¢NT·þÎñ³ÌÐò
ËùνNT·þÎñ£¬Êµ¼ÊÉϾÍÊÇÒ»¸ö¿ÉÒÔÔÚϵͳÆô¶¯Ê±×Ô¶¯ÔÚÒ»¶¨Éí·ÝÏÂÆô¶¯µÄ°éËæÏµÍ³³¤Ê±¼ä´æÔڵĽø³Ì¡£ÏóFTP server¡¢HTTP server¡¢ÍÑ»ú´òÓ¡µÈ¶¼ÊDzÉÓÃNT·þÎñµÄÐÎʽÌṩµÄ¡£Õâʵ¼ÊÉÏÀàËÆUnixµÄroot daemon½ø³Ì¡£NT·þÎñ¹éÄÉÆðÀ´£¬NT·þÎñÓÖÒÔϼ¸¸öÌØÕ÷£º
1¡¢¿ÉÒ ......
vb ÖÐ ieframe.dll/1 ²»´æÔÚ ´íÎóµÄÎÊÌâ½â¾ö - [Windows Client]
2008-05-27
°æÈ¨ÉùÃ÷£º×ªÔØÊ±ÇëÒÔ³¬Á´½ÓÐÎʽ±êÃ÷ÎÄÕÂÔʼ³ö´¦ºÍ×÷ÕßÐÅÏ¢¼°±¾ÉùÃ÷
http://twticpgk.blogbus.com/logs/21746766.html
½ñÌìÒ»¸öÓû§µÄVBÓò»ÁË¡£´ò¿ª¹¤³ÌÎļþµÄʱºò³öÏÖ´íÎ󣺓vb ÖÐ ieframe.dll/1 ²»´æÔÚ",½â¾ö·½·¨ÈçÏ£º
Õâ¸öÊÇÓ ......
VBÖÐÀûÓÃCopyMemoryʹÓÃÖ¸Õë
¡¡¡¡Ò»¡¢Ö¸ÕëÊÇʲô£¿
¡¡¡¡²»ÐèҪȥÕÒʲô±ê×¼µÄ¶¨Ò壬Ëü¾ÍÊÇÒ»¸ö32λÕûÊý£¬ÔÚCÓïÑÔºÍÔÚVBÀï¶¼¿ÉÒÔÓÃLongÀàÐÍÀ´±íʾ¡£ÔÚ32λWindowsƽ̨ÏÂËüºÍÆÕͨµÄ32볤ÕûÐÍÊýûÓÐʲô²»Í¬£¬Ö»²»¹ýËüµÄÖµÊÇÒ»¸öÄÚ´æµØÖ·£¬ÕýÊÇÒòΪÕâ¸öÕûÊýÏóÕëÒ»ÑùÖ¸ÏòÒ»¸öÄÚ´æµØÖ·£¬ËùÒÔ¾ÍÓÐÁËÖ¸ÕëµÄ¸ÅÄî¡£
¡¡¡¡ÓÐÍ ......
¾Ý˵vb6ÖÐ,×Ö ·û´®ÒÔÒÔUNICODE·½Ê½´æ´¢£¬ËùÒÔ
Private Type UDT
lngM1 As Long
lngM2 As Long
strM3 As String * 18
strM4 As String * 8
lngM5 As Long
End Type
Private Sub Command4_Click()
Dim tmp As UDT
With tmp
.lngM1 = 1
.lngM2 = 2
' .str ......
ÌÖÂÛVBÖеĽṹÌå[×ªÔØ]
2009Äê10ÔÂ20ÈÕ ÐÇÆÚ¶þ 11:30
VBÀïÃæµÄ½á¹¹ÌåÊÇÒ»ÖÖWORD/DWORD¶ÔÆëµÄ½á¹¹Ì壬ÕâÒ»µãÔÚ±à³ÌÖÐÓÈÆäҪעÒ⣬Èç¹ûÊÇ´¿VB±à³Ì£¬Ôò½á¹¹ÌåµÄ¸÷¸öÓòÈçºÎÅÅÁпÉÒÔ»ù±¾²»ÓùØÐÄ£¬
¶øÈç¹ûÊǵ÷ÓÃAPI»òÕßÊǵ÷ÓÃÆäËûµÄ¶¯Ì¬Á´½Ó¿â£¬ÔòºÜÈÝÒ׳öÎÊÌ⣬ÔÒò¾ÍÔÚÓÚ£ºÕâЩ¶¯Ì¬Á´½Ó¿âÊÇÓÃC/C++дµÄ£¬¶ø´ó²¿·ÖC/C++»·¾³ ......