je je.. no conozco los objetos

ActiveReportsHTMLExport
ActiveReportsExcelExport
ActiveReportsTIFFExport
...

estos son seguramente componentes referenciados al proyecto
y que poseen líneas de código más específicas..

Para usar excel o word dinámicamente , se podía
abrir una sesión desde VB (ahora no tengo el código a mano)
y utilizarlo dinámicamente.

oExcel = Createobject("Excel.application") (por ejemplo).

y luego manipular este objeto mediante código directamente.


Saludos
Andrés

-----Mensaje original-----
De: Perez Fernandez, Alejandro [mailto:AlPerez@s...]
Enviado el: viernes, 18 de octubre de 2002 9:31
Para: ASP.Net en Español
Asunto: [aspx_espanol] Re: excel


Gracias por vuestras respuestas

El código que has enviado me viene muy bien para generar informes, pero
además me gustaría saber si dentro de un formulario puedo mostrar una hoja
de excel en vez de tener que usar un control de tipo grid

Muchas gracias

-----Mensaje original-----
De: abiezer matos [mailto:negrabichuela@y...]
Enviado el: jueves, 17 de octubre de 2002 22:05
Para: ASP.Net en Español
Asunto: [aspx_espanol] Re: excel


ok este codigo es viejo pero efectivo

crea una clase en vb6, que es esta:

Public Function Exportar(ByVal exportType As String, _
                            ByVal Archivo As String)
As String

'on error GoTo ErrorHandler

   Dim ARViewer21 As Exportar
   Set ARViewer21 = New Exportar

   ARViewer21.Pages.Load Archivo

   Dim nombreExportar As String
   nombreExportar = Replace(Archivo, ".rdf", "." &
exportType)


   Select Case LCase(exportType)


   Case "xls"
    Dim objXLS As
ActiveReportsExcelExport.ARExportExcel
    Set objXLS = New
ActiveReportsExcelExport.ARExportExcel
    'objReport.PrintReport False

    objXLS.FileName = nombreExportar
    objXLS.Export ARViewer21.Pages

    Set objXLS = Nothing


   Case "html"
    Dim objhtml As ActiveReportsHTMLExport.HTMLexport
    Set objhtml = New
ActiveReportsHTMLExport.HTMLexport
    objhtml.FileName = nombreExportar
    objhtml.Export ARViewer21.Pages
    Set objhtml = Nothing

    Case "pdf"
    Dim objpdf As ActiveReportsPDFExport.ARExportPDF
    Set objpdf = New
ActiveReportsPDFExport.ARExportPDF
    objpdf.FileName = nombreExportar
    objpdf.Export ARViewer21.Pages
    Set objpdf = Nothing

    Case "tif"
    Dim objtif As ActiveReportsTIFFExport.TIFFExport
    Set objtif = New
ActiveReportsTIFFExport.TIFFExport
    objtif.FileName = nombreExportar
    objtif.Export ARViewer21.Pages
    Set objtif = Nothing

    Case "txt"
    Dim objtxt As ActiveReportsTextExport.ARExportText
    Set objtxt = New
ActiveReportsTextExport.ARExportText
    objtxt.FileName = nombreExportar
    objtxt.Export ARViewer21.Pages
    Set objtxt = Nothing

    Case "rtf"
    Dim objrtf As ActiveReportsRTFExport.ARExportRTF
    Set objrtf = New
ActiveReportsRTFExport.ARExportRTF
    objrtf.FileName = nombreExportar
    objrtf.Export ARViewer21.Pages
    Set objrtf = Nothing


   End Select
Exportar = nombreExportar
Exit Function
'
ErrorHandler:
    Exportar = ""
    App.LogEvent Error.Description, 1
End Function
============================================

luego la llamas desde asp. espero te sirva, ya no la
usamos pero en ese entonces era efectiva



_________________________________________________________
Do You Yahoo!?
Información de Estados Unidos y América Latina, en Yahoo! Noticias
Visítanos en http://noticias.espanol.yahoo.com

---
Usted está suscrito a aspx_espanol como:
alperez@s...
Para darse de baja, envíe un mensaje en blanco a
%%email.unsub%%


---
Usted está suscrito a aspx_espanol como:
ingaferreyra@l...
Para darse de baja, envíe un mensaje en blanco a
%%email.unsub%%

%%email.unsub%%