Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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£¨£©³ö´í£¬³ö´íÌáÊ


Ïà¹ØÎÊ´ð£º

ÎÒÕâACCESS±íµÄÏÔʾÈçºÎÇл»³ÉÏÂÃæÕâÕÅͼÀ´

ÎÒĿǰ±íµÄÅÅÁÐÊÇÉÏÃæÕâÕÅͼÕâÇé¿ö£º

ÎÒÏ£Íûµ÷Õû³É£º

ÈçºÎ×öÄØ£¿
¸Õ²ÅÊÔÁËÏ£¬µã¡°¿ªÊ¼¡±--¡°ÊÓͼ¡±--¡°Éè¼ÆÊÓͼ¡±²»ÐÐ

PS£ºÎÒÓõÄÊÇaccess 2007£¬ÉÏÃæÕâ¸ö±íÊÇmdb¸ñʽµÄ

Ö÷²Ëµ¥£¬ ÊÓͼ ......

DbgridÁ¬½ÓaccessÍ϶¯¹ö¶¯ÌõËÀ»ú£¿

DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿

ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿

Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£

ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......

ÈçºÎ´ÓACCESSÊý¾Ý¿âÖÐÒ»´Î²éѯ¶à¸ö±í²¢¼ÓÈëÊý¾Ý¼¯?

ÔÚMSSQLÖУ¬ÎÒÃÇ¿ÉÒÔÒ»´Î²éѯ¶à¸öÊý¾Ý±í²¢¼ÓÈëµ½Êý¾Ý¼¯ÖУ¬ÖмäÖ»ÐèÓ÷ֺŸô¿ª£®È磺
£¢select * from A;select * from B;select * from C£¢,Ìî³äÊý¾Ý¼¯ºóÔÚDSÖоÍÓÐÁËÈýÕÅ±í£®
µ«ÔÚÓÃͬÑùµÄÓï¾ä·ÃÎÊACCESSÊý¾ ......

ÈçºÎ½«ExcelÊý¾Ýµ¼ÈëAccessÊý¾Ý¿â? ¸øÒ»¶Î´úÂë

ÈçºÎ½«ExcelÊý¾Ýµ¼ÈëAccessÊý¾Ý¿â?,
±íÃû:crk

²»¶¥²»ÐÐ

excel¿ÉÒÔÖ±½Ó×÷ΪÊý¾Ý¿â²Ù×÷
ʹÓÃADOÈ»ºó¸ã½øÈ¥


procedure TExInput.Excel1Click(Sender: TObject); //ʵÏÖExcelµ¼ÈëSQL
var
& ......

ÈçºÎ½«XMLÊý¾Ý´æÈëACCESSÊý¾Ý¿â

ÇëÎʸ÷λ´óʦ£¬ÎÒÏÖÔÚÐèÒª½«XMLµÄÊý¾ÝʵʱµÄ´æÈëµ½Êý¾Ý¿âÖУ¬ÎÒÊÇÓÃasp±àµÄ³ÌÐò£¬´óÁ¿Ãǰïæ·ÖÎö һϣ¡£¡£¡
ÏÂÃæÊÇÎÒµÄXMLÎļþ´úÂë
XML code:

<?xml version="1.0" encoding="utf-8"? ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ