Buen día, mi problema es el siguiente:
Tengo una página ASP que llama y manda parámetros a otra, la cual genera un documento Excel;
En mi LocalHost trabaja a las mil maravillas, pero a la hora de probarlo en otro lado,
excel marca dos errores, que son los siguientes
1- No se puede Abrir
url
2- No se puede obtener acceso al archivo
url
*El Nombre del archivo o la ruta no existen
*Otro programa esta usando el archivo
*El libro que esta intentando guardar tiene el mismo nombre que otro libro que está abierto en estos momentos
Dejo el código de la página que recibe los parámetros y genera el excel
Código ASP:
Ver original<html>
<head>
<%
Response.Buffer = TRUE
Response.ContentType = "application/vnd.ms-excel"
%>
<%
Dim rs, obj, Territorio , Ciudad , FechaCredito , FechaPago, closePage
closePage = 0
Territorio = Request.QueryString("cboTerritorio")
Ciudad = Request.QueryString("cboCiudad")
FechaCredito = Request.QueryString("txtFechaCredito")
FechaPago= Request.QueryString("txtFechaPago")
Set rs= CreateObject("ADODB.Recordset")
Set obj = Server.CreateObject("Datos.clsLlena")
Set rs = obj.TraeDatos(cstr(Territorio),cstr(Ciudad),cstr(FechaCredito),cstr(FechaPago))
%>
<title>CLIENTES </title>
</head>
<body>
<table border="0" width="100%">
<tr>
<td> <b>Clientes</b> </td>
<td></td>
<td></td>
<td>
<b><%= Date ()%></b>
</td>
</tr>
<tr>
<td width="50%" align="center" style ="BORDER-BOTTOM: #000000 solid"><b>Empresa</b></td>
<td width="50%" align="center" style ="BORDER-BOTTOM: #000000 solid"><b>Cuenta</b></td>
<td width="50%" align="center" style ="BORDER-BOTTOM: #000000 solid"><b>Nombre</b></td>
<!--bgcolor="#C0C0C0"-->
</tr>
<% Session.Timeout = 180
%>
<%While Not rs.EOF%>
<tr>
<%
Response.Write("<td width='50%' align='center'>" &rs.Fields("Empresa")& "</TD>")
Response.Write("<td width='50%' align='center'>" &rs.Fields("Cuenta")& "</TD>")
Response.Write("<td width='50%' align='center'>" &rs.Fields("Nombre")& "</TD>")
rs.MoveNext
closePage = 1
WEND%>
</tr>
<%
If closePage = 0 then
Response.ContentType = "text/html"
Response.Clear
Response.Write("<script> window.moveTo(1000,1000);</script>")
Response.Write("<script> opener=null; alert('No hay registros.'); window.close();</script>")
Response.End
end if
call obj.CerrarCon
%>
</table>
</body>
</html>
De antemano agradezco su ayuda