ÈçºÎÓÃ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£¬²¢ÔÚÆäÖм
Ïà¹ØÎĵµ£º
VCʵÏÖÀàËÆVBÖеÄLinkLabel¹¦ÄÜ
//VBÀïÃæÓиöLinkLabel£¬VBÖеÄLabelÔÚVCÖÐʽCStatic£¬µ«ÊÇVCÖÐCStaticûÓÐÀàËÆLinkLabelµÄ¹¦ÄÜ¡£¿ÉÒÔ×Ô¼º
//Ìí¼ÓÒ»µã´úÂëÀ´ÊµÏÖ£º
//²»ÖªµÀΪʲôIDC_HANDDÒ»¶¨Òª×Ô¼º¶¨ÒåÒ»ÏÂ
#define IDC_HAND MAKEINTRESOURCE(32649)
//´¦ÀíÊó±êÒÆ¶¯
void CAppNonameDlg::OnMouseMov ......
c:\windows\sytem32\ieframe.dll\1ÕÒ²»µ½,´íÎó½â¾ö·½°¸.
Õâ¸öieframe.dllÊÇvbÖÐWebBrowser µ÷ÓõĿؼþ£¬µ±ÄãÓÃvbÔٴδò¿ªÄãµÄ¹¤³ÌÖ®ºó£¬¾Í¿ÉÒÔ·¢ÏÖÒÔǰµÄWebBrowser ¿Ø¼þûÓÐÁË¡£¶øÇÒÔٴμÓÔØÒ²ÊDz»ÄܵÄÁË£¬Õâʱ¾ÍÐèÒªÓõ½ÏÂÃæµÄ·½·¨À´´¦Àí£º
°ÑÒÔÏÂÄÚÈÝ×ö³ÉÒ»¸ö×¢²á±íÎļþfixieframe.reg£¬µ¼Èë×¢²á±í¼´¿É£º
Windows Re ......
VBÈí¼þ¹¤³Ìʦ£º
ְλÃèÊö£º
1¡¢½øÐбàÂë¡¢²âÊÔ£»
2¡¢Ôڹ涨ʱ¼äÄÚÌá½»Ô´´úÂë¡£
¸ÚλҪÇó£º
1¡¢ÊìϤMS SQLÊý¾Ý¿â£»
2¡¢ÊìϤVB 6.0£»
3¡¢ÓÐÒµÎñϵͳ¿ª·¢¾Ñ飻
4¡¢¾ß±¸Á¼ºÃµÄÍŶӺÏ×÷¾«Éñ£¬ÇÚ·Ü¡¢ÉϽø£»
5¡¢´óר»òÕßÒÔÉÏѧÀú£»
6¡¢¾ßÓÐ1Äê»òÕßÒÔÉÏÏà¹Ø¹¤×÷¾Ñé £»
7¡¢ÊìϤC#ÓÅÏÈ¡£
VBÐÂÊÖ¡¢³õ¼¶³ÌÐòÔ±¹«Ë¾Ìṩרà ......
DB2ConnectionString
b2str = "Provider=MSDASQL.1;Password=a$sk6G7;Persist Security Info=True;User ID=DBA;Data Source=ConDB2SFXXK"
AccessConnectonString
accessstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DMSJK.mdb;Jet OLEDB:database password=" ......
ÌÖÂÛVBÖеĽṹÌå[×ªÔØ]
2009Äê10ÔÂ20ÈÕ ÐÇÆÚ¶þ 11:30
VBÀïÃæµÄ½á¹¹ÌåÊÇÒ»ÖÖWORD/DWORD¶ÔÆëµÄ½á¹¹Ì壬ÕâÒ»µãÔÚ±à³ÌÖÐÓÈÆäҪעÒ⣬Èç¹ûÊÇ´¿VB±à³Ì£¬Ôò½á¹¹ÌåµÄ¸÷¸öÓòÈçºÎÅÅÁпÉÒÔ»ù±¾²»ÓùØÐÄ£¬
¶øÈç¹ûÊǵ÷ÓÃAPI»òÕßÊǵ÷ÓÃÆäËûµÄ¶¯Ì¬Á´½Ó¿â£¬ÔòºÜÈÝÒ׳öÎÊÌ⣬ÔÒò¾ÍÔÚÓÚ£ºÕâЩ¶¯Ì¬Á´½Ó¿âÊÇÓÃC/C++дµÄ£¬¶ø´ó²¿·ÖC/C++»·¾³ ......