sample9excel8.c

用CVI实现的EXCEL自动化服务器演示i

                                       VARIANT arg18, VARIANT arg19,
                                       VARIANT arg20, VARIANT arg21,
                                       VARIANT arg22, VARIANT arg23,
                                       VARIANT arg24, VARIANT arg25,
                                       VARIANT arg26, VARIANT arg27,
                                       VARIANT arg28, VARIANT arg29,
                                       VARIANT arg30,
                                       ExcelObj_Range *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_OBJHANDLE, CAVT_OBJHANDLE, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x2FE, CAVT_OBJHANDLE,
                              returnValue, 30, paramTypes, arg1, arg2, arg3,
                              arg4, arg5, arg6, arg7, arg8, arg9, arg10, arg11,
                              arg12, arg13, arg14, arg15, arg16, arg17, arg18,
                              arg19, arg20, arg21, arg22, arg23, arg24, arg25,
                              arg26, arg27, arg28, arg29, arg30);

    return result;
}

HRESULT CVIFUNC Excel_GlobalRange (CAObjHandle objectHandle,
                                   ERRORINFO *errorInfo, VARIANT cell1,
                                   VARIANT cell2, ExcelObj_Range *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT};

    result = CA_InvokeHelper (objectHandle, errorInfo, 0xC5,
                              DISPATCH_PROPERTYGET, CAVT_OBJHANDLE,
                              returnValue, 2, paramTypes, cell1, cell2);

    return result;
}

HRESULT CVIFUNC Excel_GlobalRun (CAObjHandle objectHandle, ERRORINFO *errorInfo,
                                 VARIANT macro, VARIANT arg1, VARIANT arg2,
                                 VARIANT arg3, VARIANT arg4, VARIANT arg5,
                                 VARIANT arg6, VARIANT arg7, VARIANT arg8,
                                 VARIANT arg9, VARIANT arg10, VARIANT arg11,
                                 VARIANT arg12, VARIANT arg13, VARIANT arg14,
                                 VARIANT arg15, VARIANT arg16, VARIANT arg17,
                                 VARIANT arg18, VARIANT arg19, VARIANT arg20,
                                 VARIANT arg21, VARIANT arg22, VARIANT arg23,
                                 VARIANT arg24, VARIANT arg25, VARIANT arg26,
                                 VARIANT arg27, VARIANT arg28, VARIANT arg29,
                                 VARIANT arg30, VARIANT *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x103, CAVT_VARIANT,
                              returnValue, 31, paramTypes, macro, arg1, arg2,
                              arg3, arg4, arg5, arg6, arg7, arg8, arg9, arg10,
                              arg11, arg12, arg13, arg14, arg15, arg16, arg17,
                              arg18, arg19, arg20, arg21, arg22, arg23, arg24,
                              arg25, arg26, arg27, arg28, arg29, arg30);

    return result;
}

HRESULT CVIFUNC Excel_Global_Run2 (CAObjHandle objectHandle,
                                   ERRORINFO *errorInfo, VARIANT macro,
                                   VARIANT arg1, VARIANT arg2, VARIANT arg3,
                                   VARIANT arg4, VARIANT arg5, VARIANT arg6,
                                   VARIANT arg7, VARIANT arg8, VARIANT arg9,
                                   VARIANT arg10, VARIANT arg11, VARIANT arg12,
                                   VARIANT arg13, VARIANT arg14, VARIANT arg15,
                                   VARIANT arg16, VARIANT arg17, VARIANT arg18,
                                   VARIANT arg19, VARIANT arg20, VARIANT arg21,
                                   VARIANT arg22, VARIANT arg23, VARIANT arg24,
                                   VARIANT arg25, VARIANT arg26, VARIANT arg27,
                                   VARIANT arg28, VARIANT arg29, VARIANT arg30,
                                   VARIANT *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x326, CAVT_VARIANT,
                              returnValue, 31, paramTypes, macro, arg1, arg2,
                              arg3, arg4, arg5, arg6, arg7, arg8, arg9, arg10,
                              arg11, arg12, arg13, arg14, arg15, arg16, arg17,
                              arg18, arg19, arg20, arg21, arg22, arg23, arg24,
                              arg25, arg26, arg27, arg28, arg29, arg30);

    return result;
}

HRESULT CVIFUNC Excel_GlobalSendKeys (CAObjHandle objectHandle,
                                      ERRORINFO *errorInfo, VARIANT keys,
                                      VARIANT wait)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x17F, CAVT_EMPTY, NULL,
                              2, paramTypes, keys, wait);

    return result;
}

HRESULT CVIFUNC Excel_GlobalShortcutMenus (CAObjHandle objectHandle,
                                           ERRORINFO *errorInfo, long index,
                                           ExcelObj_Menu *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_LONG};

    result = CA_InvokeHelper (objectHandle, errorInfo, 0x308,
                              DISPATCH_PROPERTYGET, CAVT_OBJHANDLE,
                              returnValue, 1, paramTypes, index);

    return result;
}

HRESULT CVIFUNC Excel_GlobalUnion (CAObjHandle objectHandle,
                                   ERRORINFO *errorInfo, ExcelObj_Range arg1,
                                   ExcelObj_Range arg2, VARIANT arg3,
                                   VARIANT arg4, VARIANT arg5, VARIANT arg6,
                                   VARIANT arg7, VARIANT arg8, VARIANT arg9,
                                   VARIANT arg10, VARIANT arg11, VARIANT arg12,
                                   VARIANT arg13, VARIANT arg14, VARIANT arg15,
                                   VARIANT arg16, VARIANT arg17, VARIANT arg18,
                                   VARIANT arg19, VARIANT arg20, VARIANT arg21,
                                   VARIANT arg22, VARIANT arg23, VARIANT arg24,
                                   VARIANT arg25, VARIANT arg26, VARIANT arg27,
                                   VARIANT arg28, VARIANT arg29, VARIANT arg30,
                                   ExcelObj_Range *returnValue)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_OBJHANDLE, CAVT_OBJHANDLE, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x30B, CAVT_OBJHANDLE,
                              returnValue, 30, paramTypes, arg1, arg2, arg3,
                              arg4, arg5, arg6, arg7, arg8, arg9, arg10, arg11,
                              arg12, arg13, arg14, arg15, arg16, arg17, arg18,
                              arg19, arg20, arg21, arg22, arg23, arg24, arg25,
                              arg26, arg27, arg28, arg29, arg30);

    return result;
}

HRESULT CVIFUNC Excel_NewWorksheet (char *server, CAObjHandle *objectHandle)
{
    HRESULT result;
    GUID clsid = {0x20820, 0x0, 0x0, 0xC0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x46};

    result = CA_CreateObjectByClassId (&clsid, server, objectHandle);

    return result;
}

HRESULT CVIFUNC Excel_OpenWorksheet (char *fileName, char *server,
                                     CAObjHandle *objectHandle)
{
    HRESULT result;
    GUID clsid = {0x20820, 0x0, 0x0, 0xC0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x46};

    result = CA_LoadObjectFromFileByClassId (fileName, &clsid, server,
                                             objectHandle);

    return result;
}

HRESULT CVIFUNC Excel_ActiveWorksheet (char *server, CAObjHandle *objectHandle)
{
    HRESULT result;
    GUID clsid = {0x20820, 0x0, 0x0, 0xC0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x46};

    result = CA_GetActiveObjectByClassId (&clsid, server, objectHandle);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetActivate (CAObjHandle objectHandle,
                                         ERRORINFO *errorInfo)
{
    HRESULT result;

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x130, CAVT_EMPTY, NULL,
                              0, NULL);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetCopy (CAObjHandle objectHandle,
                                     ERRORINFO *errorInfo, VARIANT before,
                                     VARIANT after)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x227, CAVT_EMPTY, NULL,
                              2, paramTypes, before, after);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetDelete (CAObjHandle objectHandle,
                                       ERRORINFO *errorInfo)
{
    HRESULT result;

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x75, CAVT_EMPTY, NULL,
                              0, NULL);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetMove (CAObjHandle objectHandle,
                                     ERRORINFO *errorInfo, VARIANT before,
                                     VARIANT after)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x27D, CAVT_EMPTY, NULL,
                              2, paramTypes, before, after);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetPrintOut (CAObjHandle objectHandle,
                                         ERRORINFO *errorInfo, VARIANT from,
                                         VARIANT to, VARIANT copies,
                                         VARIANT preview, VARIANT activePrinter,
                                         VARIANT printToFile, VARIANT collate)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x389, CAVT_EMPTY, NULL,
                              7, paramTypes, from, to, copies, preview,
                              activePrinter, printToFile, collate);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetPrintPreview (CAObjHandle objectHandle,
                                             ERRORINFO *errorInfo,
                                             VARIANT enableChanges)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x119, CAVT_EMPTY, NULL,
                              1, paramTypes, enableChanges);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetProtect (CAObjHandle objectHandle,
                                        ERRORINFO *errorInfo, VARIANT password,
                                        VARIANT drawingObjects, VARIANT contents,
                                        VARIANT scenarios,
                                        VARIANT userInterfaceOnly)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x11A, CAVT_EMPTY, NULL,
                              5, paramTypes, password, drawingObjects,
                              contents, scenarios, userInterfaceOnly);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetSaveAs (CAObjHandle objectHandle,
                                       ERRORINFO *errorInfo, char *filename,
                                       VARIANT fileFormat, VARIANT password,
                                       VARIANT writeResPassword,
                                       VARIANT readOnlyRecommended,
                                       VARIANT createBackup, VARIANT addToMru,
                                       VARIANT textCodepage,
                                       VARIANT textVisualLayout)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_CSTRING, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT,
                                 CAVT_VARIANT, CAVT_VARIANT, CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0x11C, CAVT_EMPTY, NULL,
                              9, paramTypes, filename, fileFormat, password,
                              writeResPassword, readOnlyRecommended,
                              createBackup, addToMru, textCodepage,
                              textVisualLayout);

    return result;
}

HRESULT CVIFUNC Excel_WorksheetSelect (CAObjHandle objectHandle,
                                       ERRORINFO *errorInfo, VARIANT replace)
{
    HRESULT result;
    unsigned int paramTypes[] = {CAVT_VARIANT};

    result = CA_MethodInvoke (objectHandle, errorInfo, 0xEB, CAVT_EMPTY, NULL,