GetCurrentDir() 함수는 현재 폴더의 경로를 리턴합니다.

프로그램이 실행할때는 실행파일의 위치를 리턴하게 되는데,

Open, Save Dialog 등을 실행하면 바뀌기도 한다더군요.

따라서 전역변수로 AnsiString CurDir; 을 선언해주시고,

프로그램 시작 시 저장을 해놓고
CurDir=GetCurrentDir();

함수 실행시에 아래와 같이 하시면 되겠습니다.
AnsiString savepath = CurDir+"\\"+strExcelName;





win 님이 쓰신 글 :
:
: 안녕하세요.
:
: 오늘 하루종일 헤매다가 혹시 도움을 받을 수 있을까해서 질문 하나 올립니다.
:
: 지금 엑셀 파일 저장 기능을 만들고 있습니다.
:
: 그런데 문제가 지정 위치를 정하지않으니 자동으로 "내문서" 위치에 저장이 됩니다.
:
: 그 위치를 실행파일이 저장된 폴더 위치로 바꾸고 싶은데..
:
: 실행파일 저장하는 위치가 고정되어 있지 않게해야되서 값을 고정된 폴더로 넣지 못합니다...
:
: 혹시 방법 있을까요?
:
:
: ////////////////////////////////////////////////////////////////////////////////////////////
:
:     sprintf(temp,"%d%02d%02d",pyear, pmonth, pdata,);
:
:     TestStr=temp;
:     strExcelName = TestStr;
:     AnsiString savepath = strExcelName;
:
:         excel_book.OleProcedure("SaveAs" ,WideString(savepath)); // <--이부분
:         excel_book.OleFunction("Close", (Variant)False);
:         excel_sheet = Unassigned;
:         excel_book = Unassigned;
:         excel_app.OleFunction("Quit");
:         excel_app = Unassigned;
:       
:
: ////////////////////////////////////////////////////////////////////////////////////////////////