Server.CreateObject("OWC.Spreadsheet")

[Hgmhelio]

Alguien a trabajado con OWC? lo que necesito es abrir un documento de Excel que tiene un formato, dentro de este documento hay ciertas celdas que lleno desde ASP, lo que no se hacer es como abrir el documento de Excel que contiene el Formato, crear un nuevo archivo y guardar datos desde ASP eso si puedo, lo unico que me falta por saber es como ABRIR un documento existente, modificarlo y guradarlo. Aqui opngo el codigo que uso para Crear un archivo y meterle datos desde ASP. Haber si alguien tiene codigo para abrir un doc. usando Server.CreateObject("OWC.Spreadsheet") .


Set oExcel = Server.CreateObject("OWC.Spreadsheet")
Path=Server.MapPath("Templete.xls")
oexcel.Cells(8,3).value = "OtroHola"
oExcel.ActiveSheet.Open Path
oExcel.ActiveSheet.Export Path, 0
oExcel.ActiveSheet.SaveAs Path, 0

[Hgmhelio]

use ptro metodo SPREADSHET es otra onda pero no tan completa ...

La funcion de este codigo es que en el templete tengo una serie de columnas de las cuales obtengo formulas y graficas, esas columnas las lleno de una BD mediante ASP y las graficas como estan linkiadas a las celdas modificadas cambian de acuerdo a mi codio ASP



<%
Dim Path, ExcelApp
Set ExcelApp = Server.CreateObject("Excel.Application")
Path=Server.MapPath("Templete.xls") 'Templete a modificar
ExcelApp.Workbooks.Open Path

for vc = 5 to 16
ExcelApp.Cells(vc,3).Value = 6810000
ExcelApp.Cells(vc,4).Value = 22
ExcelApp.Cells(vc,5).Value = 17531011
ExcelApp.Cells(vc,6).Value = 53
next

ExcelApp.Cells(4,8).EntireColumn.Delete

'***Verifica que no exista el archivo si existe se elimina
Dim fso, msg
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists("c:\proyectos\prohosa\manager\pati to.xls")) Then
'el archivo si existe por lo que se elimina
fso.DeleteFile("c:\proyectos\prohosa\manager\patit o.xls")
End If

ExcelApp.ActiveWorkbook.SaveAs "c:\proyectos\prohosa\manager\patito.xls"
ExcelApp.Workbooks.Close
Response.redirect "patito.xls"
%>