16,550
社区成员
发帖
与我相关
我的任务
分享获取office的版本
请问怎么样知道用户使用的当前OFFICE版本，我要使用OFFICE的库（#import "OFFICE库的路径"），所以需要条件编译，如果是OFFICE2000的我就使用OFFICE2000的库，如果是OFFICE2003的我就使用OFFICE2003的库，请问代码怎么写？谢谢大家先！
...全文
请发表友善的回复…
发表回复
xuzheng318 2006-01-17
- 打赏
- 举报
_Application app;
CString version = app.GetVersion();
version == "10.0" XP
version == "9.0" 2000
version == "8.0" 97
CString version = app.GetVersion();
version == "10.0" XP
version == "9.0" 2000
version == "8.0" 97
dawner_2001 2006-01-17
- 打赏
- 举报
if (OpenFile (FileName, &of, OF_EXIST) != HFILE_ERROR)
{
dwType = 0;
//
dwSize = GetFileVersionInfoSize (FileName, &dwType);
if (dwSize)
{
VS_FIXEDFILEINFO * pVer;
UINT uiLen;
LPSTR lpBuf;
char szName[MAX_PATH];
lpBuf = (LPSTR)GlobalAlloc (GPTR, dwSize + 1);
GetFileVersionInfo (FileName, 0, dwSize, lpBuf);
VerQueryValue (lpBuf, "\\", &pVer, &uiLen);
wsprintf (szName, "%d.%d",
HIWORD (pVer->dwFileVersionMS), LOWORD (pVer->dwFileVersionMS));
}
然后判断szName.就是版本信息.
}
{
dwType = 0;
//
dwSize = GetFileVersionInfoSize (FileName, &dwType);
if (dwSize)
{
VS_FIXEDFILEINFO * pVer;
UINT uiLen;
LPSTR lpBuf;
char szName[MAX_PATH];
lpBuf = (LPSTR)GlobalAlloc (GPTR, dwSize + 1);
GetFileVersionInfo (FileName, 0, dwSize, lpBuf);
VerQueryValue (lpBuf, "\\", &pVer, &uiLen);
wsprintf (szName, "%d.%d",
HIWORD (pVer->dwFileVersionMS), LOWORD (pVer->dwFileVersionMS));
}
然后判断szName.就是版本信息.
}
lixiaosan 2006-01-17
- 打赏
- 举报
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office
lixiaosan 2006-01-17
- 打赏
- 举报
查注册表
lovingyou 2006-01-17
- 打赏
- 举报
麻烦各位大侠了！
蒋晟 2006-01-17
- 打赏
- 举报
……
同一台计算机上可以有多个Office版本的。你可以查找注册表，从最高版本的注册项开始。
同一台计算机上可以有多个Office版本的。你可以查找注册表，从最高版本的注册项开始。
