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

ACCESS½¨±íÎÊÌâ

m_pConnect->BeginTrans();
strSql.Format("CREATE TABLE SysUser(lsh AUTOINCREMENT NOT NULL UNIQUE,PRIMARY KEY(lsh),userType BYTE)");
m_pConnect->Execute((_bstr_t)strSql,NULL, adExecuteNoRecords);
ÕâÑù½¨±í¾Í³É¹¦£¬
°ÑsqlÓï¾ä»»³É
strSql.Format("CREATE TABLE SysUser(lsh AUTOINCREMENT NOT NULL UNIQUE,PRIMARY KEY(lsh),UserID VARCHAR(50),UserName VARCHAR(50),Password VARCHAR(50),userType BYTE)");
m_pConnect->Execute((_bstr_t)strSql,NULL, adExecuteNoRecords);Ö´ÐоʹíÎóÁË ¡£¡£¡£
ÓôÃÆËÀÁË¡£
SQL code:
'AccessÖÐûÓÐvarcharÀàÐÍ£¬ÓÃTEXTÀàÐÍ´úÌæ¡£
CREATE TABLE SysUser(lsh AUTOINCREMENT NOT NULL UNIQUE,PRIMARY KEY(lsh),UserID TEXT,UserName TEXT,Password TEXT,userType BYTE



µ«ÊÇÄǸöÓï¾äÔÚaccessµÄ²éѯ£ºÊý×Ö¶¨Òå²éѯÀïÃæÊÇ¿ÉÒԳɹ¦´´½¨µÄ¡£

°ÑVARCHAR»»³ÉTEXTÒ²ÊÇͬÑùµÄ´íÎ󣬵±Óöµ½´íÎóʱ³ÌÐòÔËÐеÀ
inline _RecordsetPtr Connection15::Execute ( _bstr_t CommandText, VARIANT * RecordsAffected, long Options ) {
    struct _Recordset * _result = 0;
    HRESULT _hr = raw_Execute(CommandText, RecordsAffected, Options, &_result);
    if (FAILED(_hr)) _com_issue_errorex(_hr, this, __uuidof(this));
    return _RecordsetPtr(_result, false);
}----------------------------------------------------------------msado1


Ïà¹ØÎÊ´ð£º

c# ÓÃadox´´½¨accessÊý¾Ý¿â,´ò²»¿ª,Ìáʾ²»¿Éʶ±ð

CatalogClass cat=new CatalogClass();
cat.Creat(@"provider=microsoft.jet.oledb.4.0;data source="+path+";");


ÓÃÒÔÉÏ´úÂë´´½¨Îļþ³É¹¦ÁË£¬ÕÒµ½Îļþºó´ò¿ª£¬Ìáʾ²»¿Éʶ±ðµÄÊý¾ ......

access±íÖÐʱ¼ä²îµÄÉú³É

access±íÖÐÓÐ3¸ö×ֶΣ¬starttime£¬endtime£¬timespan£¬
ÊäÈëǰÁ½¸öÖµºóÔõô×Ô¶¯Éú³ÉtimespanÄØ
´´½¨²éѯ¡£

select *, endtime-starttime from your table


»òÕßÔÚÄãµÄÊäÈë´°ÌåÖÐÓÃVBA´úÂëʵÏÖ¡ ......

Access´ø²ÎÊýµÄ²éѯ

ÔÚaccessÖÐÔõôִÐÐselect TOP (@size) * from table1
Õâ¸öTOPÔõô´ø²ÎÊý²éѯ°¡
ÓÃVBA¶¯Ì¬Éú³ÉSQLÓï¾ä£¬ÔÙÖ´ÐÐ

²»ÄÜÖ±½ÓÓÃSQLÓï¾ä£¬ÓÃ×Ö·û´®ÀÛ¼ÓÉú³ÉSQLÓï¾äµÄ·½·¨À´Ö´ÐÐSQLÓï¾ä

top n Õâ¸öûÓа취ʹÓò ......

ÈçºÎΪaccessÊý¾Ý¿â¼ÓÃÜ

¸øaccessÊý¾Ý¿â¼ÓÃܵIJ½ÖèÈçÏ£º

£¨1£©´ò¿ªaccessÈí¼þ£¬½çÃæÈçͼ1Ëùʾ

       

                        ......

access µ¼Èë access ת»»ÎÞЧ!ÔÚÏßµÈ!

´ÓÀàÐÍ"DBNULL" µ½ÀàÐÍ¡°Double¡±µÄת»»ÎÞЧ£¨Êý¾Ý¿âÖжÔÓ¦µÄ a3 »òa5 ûÓÐÊý¾ÝÊÇΪ¿Õ£©
,ÇëÎÊÎÒÔõô´¦Àí£¡

VB.NET code:

Dim a1 As String = Nothing
Dim a2 As S ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ