Beispiel #1
0
        public ActionResult ExportStudentResult(Guid?key)
        {
            if (key == null)
            {
                return(new HttpStatusCodeResult(HttpStatusCode.BadRequest));
            }
            Lecture lecture = _lectureService.GetLecture((Guid)key);

            if (lecture == null)
            {
                return(HttpNotFound());
            }

            ResultHelper resultHelper = new ResultHelper();
            IEnumerable <ExportResult_View> results = resultHelper.ExportGetByLecture(lecture);

            var 學生列表 = results.Select(d => new
            {
                d.Employee_ID,
                d.Compeny,
                d.Student_Name,
                Gender = (GenderEnum)d.Gender,
                d.Birthday,
                d.Email,
                d.Phone_Number,
                d.Goal_Name,
                d.D,
                d.I,
                d.S,
                d.C,
                d.Ability,
                d.Horizontal_Score,
                d.Vertical_Score,
                d.T1_Name,
                d.T2_Name,
                d.T3_Name
            });
            XLWorkbook   活頁簿  = new XLWorkbook();
            IXLWorksheet 工作表1 = 活頁簿.Worksheets.Add("自訂工作表名稱");

            工作表1.Cell(1, 1).Value  = "學號";
            工作表1.Cell(1, 2).Value  = "系所";
            工作表1.Cell(1, 3).Value  = "姓名";
            工作表1.Cell(1, 4).Value  = "性別";
            工作表1.Cell(1, 5).Value  = "生日";
            工作表1.Cell(1, 6).Value  = "電子信箱";
            工作表1.Cell(1, 7).Value  = "手機";
            工作表1.Cell(1, 8).Value  = "圓夢新思維工作首要條件";
            工作表1.Cell(1, 9).Value  = "D";
            工作表1.Cell(1, 10).Value = "I";
            工作表1.Cell(1, 11).Value = "S";
            工作表1.Cell(1, 12).Value = "C";
            工作表1.Cell(1, 13).Value = "業務能力";
            工作表1.Cell(1, 14).Value = "橫座標";
            工作表1.Cell(1, 15).Value = "縱座標";
            工作表1.Cell(1, 16).Value = "最重要";
            工作表1.Cell(1, 17).Value = "次重要";
            工作表1.Cell(1, 18).Value = "重要";



            工作表1.Cell(2, 1).InsertData(學生列表);
            string FileName = "StudentResult.xlsx";
            string FileUrl  = Server.MapPath("~/XML/" + FileName);

            活頁簿.SaveAs(FileUrl);
            return(File(FileUrl, "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet", $"{lecture.Name}學生資料.xlsx"));
        }