Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/01/2008, 16:27
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
interesante.. Error en creacion de Archivo Excel

digo interesante ya que el codigo funciona perfectamente en ambiente Win XP con Office 2003

el codigo es el siguiente y es el que mas se encuentra en la web... miren

Código:
set excel = server.createObject("Excel.Application")
set libro = excel.workbooks.add

for i=1 to 20
libro.worksheets(1).cells(i,1)= "Usuario" & i 'rs("usuario")
libro.worksheets(1).cells(i,2)= "2" & ((i * 10)/2) 'rs("edad")
next

dat=cdbl(now())
nfile=Nombre & dat
excel.ActiveWorkbook.SaveAs server.MapPath("./" & nfile &".xls"),, "", "", False, False, True
excel.ActiveWorkbook.Close
set excel = nothing
response.write "<center><a href='" & nfile & "'>" & nfile & "</center>" 

set libro = nothing
ahora la parte interesante es que, instale el office 2007, logicamente bajo el mismo entorno y ahora no funciona....

el error es marcado en
Cita:
set excel = server.createObject("Excel.Application")
con el siguiente texto
Cita:
Objeto Server, ASP 0178 (0x80070005)
Error en la llamada a Server.CreateObject al comprobar permisos. Se ha denegado el acceso a este objeto.
/pruebas/Graficas/Graficando.asp, línea 11
jajjajaja, ya se lo que diran, que son permisos al usuario IUSR_local, pero no compañeros, como es una carpeta virtual de pruebas, el/los usuario/os tienes control total en todos los aspectos

por si se pregunta que trae el nombre del archivo con todo su ramificacion seria esto
Cita:
c:\inetpub\wwwroot\pruebas\Graficas\39471.64317129 63.xls
a menos claro este que alguna luz ilumine algun checkbox de permiso por alguna parte que no lo dudo :risa

ahora si, algun prediccion de lo que este faltando?
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra