vc 擷取程式版本號碼,當前程式路徑,檔案修改時間 等

來源:互聯網
上載者:User

擷取版本:

 

CString GetFileVersion(char* FileName)<br />{<br />int iVerInfoSize;<br />char *pBuf;<br />CString asVer="";<br />VS_FIXEDFILEINFO *pVsInfo;<br />unsigned int iFileInfoSize = sizeof( VS_FIXEDFILEINFO );</p><p>iVerInfoSize = GetFileVersionInfoSize(FileName,NULL); </p><p>if(iVerInfoSize!= 0)<br />{<br />pBuf = new char[iVerInfoSize];<br />if(GetFileVersionInfo(FileName,0, iVerInfoSize, pBuf ) )<br />{<br />if(VerQueryValue(pBuf, "//",(void **)&pVsInfo,&iFileInfoSize))<br />{<br />asVer.Format("%d.%d.%d.%d",HIWORD(pVsInfo->dwFileVersionMS),LOWORD(pVsInfo->dwFileVersionMS),HIWORD(pVsInfo->dwFileVersionLS),LOWORD(pVsInfo->dwFileVersionLS));<br />}<br />}<br />delete pBuf;<br />}<br />return asVer;<br />}

 

擷取路徑:

CString GetCurrentAppDirectory()<br />{<br />char szFile[MAX_PATH];<br />char szPath[MAX_PATH];<br />GetModuleFileName(NULL,szFile,MAX_PATH);<br />size_t i;<br />for(i=strlen(szFile)-1; i>0 && szFile[i]!='//'; i--);<br />szFile[i]='/0';<br />strcpy(szPath,szFile);<br />return (szPath);<br />}

 

擷取修改時間:

CString GetModifyTime(CString appname)<br />{<br />WIN32_FIND_DATA ffd ;<br />HANDLE hFind = FindFirstFile(appname,&ffd);<br />SYSTEMTIME stUTC, stLocal;<br />FileTimeToSystemTime(&(ffd.ftLastWriteTime), &stUTC);<br />SystemTimeToTzSpecificLocalTime(NULL, &stUTC, &stLocal);<br />CString strTmp;<br />strTmp.Format("%d-%d-%d,%d:%d", stLocal.wYear,stLocal.wMonth,stLocal.wDay,stLocal.wHour,stLocal.wMinute);<br />//--<br />return strTmp;<br />}

 

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.