/* ÀÎüÀÚ¿øÀºÇà ¿¢¼¿ÀúÀå (SMAEI00100.xrw - JScript ) - Version : 1) : Ver.1.00.01 */ /************************************************************************************************************************/ /** * @group : * @ver : * @by : ±è±â¿ë * @--------------------------------------------------- * @type : function * @access : public * @desc : ±×¸®µå º° ¿¢¼¿ÀúÀå * @param : * @return : * @--------------------------------------------------- */ function saveExcelAll() { var paramLen = saveExcelAll.arguments.length; // ¸¶Áö¸· ÀÎÀÚ°¡ BooleanÀÏ °æ¿ì ó¸® var extendsCaptionBool; if( typeof(saveExcelAll.arguments[paramLen - 1]) == "boolean" ) { extendsCaptionBool = saveExcelAll.arguments[paramLen - 1]; paramLen = paramLen - 1; } else{ extendsCaptionBool = false; } var tmpParamArray = new Array(); if( extendsCaptionBool ) { for( var i = 0; i < paramLen; i++ ) { tmpParamArray[i] = saveExcelAll.arguments[i]; } saveExcelAllWithCaption(tmpParamArray); } else{ for( var i = 0; i < paramLen; i++ ) { tmpParamArray[i] = saveExcelAll.arguments[i]; } saveExcelAllWithNotCaption(tmpParamArray); } } function saveExcelAllWithCaption( sheetArray ) { // alert(gridCaptionArray); var fileName = window.fileDialog("save", ",", false, "excel", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); if( fileName == "" ) return; // var sheetArray = new Array("grd_bizprescondstats|¾÷¹«ÇöȲ", "grd_patprescondstats|ȯÀÚÇöȲ", "grd_hdstatsinfo|Ç÷¾×Åõ¼®ÇöȲ", "grd_pdstatsinfo|º¹¸·Åõ¼®ÇöȲ", "grd_pdbizstatsinfo|º¹¸·Åõ¼®¾÷¹«ÇöȲ"); var sheetArrayLen = sheetArray.length; var gridId; var gridObj; for( var i = 0; i < sheetArray.length; i++ ) { gridId = sheetArray[i].split("|")[0]; gridObj = document.all.item(gridId); // saveText() ÇÔ¼ö´Â CaptionÀúÀåÀÌ ºÒ°¡´É ÇÏ¿© SaveExcel()À» ÀÌ¿ëÇÑ´Ù. gridObj.saveExcel("C:\\Temp\\tmp_TFExcel_" + i +".xls"); } // excel application ½ÇÇàÇÔ tfexcel.launchnewinstance(0); //½ÇÇàµÈ excel application¿¡¼­ »õ·Î¿î workbookÀ» »ý¼º tfexcel.createworkbook(); tfexcel.activatesheet(1); var sheetName; var nResult; for( var i = 0; i < sheetArrayLen; i++ ) { sheetName = sheetArray[i].split("|")[1]; nResult = tfexcel.addsheet(i+1, sheetName); if( nResult < 0 ) { messageBox(sheetName + " ÀúÀåÀ»", "E009"); // alert(sheetName + " ¿À·ù¹ß»ý"); return; } tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel_" + i + ".xls"); } tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel.xls"); //workbookÀ» ÀúÀå. tfexcel.save(fileName); //excel applicationÀ» Á¾·á. excel application »ý¼º ÈÄ ¹Ýµå½Ã closeÇØ¾ßÇÔ. tfexcel.close(); var fso = new ActiveXObject("Scripting.FileSystemObject"); for( var i = 0; i < sheetArrayLen; i++ ) { fso.DeleteFile("C:\\Temp\\tmp_TFExcel_" + i + ".xls"); } var rmsg = messageBox("ÀúÀåµÈ ExcelÀ»", "Q004"); // var rmsg = window.alert("ÀúÀåµÈ ExcelÀ» ½ÇÇàÇϽðڽÀ´Ï±î?", "¾Ë¸²", 36); if( rmsg == 6 ) window.exec("excel.exe", '\"' + fileName + '\"'); } function saveExcelAllWithNotCaption( sheetArray ) { // alert(gridCaptionArray); var fileName = window.fileDialog("save", ",", false, "excel", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); if( fileName == "" ) return; // excel application ½ÇÇàÇÔ tfexcel.launchnewinstance(0); // ½ÇÇàµÈ excel application¿¡¼­ »õ·Î¿î workbookÀ» »ý¼º tfexcel.createworkbook(); // var sheetArray = new Array("grd_bizprescondstats|¾÷¹«ÇöȲ", "grd_patprescondstats|ȯÀÚÇöȲ", "grd_hdstatsinfo|Ç÷¾×Åõ¼®ÇöȲ", "grd_pdstatsinfo|º¹¸·Åõ¼®ÇöȲ", "grd_pdbizstatsinfo|º¹¸·Åõ¼®¾÷¹«ÇöȲ"); var sheetArrayLen = sheetArray.length; var gridId; var gridObj; var sheetName; var nResult; for( var i = 0; i < sheetArrayLen; i++ ) { gridId = sheetArray[i].split("|")[0]; gridObj = document.all.item(gridId); sheetName = sheetArray[i].split("|")[1]; if( i > 1 ) { nResult = tfexcel.activatesheet(i+1); tfexcel.sheetname(i+1) = sheetName; } else { nResult = tfexcel.addsheet(i+1, sheetName); } if( nResult < 0 ) { messageBox(sheetName + " ÀúÀåÀ»", "E009"); // alert(sheetName + " ¿À·ù¹ß»ý"); return; } gridObj.saveText("C:\\Temp\\tmp_TFExcel.csv", "\n", ",", '\:', true); tfexcel.loadCSV("C:\\Temp\\tmp_TFExcel.csv"); } //workbookÀ» ÀúÀå. tfexcel.save(fileName); //excel applicationÀ» Á¾·á. excel application »ý¼º ÈÄ ¹Ýµå½Ã closeÇØ¾ßÇÔ. tfexcel.close(); // CSV File »èÁ¦ var fso = new ActiveXObject("Scripting.FileSystemObject"); fso.DeleteFile("C:\\Temp\\tmp_TFExcel.csv"); var rmsg = messageBox("ÀúÀåµÈ ExcelÀ»", "Q004"); // var rmsg = window.alert("ÀúÀåµÈ ExcelÀ» ½ÇÇàÇϽðڽÀ´Ï±î?", "¾Ë¸²", 36); if( rmsg == 6 ) window.exec("excel.exe", '\"' + fileName + '\"'); } function createTFExcel(tfExcelID, parentObj) { if( parentObj == null ) parentObj = body; var tfExcelObj = parentObj.createChild("xforms:object", "id:" + tfExcelID + "; clsid:{fe8d1001-6a9d-424d-ae2a-301493bb12da}; left:100px; top:100px; width:100px; height:100px; "); return tfExcelObj; } /************************************************************************************************************************/