iddlZddlZddlZddlZddlmZmZmZd dZdZ dZ dZ d dZ e dkr@d d lmZdZeejd kr ejd Ze eedSdS) N)Dispatch constantsgencachec| |1tjtjd}t d}|j}|d} tj|n#t$rtdYnwxYw| |tj tj}|d}|j|dtj|j|dtj|d}|j|d|j|dd |_|j||j||d }|j|dtj|j|dtj|j||d }d|_d |_|d}d|_|j||d}d|_|j|tjtjz|_|j|| d} | !d | d_"d | d_"| #| $| j%} | !d| d_"d| d_"| #| &| dj"dks Jd| | _%| j%| ks Jd| dj"d ks Jd|S)NzCOMTestSuiteTempDatabase.mdbAccess.ApplicationrzJWARNING - Unable to delete old test database - expect a COM exception RSN!z Test Table 1z First Namez Last Name UniqueIndexz Test Table 2TestRelationshipMarkHammondSecondPersonz:Unexpected record is last - makes bookmark test pointless!z!The bookmark data is not the samez7The bookmark did not reset the record pointer correctly)'ospathjoinwin32api GetTempPathrDBEngine WorkspacesunlinkOSErrorprintCreateDatabaser dbLangGeneral dbEncryptCreateTableDefFieldsAppend CreateFielddbText CreateIndexUniqueIndexes TableDefsCreateRelationTable ForeignTable ForeignNamedbRelationDeleteCascadedbRelationUpdateCascade Attributes Relations OpenRecordsetAddNewValueUpdate MoveFirstBookmarkMoveLast) dbnameaccessdbEngine workspacenewdbtableindexrelationfieldtab1bks FC:\PYTHON\_runtimes\venv\Lib\site-packages\win32com/test/testAccess.pyCreateTestAccessDatabaser@s2 ~h2446TUU * + +FH##A&&I  &     X       $ $ ')<  E   0 0E L)), 8HIIJJJ L))+y7GHHIII   m , ,E L)),77888 L))+66777EL M O5!!!   0 0E L)), 8HIIJJJ L))+y7GHHIII O5!!!##$677H#HN*H   . .E$E O5!!!   - -E#E O5!!! )I,MM  O8$$$   ~ . .DKKMMM&,DKK #%.DKK "KKMMMNN B KKMMM&.DKK #%-DKK "KKMMM MMOOO ;;| $ $ *h 6 6 6D 7 6 6DM =B    C    ;;| $ $ *f 4 4 4A 5 4 4 Ms A55BBcddlm}dx}} tjdt d}t d|z|||}| |d|j }t dt|z|j }t dt|z|Ltjd | dS#tj$rYdSwxYwdS#|Jtjd | w#tj$rYwwxYwwxYw) N)daodumpzCreating Access Application... rzOpening database %szThere are %d forms open.zThere are %d reports openzClosing database )rCsysstderrwriterrOpenCurrentDatabase CurrentDbDumpDBFormslenReportsCloseCurrentDatabase pythoncom com_error)r4rCaformsdbreportss r?DoDumpAccessInforUosA ;<<< ) * * #f,--- f%%% [[]]r1 (CJJ7888) )S\\:;;;y J  1 2 2 2 &&(((((&     yqy J  1 2 2 2 &&((((&     sBC D'9DD"!D"'"E5 EE5E1.E50E11E5c\tjddddtjddS)Nz&{00025E01-0000-0000-C000-000000000046}rr)r EnsureModuleEnsureDispatchr?GenerateSupportr\s4 BAq!LLL 011111r[ctjd}tjd}| |t|tntjdt|dS)NrzDAO.DBEngine.35zDtestAccess not doing dynamic test, as generated code already exists )rGetModuleForProgIDrUr\rErFrG)r4amoddmods r?DumpAccessInforas}  &'; < *** Can not import the MSAccess type libraries - tests skippedz#A test database at '%s' was created)r\rOrPrr@ra)r4s r?testrcs ~      "    R S S S FF *++ 3f<===6s 55__main__rB) CheckClean)N)rrErOrwin32com.clientrrrr@rUr\rarc__name__utilrer4rLargvrZr[r?rjs 9999999999ZZZZz8222        z      F s38}}q!DLLLJLLLLLr[