//获取当前程序路径(返回值末端已含有‘/’)
CString _QueryExePath()
{
TCHAR
path[MAX_PATH];
::GetModuleFileName(NULL,path,MAX_PATH);
CString p(path);
int
nPos = p.ReverseFind(
'\\'
);
ASSERT(-1!=nPos);
return
p.Left(nPos+1);
}