导出Excel表格

private void ToExcel()
        {
            IList<CRM.Model.KeyWord> lstKey = new CRM.BLL.KeyWordManager().GetAllKeyWords();
            Response.AppendHeader("Content-Disposition", "attachment;filename=" + DateTime.Now.ToString("yyyyMMdd") + ".xls");
            Response.ContentEncoding = System.Text.Encoding.Default;
            Response.ContentType = "applicationnd.ms-excel";
            Response.Write("关键字编号\t主题\t内容\n");
            foreach (CRM.Model.KeyWord key in lstKey)
            {
                Response.Write(string.Format("{0}\t{1}\t{2}\n",
                    key.KeyWordKey,
                    key.ThemeKey,
                    key.KeyContent));
            }
            Response.End();
        }