国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 绍兴市| 九龙县| 辛集市| 保靖县| 宁强县| 霍州市| 湖南省| 正蓝旗| 桃江县| 东丽区| 格尔木市| 平遥县| 怀仁县| 景德镇市| 水富县| 台中县| 玛多县| 新疆| 克山县| 罗甸县| 双柏县| 东安县| 金乡县| 宁阳县| 新晃| 玉门市| 宜春市| 化隆| 蛟河市| 拉萨市| 晋宁县| 河曲县| 乌兰察布市| 青冈县| 张家界市| 醴陵市| 邯郸县| 红河县| 鄂州市| 岚皋县| 长岭县|