分解路径

分解路径

  //获取当前程序路径名称TCHAR lpPath[MAX_PATH] = {0};   ::GetModuleFileName(NULL, lpPath, MAX_PATH);   CString sPath;    CString sDrive;//磁盘名   CString sDir;//文件路径   CString sFileName;//取出文件路径后的文件名   CString sExt;//文件扩展名 TCHAR drive[_MAX_DRIVE];//磁盘名   TCHAR dir[_MAX_DIR];//路径名   TCHAR fname[_MAX_FNAME];//文件名   TCHAR ext[_MAX_EXT];//扩展名  _wsplitpath(lpPath, drive, dir, fname, ext );  //分解路径sDrive.Format(_T("%s"),drive);  sDir.Format(_T("%s"),dir);  sFileName.Format(_T("%s"),fname);  sExt.Format(_T("%s"),ext);  sPath= sDrive +_T("\\Program Files\\data");  CreateDirectory(sPath,NULL);//创建目录,已有的话不影响