使用这个函数:
CString AppPath()
{
CString sModFileName;
CString str1;
GetModuleFileName(NULL, sModFileName.GetBuffer(MAX_PATH), MAX_PATH);
sModFileName.ReleaseBuffer();
str1=sModFileName;
str1.MakeReverse();
return(sModFileName.Left(sModFileName.GetLength() - str1.Find('\\')));
 
}

解决方案 »

  1.   

    或者GetModuleFileName,然后取掉可执行文件名
      

  2.   

    char sFilePathBuf[1024];
    ::GetModuleFileName(AfxGetInstanceHandle(), sFilePathBuf, 1024);
    得到的是执行文件全路径名,再分解即可。
      

  3.   

    我也有个函数:
    CString GetMyDirectory()
    {
    TCHAR sFilename[_MAX_PATH];
    TCHAR sDrive[_MAX_DRIVE];
    TCHAR sDir[_MAX_DIR];
    TCHAR sFname[_MAX_FNAME];
    TCHAR sExt[_MAX_EXT];
    GetModuleFileName(AfxGetInstanceHandle(), sFilename, _MAX_PATH);
    _tsplitpath(sFilename, sDrive, sDir, sFname, sExt);CString rVal(CString(sDrive) + CString(sDir));
    if (rVal.Right(1)) != _T('\\'))
    rVal += _T("\\"); 
    return rVal;