Hola mi problema es que estoy corriendo este codigo:
<%
Dim FSO, Archivo, Nombre
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Nombre = ".\reporte_"&Trim(Session("Login"))&".csv"
Set Archivo = FSO.CreateTextFile(Nombre,True)
Archivo.WriteLine("Impresora,Trabajos,Paginas,Cost o")
While Not rsImpresora.EOF
Archivo.WriteLine((rsImpresora.Fields.Item("Impres ora").Value)&","&(rsImpresora.Fields.Item("ConteoT otalTrabajos").Value)&","&(rsImpresora.Fields.Item ("SumaTotalPaginas").Value)&","&(rsImpresora.Field s.Item("SumaTotalCosto").Value))
Wend
Response.Write("Archivo creado....")
%>
Pero cuando llega a la linea donde se Crea el archivo me sale este mensaje:
Error Type:
Microsoft VBScript runtime (0x800A0046)
Permission denied
/progressio/reportes/csv/impresoraexport.asp, line 52
Las estoy corriendo en una maquina con Windows 2000 Server y aunque ya revize que el directorio tuviera permisos de escritura, lectura del usuario IUSR_XXXXX, aun me sale.
Alquien sabe como lo soluciono??