国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 學(xué)院 > 開(kāi)發(fā)設(shè)計(jì) > 正文

vsC#數(shù)據(jù)庫(kù)導(dǎo)入EXCLE

2019-11-14 13:37:46
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Data.SqlClient;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using Microsoft.Office.Core ;
using Excel=Microsoft.Office.Interop.Excel;
 
namespace ExcelReport
{
    public partial class FormExcelNormal : Form
    {
        public FormExcelNormal()
        {
            InitializeComponent();
        }
 
        PRivate void FormExcelNormal_Load(object sender, EventArgs e)
        {
            DataSet objDataSet = FormUtil.FormGridView("MEMBERINFO");
            dgvMemberInfo.DataSource = objDataSet.Tables["MEMBERINFO"];
        }
        // Excel導(dǎo)出
        private void btnExcelOut_Click(object sender, EventArgs e)
        {
            string strConnect = System.Configuration.ConfigurationSettings.AppSettings["connStr"];
            SqlConnection objConnection = new SqlConnection(strConnect);
            SqlCommand objCommand = new SqlCommand("SELECT MEMBERNAME, SEX, AREA, EMAIL FROM MEMBERINFO", objConnection);
            DataSet objDataset = new DataSet();
            SqlDataAdapter objAdapter = new SqlDataAdapter(objCommand);
            // 數(shù)據(jù)填充
            objConnection.Open();
            objAdapter.Fill(objDataset, "Excel");
            objConnection.Close();
 
            // 創(chuàng)建Excel對(duì)象
            Excel.application xlApp = new Excel.Application();
            Excel.Workbook wb = xlApp.Workbooks.Add(Excel.XlWBATemplate.xlWBATWorksheet);
            Excel.Worksheet ws = (Excel.Worksheet)wb.Worksheets[1];
            Excel.Range targetRange = xlApp.get_Range("A1");
 
            // 設(shè)置標(biāo)題
            xlApp.Cells[1, 1] = "會(huì)員姓名";
            xlApp.Cells[1, 2] = "性別";
            xlApp.Cells[1, 3] = "籍貫";
            xlApp.Cells[1, 4] = "電子郵件";
 
            // 設(shè)置格式
            int iMaxRow = objDataset.Tables["Excel"].Rows.Count;
            int iMaxCol = objDataset.Tables["Excel"].Columns.Count;
            ws.get_Range(ws.Cells[1, 1], ws.Cells[1, iMaxCol]).Font.Name = "黑體";
            ws.get_Range(ws.Cells[1, 1], ws.Cells[1, iMaxCol]).Font.Bold = true;
            ws.get_Range(ws.Cells[1, 1], ws.Cells[iMaxRow + 1, iMaxCol]).Borders.LineStyle = 1;
 
            // 填充數(shù)據(jù)
            for (int iRow = 0; iRow < iMaxRow; iRow++)
            {
                for (int iCol = 0; iCol < iMaxCol; iCol++)
                {
                    xlApp.Cells[iRow + 2, iCol + 1] = objDataset.Tables["Excel"].Rows[iRow][iCol].ToString();
                }
            }
            // 保存Excel
            xlApp.Save("sheet1.xls");
            // 打開(kāi)Excel
            xlApp.Visible = true;
        }
    }
}


發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 道真| 临高县| 米林县| 合水县| 唐海县| 上栗县| 卢湾区| 大庆市| 宽甸| 临武县| 岢岚县| 嘉黎县| 佛教| 新蔡县| 凤翔县| 虹口区| 章丘市| 南川市| 子长县| 宁蒗| 达日县| 通道| 安龙县| 江安县| 道孚县| 应城市| 云霄县| 兴安盟| 新晃| 西华县| 呼和浩特市| 淮阳县| 怀远县| 文安县| 名山县| 门头沟区| 峨山| 江西省| 临颍县| 会宁县| 东宁县|