SQL導出數據到EXCEL的問題

DTS導出嚮導 不會  我這有個是用C#語言寫的 

try
  {
            Excel.Application xApp = new Excel.ApplicationClass();
            xApp.Visible = true;
 //Excel.Workbook xBook = xApp.Workbooks.Add(Missing.Value);//新建一個
  Excel.Workbook xBook = xApp.Workbooks._Open(@"G:\MS2004.xls", Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);//打開一個事先建好的excel 文件
            for (int a = 1; a < 11; a++)
            {
Excel.Worksheet sheet = (Excel.Worksheet)xBook.Worksheets[a];
             sheet.Cells[1, 1] = "A";
                sheet.Cells[1, 2] = "B";
                sheet.Cells[1, 3] = "C";
string consql = "連接字符串";
         SqlConnection myConnection = new SqlConnection(consql);
              myConnection.Open(); 
string sql = "SELECT A,B,C FROM temp_data where(一串東西) and C='" + a+ "'";
 DataSet set = new DataSet();
 SqlDataAdapter sda = new SqlDataAdapter(sql, myConnection);
                sda.Fill(set, "temp_data");
   for (int i = 1; i <= set.Tables[0].Rows.Count; i++)
                {

                    for (int j = 0; j < set.Tables[0].Columns.Count; j++)
                    {
                        int k = i + 1;
                        int n = j + 1;
                        sheet.Cells[k, n] = set.Tables[0].Rows[i - 1][j].ToString();
                    }
                }

  }
            xBook.SaveAs(@"G:\EXCEL\data.xls", Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Excel.XlSaveAsAccessMode.xlNoChange, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);//另存爲

            xApp.Quit(); //這一句是非常重要的,否則Excel對象不能從內存中退出
            xApp = null;

            MessageBox.Show("導出數據成功!", "系統信息");

        }

        catch (Exception ex)
        {
            //MessageBox.Show(ex.Message);
        }
    }

你自己好好看一下  希望對你有幫助  我以前的問題和你的差不多  把數據導入到excel中並且按照一個字段 劃分sheet


發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章