Exportar DatagridView a xls de Excel

[Krato]

Hola a todos. Estoy teniendo un problema con un datagridview generado dinámicamente.

Quiero exportarlo a excel para despues cargarlo con CristalResports.

Pero a la hora de crear el libro de excel me da error.

He hechop la referencia a crosoft.Office.Interop.Excel

Y lo exporto de la siguiente manera:

Código ASP:

If n_Filas = 0 Then
            MsgBox("No hay datos para exportar a excel. Se ha indicado 0 en el parámetro Filas ") : Exit Sub
        Else
 
            ' -- Crear nueva instancia de Excel  
            excel = New Microsoft.Office.Interop.Excel.Application
 
           'Aquí me de el error!!!
            wBook = excel.Workbooks.Add()
            wSheet = wBook.ActiveSheet()
 
 
            Dim iCol As Integer = 0
            For i = 0 To DG.Columns.Count - 1
                If DG.Columns(i).Visible Then
 
                    iCol = iCol + 1 
                    wSheet.Cells(1, iCol) = DG.Columns(i).HeaderText
                End If
            Next
 
            For i = 0 To DG.Rows.Count - 1
                iCol = iCol + 1
                For j = 0 To DG.Columns.Count - 1
                    wSheet.Cells(j + 2, iCol) = DG.Rows(i).Cells(j).Value
                Next
            Next
 
            wSheet.Columns.AutoFit()
            Dim strFileName As String = "D:\ss.xls"
            Dim blnFileOpen As Boolean = False
            Try
                Dim fileTemp As System.IO.FileStream = System.IO.File.OpenWrite(strFileName)
                fileTemp.Close()
            Catch ex As Exception
                blnFileOpen = False
            End Try
 
            If System.IO.File.Exists(strFileName) Then
                System.IO.File.Delete(strFileName)
            End If
 
            wBook.SaveAs(strFileName)
            excel.Workbooks.Open(strFileName)
            excel.Visible = True
        End If
 

'Aquí me de el error!!!

wBook = excel.Workbooks.Add()


Gracias!