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£¨£©³ö´í£¬³ö´íÌáÊ
Ïà¹ØÎÊ´ð£º
ÎÒĿǰ±íµÄÅÅÁÐÊÇÉÏÃæÕâÕÅͼÕâÇé¿ö£º
ÎÒÏ£Íûµ÷Õû³É£º
ÈçºÎ×öÄØ£¿
¸Õ²ÅÊÔÁËÏ£¬µã¡°¿ªÊ¼¡±--¡°ÊÓͼ¡±--¡°Éè¼ÆÊÓͼ¡±²»ÐÐ
PS£ºÎÒÓõÄÊÇaccess 2007£¬ÉÏÃæÕâ¸ö±íÊÇmdb¸ñʽµÄ
Ö÷²Ëµ¥£¬ ÊÓͼ ......
DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿
ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿
Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£
ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......
ÔÚMSSQLÖУ¬ÎÒÃÇ¿ÉÒÔÒ»´Î²éѯ¶à¸öÊý¾Ý±í²¢¼ÓÈëµ½Êý¾Ý¼¯ÖУ¬ÖмäÖ»ÐèÓ÷ֺŸô¿ª£®È磺
£¢select * from A;select * from B;select * from C£¢,Ìî³äÊý¾Ý¼¯ºóÔÚDSÖоÍÓÐÁËÈýÕÅ±í£®
µ«ÔÚÓÃͬÑùµÄÓï¾ä·ÃÎÊACCESSÊý¾ ......
ÈçºÎ½«ExcelÊý¾Ýµ¼ÈëAccessÊý¾Ý¿â?,
±íÃû:crk
²»¶¥²»ÐÐ
excel¿ÉÒÔÖ±½Ó×÷ΪÊý¾Ý¿â²Ù×÷
ʹÓÃADOÈ»ºó¸ã½øÈ¥
procedure TExInput.Excel1Click(Sender: TObject); //ʵÏÖExcelµ¼ÈëSQL
var
& ......
ÇëÎʸ÷λ´óʦ£¬ÎÒÏÖÔÚÐèÒª½«XMLµÄÊý¾ÝʵʱµÄ´æÈëµ½Êý¾Ý¿âÖУ¬ÎÒÊÇÓÃasp±àµÄ³ÌÐò£¬´óÁ¿Ãǰïæ·ÖÎö һϣ¡£¡£¡
ÏÂÃæÊÇÎÒµÄXMLÎļþ´úÂë
XML code:
<?xml version="1.0" encoding="utf-8"? ......