dao360.tlh

来自「一个模板打印的源程序。可用于医院诊断报告的打印。」· TLH 代码 · 共 2,120 行 · 第 1/5 页

    void PutName (
        _bstr_t pbstr );
    _bstr_t GetUserName ( );
    void Put_30_UserName (
        _bstr_t _arg1 );
    void Put_30_Password (
        _bstr_t _arg1 );
    short GetIsolateODBCTrans ( );
    void PutIsolateODBCTrans (
        short ps );
    DatabasesPtr GetDatabases ( );
    UsersPtr GetUsers ( );
    GroupsPtr GetGroups ( );
    HRESULT BeginTrans ( );
    HRESULT CommitTrans (
        long Options );
    HRESULT Close ( );
    HRESULT Rollback ( );
    DatabasePtr OpenDatabase (
        _bstr_t Name,
        const _variant_t & Options = vtMissing,
        const _variant_t & ReadOnly = vtMissing,
        const _variant_t & Connect = vtMissing );
    DatabasePtr CreateDatabase (
        _bstr_t Name,
        _bstr_t Connect,
        const _variant_t & Option = vtMissing );
    _UserPtr CreateUser (
        const _variant_t & Name = vtMissing,
        const _variant_t & PID = vtMissing,
        const _variant_t & Password = vtMissing );
    _GroupPtr CreateGroup (
        const _variant_t & Name = vtMissing,
        const _variant_t & PID = vtMissing );
    ConnectionPtr OpenConnection (
        _bstr_t Name,
        const _variant_t & Options = vtMissing,
        const _variant_t & ReadOnly = vtMissing,
        const _variant_t & Connect = vtMissing );
    long GetLoginTimeout ( );
    void PutLoginTimeout (
        long pTimeout );
    long GetDefaultCursorDriver ( );
    void PutDefaultCursorDriver (
        long pCursorType );
    long GethEnv ( );
    long GetType ( );
    ConnectionsPtr GetConnections ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Name (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put_Name (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall get_UserName (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put__30_UserName (
        BSTR _arg1 ) = 0;
    virtual HRESULT __stdcall put__30_Password (
        BSTR _arg1 ) = 0;
    virtual HRESULT __stdcall get_IsolateODBCTrans (
        short * ps ) = 0;
    virtual HRESULT __stdcall put_IsolateODBCTrans (
        short ps ) = 0;
    virtual HRESULT __stdcall get_Databases (
        struct Databases * * ppdbs ) = 0;
    virtual HRESULT __stdcall get_Users (
        struct Users * * ppusrs ) = 0;
    virtual HRESULT __stdcall get_Groups (
        struct Groups * * ppgrps ) = 0;
    virtual HRESULT __stdcall raw_BeginTrans ( ) = 0;
    virtual HRESULT __stdcall raw_CommitTrans (
        long Options ) = 0;
    virtual HRESULT __stdcall raw_Close ( ) = 0;
    virtual HRESULT __stdcall raw_Rollback ( ) = 0;
    virtual HRESULT __stdcall raw_OpenDatabase (
        BSTR Name,
        VARIANT Options,
        VARIANT ReadOnly,
        VARIANT Connect,
        struct Database * * ppDb ) = 0;
    virtual HRESULT __stdcall raw_CreateDatabase (
        BSTR Name,
        BSTR Connect,
        VARIANT Option,
        struct Database * * ppDb ) = 0;
    virtual HRESULT __stdcall raw_CreateUser (
        VARIANT Name,
        VARIANT PID,
        VARIANT Password,
        struct _User * * ppusr ) = 0;
    virtual HRESULT __stdcall raw_CreateGroup (
        VARIANT Name,
        VARIANT PID,
        struct _Group * * ppgrp ) = 0;
    virtual HRESULT __stdcall raw_OpenConnection (
        BSTR Name,
        VARIANT Options,
        VARIANT ReadOnly,
        VARIANT Connect,
        struct Connection * * ppconn ) = 0;
    virtual HRESULT __stdcall get_LoginTimeout (
        long * pTimeout ) = 0;
    virtual HRESULT __stdcall put_LoginTimeout (
        long pTimeout ) = 0;
    virtual HRESULT __stdcall get_DefaultCursorDriver (
        long * pCursorType ) = 0;
    virtual HRESULT __stdcall put_DefaultCursorDriver (
        long pCursorType ) = 0;
    virtual HRESULT __stdcall get_hEnv (
        long * phEnv ) = 0;
    virtual HRESULT __stdcall get_Type (
        long * ptype ) = 0;
    virtual HRESULT __stdcall get_Connections (
        struct Connections * * ppcns ) = 0;
};

struct __declspec(uuid("00000073-0000-0010-8000-00aa006d2ea4"))
Databases : _Collection
{
    //
    // Property data
    //

    __declspec(property(get=GetItem))
    DatabasePtr Item[];

    //
    // Wrapper methods for error-handling
    //

    DatabasePtr GetItem (
        const _variant_t & Item );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Item (
        VARIANT Item,
        struct Database * * ppDb ) = 0;
};

struct __declspec(uuid("00000071-0000-0010-8000-00aa006d2ea4"))
Database : _DAO
{
    //
    // Property data
    //

    __declspec(property(get=GetCollatingOrder))
    long CollatingOrder;
    __declspec(property(get=GetConnect,put=PutConnect))
    _bstr_t Connect;
    __declspec(property(get=GetName))
    _bstr_t Name;
    __declspec(property(get=GetQueryTimeout,put=PutQueryTimeout))
    short QueryTimeout;
    __declspec(property(get=GetTableDefs))
    TableDefsPtr TableDefs;
    __declspec(property(get=GetTransactions))
    VARIANT_BOOL Transactions;
    __declspec(property(get=GetUpdatable))
    VARIANT_BOOL Updatable;
    __declspec(property(get=GetVersion))
    _bstr_t Version;
    __declspec(property(get=GetRecordsAffected))
    long RecordsAffected;
    __declspec(property(get=GetReplicaID))
    _bstr_t ReplicaID;
    __declspec(property(get=GetQueryDefs))
    QueryDefsPtr QueryDefs;
    __declspec(property(get=GetRelations))
    RelationsPtr Relations;
    __declspec(property(get=GetContainers))
    ContainersPtr Containers;
    __declspec(property(get=GetRecordsets))
    RecordsetsPtr Recordsets;
    __declspec(property(get=GetDesignMasterID,put=PutDesignMasterID))
    _bstr_t DesignMasterID;
    __declspec(property(get=GetConnection))
    ConnectionPtr Connection;

    //
    // Wrapper methods for error-handling
    //

    long GetCollatingOrder ( );
    _bstr_t GetConnect ( );
    _bstr_t GetName ( );
    short GetQueryTimeout ( );
    void PutQueryTimeout (
        short ps );
    VARIANT_BOOL GetTransactions ( );
    VARIANT_BOOL GetUpdatable ( );
    _bstr_t GetVersion ( );
    long GetRecordsAffected ( );
    TableDefsPtr GetTableDefs ( );
    QueryDefsPtr GetQueryDefs ( );
    RelationsPtr GetRelations ( );
    ContainersPtr GetContainers ( );
    RecordsetsPtr GetRecordsets ( );
    HRESULT Close ( );
    HRESULT Execute (
        _bstr_t Query,
        const _variant_t & Options = vtMissing );
    RecordsetPtr _30_OpenRecordset (
        _bstr_t Name,
        const _variant_t & Type = vtMissing,
        const _variant_t & Options = vtMissing );
    PropertyPtr CreateProperty (
        const _variant_t & Name = vtMissing,
        const _variant_t & Type = vtMissing,
        const _variant_t & Value = vtMissing,
        const _variant_t & DDL = vtMissing );
    _RelationPtr CreateRelation (
        const _variant_t & Name = vtMissing,
        const _variant_t & Table = vtMissing,
        const _variant_t & ForeignTable = vtMissing,
        const _variant_t & Attributes = vtMissing );
    _TableDefPtr CreateTableDef (
        const _variant_t & Name = vtMissing,
        const _variant_t & Attributes = vtMissing,
        const _variant_t & SourceTableName = vtMissing,
        const _variant_t & Connect = vtMissing );
    HRESULT BeginTrans ( );
    HRESULT CommitTrans (
        long Options );
    HRESULT Rollback ( );
    RecordsetPtr CreateDynaset (
        _bstr_t Name,
        const _variant_t & Options = vtMissing,
        const _variant_t & Inconsistent = vtMissing );
    _QueryDefPtr CreateQueryDef (
        const _variant_t & Name = vtMissing,
        const _variant_t & SQLText = vtMissing );
    RecordsetPtr CreateSnapshot (
        _bstr_t Source,
        const _variant_t & Options = vtMissing );
    HRESULT DeleteQueryDef (
        _bstr_t Name );
    long ExecuteSQL (
        _bstr_t SQL );
    RecordsetPtr ListFields (
        _bstr_t Name );
    RecordsetPtr ListTables ( );
    _QueryDefPtr OpenQueryDef (
        _bstr_t Name );
    RecordsetPtr OpenTable (
        _bstr_t Name,
        const _variant_t & Options = vtMissing );
    _bstr_t GetReplicaID ( );
    _bstr_t GetDesignMasterID ( );
    void PutDesignMasterID (
        _bstr_t pbstr );
    HRESULT Synchronize (
        _bstr_t DbPathName,
        const _variant_t & ExchangeType = vtMissing );
    HRESULT MakeReplica (
        _bstr_t PathName,
        _bstr_t Description,
        const _variant_t & Options = vtMissing );
    void PutConnect (
        _bstr_t pbstr );
    HRESULT NewPassword (
        _bstr_t bstrOld,
        _bstr_t bstrNew );
    RecordsetPtr OpenRecordset (
        _bstr_t Name,
        const _variant_t & Type = vtMissing,
        const _variant_t & Options = vtMissing,
        const _variant_t & LockEdit = vtMissing );
    ConnectionPtr GetConnection ( );
    HRESULT PopulatePartial (
        _bstr_t DbPathName );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_CollatingOrder (
        long * pl ) = 0;
    virtual HRESULT __stdcall get_Connect (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall get_Name (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall get_QueryTimeout (
        short * ps ) = 0;
    virtual HRESULT __stdcall put_QueryTimeout (
        short ps ) = 0;
    virtual HRESULT __stdcall get_Transactions (
        VARIANT_BOOL * pb ) = 0;
    virtual HRESULT __stdcall get_Updatable (
        VARIANT_BOOL * pb ) = 0;
    virtual HRESULT __stdcall get_Version (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall get_RecordsAffected (
        long * pl ) = 0;
    virtual HRESULT __stdcall get_TableDefs (
        struct TableDefs * * pptdfs ) = 0;
    virtual HRESULT __stdcall get_QueryDefs (
        struct QueryDefs * * ppqdfs ) = 0;
    virtual HRESULT __stdcall get_Relations (
        struct Relations * * pprls ) = 0;
    virtual HRESULT __stdcall get_Containers (
        struct Containers * * ppctns ) = 0;
    virtual HRESULT __stdcall get_Recordsets (
        struct Recordsets * * pprsts ) = 0;
    virtual HRESULT __stdcall raw_Close ( ) = 0;
    virtual HRESULT __stdcall raw_Execute (
        BSTR Query,
        VARIANT Options = vtMissing ) = 0;
    virtual HRESULT __stdcall raw__30_OpenRecordset (
        BSTR Name,
        VARIANT Type,
        VARIANT Options,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall raw_CreateProperty (
        VARIANT Name,
        VARIANT Type,
        VARIANT Value,
        VARIANT DDL,
        struct Property * * pprp ) = 0;
    virtual HRESULT __stdcall raw_CreateRelation (
        VARIANT Name,
        VARIANT Table,
        VARIANT ForeignTable,
        VARIANT Attributes,
        struct _Relation * * pprel ) = 0;
    virtual HRESULT __stdcall raw_CreateTableDef (
        VARIANT Name,
        VARIANT Attributes,
        VARIANT SourceTableName,
        VARIANT Connect,
        struct _TableDef * * pptdf ) = 0;
    virtual HRESULT __stdcall raw_BeginTrans ( ) = 0;
    virtual HRESULT __stdcall raw_CommitTrans (
        long Options ) = 0;
    virtual HRESULT __stdcall raw_Rollback ( ) = 0;
    virtual HRESULT __stdcall raw_CreateDynaset (
        BSTR Name,
        VARIANT Options,
        VARIANT Inconsistent,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall raw_CreateQueryDef (
        VARIANT Name,
        VARIANT SQLText,
        struct _QueryDef * * ppqdf ) = 0;
    virtual HRESULT __stdcall raw_CreateSnapshot (
        BSTR Source,
        VARIANT Options,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall raw_DeleteQueryDef (
        BSTR Name ) = 0;
    virtual HRESULT __stdcall raw_ExecuteSQL (
        BSTR SQL,
        long * pl ) = 0;
    virtual HRESULT __stdcall raw_ListFields (
        BSTR Name,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall raw_ListTables (
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall raw_OpenQueryDef (
        BSTR Name,
        struct _QueryDef * * ppqdf ) = 0;
    virtual HRESULT __stdcall raw_OpenTable (
        BSTR Name,
        VARIANT Options,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall get_ReplicaID (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall get_DesignMasterID (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put_DesignMasterID (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall raw_Synchronize (
        BSTR DbPathName,
        VARIANT ExchangeType = vtMissing ) = 0;
    virtual HRESULT __stdcall raw_MakeReplica (
        BSTR PathName,
        BSTR Description,
        VARIANT Options = vtMissing ) = 0;
    virtual HRESULT __stdcall put_Connect (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall raw_NewPassword (
        BSTR bstrOld,
        BSTR bstrNew ) = 0;
    virtual HRESULT __stdcall raw_OpenRecordset (
        BSTR Name,
        VARIANT Type,
        VARIANT Options,
        VARIANT LockEdit,
        struct Recordset * * pprst ) = 0;
    virtual HRESULT __stdcall get_Connection (
        struct Connection * * ppCn ) = 0;
    virtual HRESULT __stdcall raw_PopulatePartial (
        BSTR DbPathName ) = 0;
};

struct __declspec(uuid("0000004b-0000-0010-8000-00aa006d2ea4"))
TableDefs : _DynaCollection
{
    //
    // Property data
    //

    __declspec(property(get=GetItem))
    _TableDefPtr Item[];

    //
    // Wrapper methods for error-handling
    //

    _TableDefPtr GetItem (
        const _variant_t & Item );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Item (