VC+ADO+ACCESSµÄÊý¾Ý¿â³ÌÐòÈçºÎ¶¯Ì¬Éú³É¶à¸ö±í¸ñ
ÔÚVC+ADO+ACCESSµÄÊý¾Ý¿â³ÌÐòÖУ¬ÒÑÀûÓÃADOX::_CatalogPtr¶¯Ì¬Éú³Édemo.mdb,²¢ÇÒʹÓÃ_ConnectionPtr
¶¯Ì¬´´½¨Á˱í¸ñÒ»£¬´úÂëÈçÏ£º
1£ºstrSql = _T("CREATE TABLE test1 (ID INT, Name NVARCHAR(5))");
2£ºbstrSQL = strSql.AllocSysString();
3£ºm_pConnection->Execute(bstrSQL, &RecordsAffected, adCmdText);
ÉÏÊö´úÂëÖ´ÐÐûÎÊÌ⣻
ÏÈÏëÒª¶¯Ì¬Éú³É¶à¸ö±í¸ñ£¬×Ô¼ºµÄÏë·¨ÊÇÖØ¸´µ÷ÓÃm_pConnection->Executeº¯Êý£¬ÈçÏ£º
4£ºstrSql = _T("CREATE TABLE test2(ID INT, Name NVARCHAR(5))");
5£ºbstrSQL = strSql.AllocSysString();
6£ºm_pConnection->Execute(bstrSQL, &RecordsAffected, adCmdText);
7£ºstrSql = _T("CREATE TABLE test3 (ID INT, Name NVARCHAR(5))");
8£ºbstrSQL = strSql.AllocSysString();
9£ºm_pConnection->Execute(bstrSQL, &RecordsAffected, adCmdText);
È»¶ø³ÌÐòÔÚÉÏÃæ´úÂëǰµÄ±ê×¢6ÐгöÏÖ´íÎó,Ìø³ö¶Ô»°¿ò£ºIDiapatch error #3092
ÇëÎÊÔÚVC+ADO+ACCESSÊý¾Ý¿â³ÌÐòÖУ¬ÈçºÎ¶¯Ì¬´´½¨¶à¸ö±í¸ñ
µ÷ÓÃÏÂһϴÎ֮ǰm_pConnection->Close();Ò»ÏÂ
»¹µÃm_pConnection->open£¨£©
ÍêÁËÓÃstrSql.SysFreeString¿´¿´
ÎÒÊÔÁË£¬¿ÉÊÇ»¹Êdzö´í
µ÷ÓÃÏ´Î֮ǰm_pConnection->Close()ÔÙm_pConnection->open£¨£©
¿ÉÊǵ½m_pConnection->Execute£¨£©³ö´í£¬³ö´íÌáÊ
Ïà¹ØÎÊ´ð£º
IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)
'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......
ÎÒµÄÒ»¸öaccessÊý¾Ý¿âÖеÄphoto×Ö¶ÎÖеÄÄÚÈÝÊÇÕâÑùµÄ£º
|/UpFiles/Picture/admin/200910162300187612.jpg|/UpFiles/Picture/admin/200910162300187612.jpg||||/UpFiles/Picture/admin/200910162300187612.jpg ......
DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿
ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿
Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£
ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......
ÔÚMSSQLÖУ¬ÎÒÃÇ¿ÉÒÔÒ»´Î²éѯ¶à¸öÊý¾Ý±í²¢¼ÓÈëµ½Êý¾Ý¼¯ÖУ¬ÖмäÖ»ÐèÓ÷ֺŸô¿ª£®È磺
£¢select * from A;select * from B;select * from C£¢,Ìî³äÊý¾Ý¼¯ºóÔÚDSÖоÍÓÐÁËÈýÕÅ±í£®
µ«ÔÚÓÃͬÑùµÄÓï¾ä·ÃÎÊACCESSÊý¾ ......
ÈçºÎ°ÑaccessÊý¾Ý¿âµÄÄÚÈݵ¼³öµ½workÎĵµÖнøÐб༴òÓ¡?лл
ÈçºÎÓÃVB±àд³ÌÐòʵÏÖ°ÑaccessÊý¾Ý¿âµÄÄÚÈݵ¼³öµ½workÎĵµÖнøÐб༴òÓ¡?
н¨µÄWordºÍÒÑÓеÄWordµÄ´úÂë¿Ï¶¨ÊDz»Ò»ÑùµÄ
ÕâµãLZ»¹ÐèÒªÖ¸Ã÷
......