解决后马上结帖！求助：web 中，将dataset内容导入excel中的例子！！谢谢！

Question

http://lucky_elove.www1.dotnetplayground.com/ShowDetail.aspx?id=BF0A54F9-C7C7-4200-BD9A-802AC1F5DE50Private Sub WriteDataGrid2Excel()
    Dim xlsheet As New SpreadsheetClass()
    cnn.Open()
    Dim reader As OleDbDataReader = Me.sql.ExecuteReader()
    Dim numbercols As Integer = reader.FieldCount
    Dim row As Integer = 2
    Dim i As Integer = 0
    ' 输出标题
    For i = 0 To numbercols - 1
      xlsheet.ActiveSheet.Cells(1, i + 1) = reader.GetName(i).ToString()
    Next    ' 输出字段内容
    While (reader.Read())
      For i = 0 To numbercols - 1
        xlsheet.ActiveSheet.Cells(row, i + 1) = reader.GetValue(i).ToString()
      Next
      row = row + 1
    End While
    reader.Close()
    cnn.Close()
    Try
      xlsheet.ActiveSheet.Export(Server.MapPath(".") + "\Images\" + Me.xlfile.Text,_
       OWC.SheetExportActionEnum.ssExportActionNone)
    Catch e As System.Runtime.InteropServices.COMException
      Response.Write("错误：" + e.Message)
    End Try
  End Sub

Answer 1

http://lucky_elove.www1.dotnetplayground.com/ShowDetail.aspx?id=BF0A54F9-C7C7-4200-BD9A-802AC1F5DE50Private Sub WriteDataGrid2Excel()
    Dim xlsheet As New SpreadsheetClass()
    cnn.Open()
    Dim reader As OleDbDataReader = Me.sql.ExecuteReader()
    Dim numbercols As Integer = reader.FieldCount
    Dim row As Integer = 2
    Dim i As Integer = 0
    ' 输出标题
    For i = 0 To numbercols - 1
      xlsheet.ActiveSheet.Cells(1, i + 1) = reader.GetName(i).ToString()
    Next    ' 输出字段内容
    While (reader.Read())
      For i = 0 To numbercols - 1
        xlsheet.ActiveSheet.Cells(row, i + 1) = reader.GetValue(i).ToString()
      Next
      row = row + 1
    End While
    reader.Close()
    cnn.Close()
    Try
      xlsheet.ActiveSheet.Export(Server.MapPath(".") + "\Images\" + Me.xlfile.Text,_
       OWC.SheetExportActionEnum.ssExportActionNone)
    Catch e As System.Runtime.InteropServices.COMException
      Response.Write("错误：" + e.Message)
    End Try
  End Sub

Answer 2

net_lover(孟子E章)大哥：请问有没有c#语法的例子啊？？

Answer 3

我现在不用datagrid,因为datagrid遇到分页时导出的时候就会出问题。
我想用dataset直接导出。
请帮帮忙！

Answer 4

但愿我的一篇文章读你有所帮助：
http://www.uncj.net/Exce.htm