dao360.tlh

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

enum _DAOSuppHelp
{
    LogMessages = 0,
    KeepLocal = 0,
    Replicable = 0,
    ReplicableBool = 0,
    V1xNullBehavior = 0
};

struct __declspec(uuid("0000000a-0000-0010-8000-00aa006d2ea4"))
_DAO : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetProperties))
    PropertiesPtr Properties;

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

    PropertiesPtr GetProperties ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Properties (
        struct Properties * * ppprops ) = 0;
};

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

    __declspec(property(get=GetVersion))
    _bstr_t Version;
    __declspec(property(get=GetIniPath,put=PutIniPath))
    _bstr_t IniPath;
    __declspec(property(get=GetWorkspaces))
    WorkspacesPtr Workspaces;
    __declspec(property(put=PutDefaultUser))
    _bstr_t DefaultUser;
    __declspec(property(put=PutDefaultPassword))
    _bstr_t DefaultPassword;
    __declspec(property(get=GetLoginTimeout,put=PutLoginTimeout))
    short LoginTimeout;
    __declspec(property(get=GetErrors))
    ErrorsPtr Errors;
    __declspec(property(get=GetSystemDB,put=PutSystemDB))
    _bstr_t SystemDB;
    __declspec(property(get=GetDefaultType,put=PutDefaultType))
    long DefaultType;

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

    _bstr_t GetVersion ( );
    _bstr_t GetIniPath ( );
    void PutIniPath (
        _bstr_t pbstr );
    void PutDefaultUser (
        _bstr_t _arg1 );
    void PutDefaultPassword (
        _bstr_t _arg1 );
    short GetLoginTimeout ( );
    void PutLoginTimeout (
        short ps );
    WorkspacesPtr GetWorkspaces ( );
    ErrorsPtr GetErrors ( );
    HRESULT Idle (
        const _variant_t & Action = vtMissing );
    HRESULT CompactDatabase (
        _bstr_t SrcName,
        _bstr_t DstName,
        const _variant_t & DstLocale = vtMissing,
        const _variant_t & Options = vtMissing,
        const _variant_t & SrcLocale = vtMissing );
    HRESULT RepairDatabase (
        _bstr_t Name );
    HRESULT RegisterDatabase (
        _bstr_t Dsn,
        _bstr_t Driver,
        VARIANT_BOOL Silent,
        _bstr_t Attributes );
    WorkspacePtr _30_CreateWorkspace (
        _bstr_t Name,
        _bstr_t UserName,
        _bstr_t Password );
    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 Locale,
        const _variant_t & Option = vtMissing );
    HRESULT FreeLocks ( );
    HRESULT BeginTrans ( );
    HRESULT CommitTrans (
        long Option );
    HRESULT Rollback ( );
    HRESULT SetDefaultWorkspace (
        _bstr_t Name,
        _bstr_t Password );
    HRESULT SetDataAccessOption (
        short Option,
        const _variant_t & Value );
    long ISAMStats (
        long StatNum,
        const _variant_t & Reset = vtMissing );
    _bstr_t GetSystemDB ( );
    void PutSystemDB (
        _bstr_t pbstr );
    WorkspacePtr CreateWorkspace (
        _bstr_t Name,
        _bstr_t UserName,
        _bstr_t Password,
        const _variant_t & UseType = vtMissing );
    ConnectionPtr OpenConnection (
        _bstr_t Name,
        const _variant_t & Options = vtMissing,
        const _variant_t & ReadOnly = vtMissing,
        const _variant_t & Connect = vtMissing );
    long GetDefaultType ( );
    void PutDefaultType (
        long Option );
    HRESULT SetOption (
        long Option,
        const _variant_t & Value );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Version (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall get_IniPath (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put_IniPath (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall put_DefaultUser (
        BSTR _arg1 ) = 0;
    virtual HRESULT __stdcall put_DefaultPassword (
        BSTR _arg1 ) = 0;
    virtual HRESULT __stdcall get_LoginTimeout (
        short * ps ) = 0;
    virtual HRESULT __stdcall put_LoginTimeout (
        short ps ) = 0;
    virtual HRESULT __stdcall get_Workspaces (
        struct Workspaces * * ppworks ) = 0;
    virtual HRESULT __stdcall get_Errors (
        struct Errors * * pperrs ) = 0;
    virtual HRESULT __stdcall raw_Idle (
        VARIANT Action = vtMissing ) = 0;
    virtual HRESULT __stdcall raw_CompactDatabase (
        BSTR SrcName,
        BSTR DstName,
        VARIANT DstLocale = vtMissing,
        VARIANT Options = vtMissing,
        VARIANT SrcLocale = vtMissing ) = 0;
    virtual HRESULT __stdcall raw_RepairDatabase (
        BSTR Name ) = 0;
    virtual HRESULT __stdcall raw_RegisterDatabase (
        BSTR Dsn,
        BSTR Driver,
        VARIANT_BOOL Silent,
        BSTR Attributes ) = 0;
    virtual HRESULT __stdcall raw__30_CreateWorkspace (
        BSTR Name,
        BSTR UserName,
        BSTR Password,
        struct Workspace * * ppwrk ) = 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 Locale,
        VARIANT Option,
        struct Database * * ppDb ) = 0;
    virtual HRESULT __stdcall raw_FreeLocks ( ) = 0;
    virtual HRESULT __stdcall raw_BeginTrans ( ) = 0;
    virtual HRESULT __stdcall raw_CommitTrans (
        long Option ) = 0;
    virtual HRESULT __stdcall raw_Rollback ( ) = 0;
    virtual HRESULT __stdcall raw_SetDefaultWorkspace (
        BSTR Name,
        BSTR Password ) = 0;
    virtual HRESULT __stdcall raw_SetDataAccessOption (
        short Option,
        VARIANT Value ) = 0;
    virtual HRESULT __stdcall raw_ISAMStats (
        long StatNum,
        VARIANT Reset,
        long * pl ) = 0;
    virtual HRESULT __stdcall get_SystemDB (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put_SystemDB (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall raw_CreateWorkspace (
        BSTR Name,
        BSTR UserName,
        BSTR Password,
        VARIANT UseType,
        struct Workspace * * ppwrk ) = 0;
    virtual HRESULT __stdcall raw_OpenConnection (
        BSTR Name,
        VARIANT Options,
        VARIANT ReadOnly,
        VARIANT Connect,
        struct Connection * * ppconn ) = 0;
    virtual HRESULT __stdcall get_DefaultType (
        long * Option ) = 0;
    virtual HRESULT __stdcall put_DefaultType (
        long Option ) = 0;
    virtual HRESULT __stdcall raw_SetOption (
        long Option,
        VARIANT Value ) = 0;
};

struct __declspec(uuid("000000a0-0000-0010-8000-00aa006d2ea4"))
_Collection : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetCount))
    short Count;

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

    short GetCount ( );
    IUnknownPtr _NewEnum ( );
    HRESULT Refresh ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Count (
        short * c ) = 0;
    virtual HRESULT __stdcall raw__NewEnum (
        IUnknown * * ppunk ) = 0;
    virtual HRESULT __stdcall raw_Refresh ( ) = 0;
};

struct __declspec(uuid("000000a2-0000-0010-8000-00aa006d2ea4"))
_DynaCollection : _Collection
{
    //
    // Wrapper methods for error-handling
    //

    HRESULT Append (
        IDispatch * Object );
    HRESULT Delete (
        _bstr_t Name );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall raw_Append (
        IDispatch * Object ) = 0;
    virtual HRESULT __stdcall raw_Delete (
        BSTR Name ) = 0;
};

struct __declspec(uuid("00000029-0000-0010-8000-00aa006d2ea4"))
Properties : _DynaCollection
{
    //
    // Property data
    //

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

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

    PropertyPtr GetItem (
        const _variant_t & Item );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Item (
        VARIANT Item,
        struct Property * * ppprop ) = 0;
};

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

    __declspec(property(get=GetValue,put=PutValue))
    _variant_t Value;
    __declspec(property(get=GetName,put=PutName))
    _bstr_t Name;
    __declspec(property(get=GetType,put=PutType))
    short Type;
    __declspec(property(get=GetInherited))
    VARIANT_BOOL Inherited;

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

    _variant_t GetValue ( );
    void PutValue (
        const _variant_t & pval );
    _bstr_t GetName ( );
    void PutName (
        _bstr_t pbstr );
    short GetType ( );
    void PutType (
        short ptype );
    VARIANT_BOOL GetInherited ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Value (
        VARIANT * pval ) = 0;
    virtual HRESULT __stdcall put_Value (
        VARIANT pval ) = 0;
    virtual HRESULT __stdcall get_Name (
        BSTR * pbstr ) = 0;
    virtual HRESULT __stdcall put_Name (
        BSTR pbstr ) = 0;
    virtual HRESULT __stdcall get_Type (
        short * ptype ) = 0;
    virtual HRESULT __stdcall put_Type (
        short ptype ) = 0;
    virtual HRESULT __stdcall get_Inherited (
        VARIANT_BOOL * pb ) = 0;
};

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

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

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

    WorkspacePtr GetItem (
        const _variant_t & Item );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Item (
        VARIANT Item,
        struct Workspace * * ppwrk ) = 0;
};

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

    __declspec(property(get=GetName,put=PutName))
    _bstr_t Name;
    __declspec(property(get=GetDatabases))
    DatabasesPtr Databases;
    __declspec(property(get=GetUserName))
    _bstr_t UserName;
    __declspec(property(put=Put_30_UserName))
    _bstr_t _30_UserName;
    __declspec(property(put=Put_30_Password))
    _bstr_t _30_Password;
    __declspec(property(get=GetIsolateODBCTrans,put=PutIsolateODBCTrans))
    short IsolateODBCTrans;
    __declspec(property(get=GetUsers))
    UsersPtr Users;
    __declspec(property(get=GetGroups))
    GroupsPtr Groups;
    __declspec(property(get=GetLoginTimeout,put=PutLoginTimeout))
    long LoginTimeout;
    __declspec(property(get=GetDefaultCursorDriver,put=PutDefaultCursorDriver))
    long DefaultCursorDriver;
    __declspec(property(get=GethEnv))
    long hEnv;
    __declspec(property(get=GetType))
    long Type;
    __declspec(property(get=GetConnections))
    ConnectionsPtr Connections;

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

    _bstr_t GetName ( );