Export to Excel in Office 2010

Question

0.00/5 (No votes)

See more:

Hi,

I am trying to export to excel .In office 2003 it was running fine .
But in Office 2007 and 2010 its giving issue that
"FILE you are trying to open "FileName" is in a different format specified by the file extension."

I got one solution of modifying registry value but can not do that because the number of users for ur application is very high.

Code I am using for Export to Excel

VB

Response.ClearContent()
            Response.ClearHeaders()

            Response.ContentType = "application/vnd.ms-excel"
            Response.AppendHeader("Content-Disposition", "attachment; filename=AdminReport.xls")
            Response.BufferOutput = True
            Response.ContentEncoding = System.Text.Encoding.UTF8
            Response.Charset = "UTF-8"
            Dim tw As New System.IO.StringWriter
            Dim hw As New System.Web.UI.HtmlTextWriter(tw)
            tblExcelExport.RenderControl(hw)
            Response.Write(tw.ToString())
            Response.End()

Posted 30-Jun-10 21:26pm

palak2

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Armyman12b · Answer 1 · 2010-08-05T04:05:00

Here is the code I use to export to excel, mine is a datagrid-excel, so I'm assuming you will have to change it to use an openfiledialog. I use office 2010 and this works just fine.

Dim rowsTotal, colsTotal As Short
Dim I, j, iC As Short
System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.WaitCursor
Dim xlApp As New excel.Application

Try
    Dim excelBook As excel.Workbook = xlApp.Workbooks.Add
    Dim excelWorksheet As excel.Worksheet = CType(excelBook.Worksheets(1), excel.Worksheet)
    xlApp.Visible = True
    rowsTotal = $PersonnelDataGridView$.RowCount - 1
    colsTotal = $PersonnelDataGridView$.Columns.Count - 1

    With excelWorksheet
        .Cells.Select()
        .Cells.Delete()
        For iC = 0 To colsTotal
            .Cells(1, iC + 1).Value = $PersonnelDataGridView$.Columns(iC).HeaderText
        Next

        For I = 0 To rowsTotal
            For j = 0 To colsTotal
                .Cells(I + 2, j + 1).value = $PersonnelDataGridView$.Rows(I).Cells(j).Value
            Next j
        Next I

        .Rows("1:1").Font.FontStyle = "Bold"
        .Rows("1:1").Font.Size = 10
        .Cells.Columns.AutoFit()
        .Cells.Select()
        .Cells.EntireColumn.AutoFit()
        .Cells(1, 1).Select()
    End With

Catch ex As Exception
    MsgBox("Export Excel Error " & ex.Message)
Finally
    'RELEASE ALLOACTED RESOURCES
    System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default
    xlApp = Nothing
End Try