ayuda--->Microsoft VBScript runtime error '800a0046'

he estado intentando insertar un contador de visitantes en un sitio para un cliente, estuve utilizando aquellos que son gratis...su fabulosa publicidad "contador gratis, pase usted" es muy atractiva, pero era realmente molesto los pop ups! !!!

les hago llegar la mayor informacion posible:

hosting Windows 2000 / UNIX

codigo asp

<%
Set Fso = CreateObject("Scripting.FileSystemObject")
contadortxt = Server.MapPath("contador.txt")

Set FileRead = Fso.OpenTextFile(contadortxt,1,False)
contador = FileRead.ReadLine

Set FileWrite = Fso.OpenTextFile(contadortxt,2,false)
contador = contador + 1
* line 164 * FileWrite.WriteLine (contador)

FileWrite.Close
FileRead.Close
Set FileWrite = Nothing
Set FileRead = Nothing
Set Fso = Nothing

cantdigitos = 6

cantcont = Len(contador)
For i = 1 to cantdigitos - cantcont
contador = "0" & contador
Next
For i = 1 to cantdigitos
numero = Mid(contador,i,1)
cantidad = cantidad & "<img src='" & numero & ".gif'>"
Next
%>
<p align="left"><font color="#FFFFFF" face="verdana" size="2">Visitante Nº<br><%=cantidad%></font></p>


al momento de acceder en internet me marca el siguiente error

Microsoft VBScript runtime error '800a0046'
Permission denied
/main.asp, line 164

no se mucho sobre codigos, intente con un tutorial php para otro cliente que si me funciono en otro hosting, y este no se deja!!!!

espero alguien me pueda aydar aqui en clab

Esto no va aqui..

Movido a "General"

No tienes permiso de escritura, lo más seguro... otorgale permisos a tu carpeta y listo... ... por cierto mucho rollo para hacer un contador... hace centurías, cuando programaba en ASP (De lo cual me arrepiento...) hice una rutina más sencilla, aquí lo tienes...

Código :

<%
   dim contador
   dim valor
   contador=1
   set objeto=server.CreateObject("Scripting.FileSystemObject")
   set archivo=objeto.OpenTextFile(Server.MapPath("conta.txt"))
   valor=archivo.readline
   contador= contador + valor
   response.write("Visitas<br>")
   response.write(contador)
   archivo.close
   set archivo2=objeto.CreateTextFile(server.MapPath("conta.txt"),true)
   archivo2.write(contador)  
   archivo2.close
   set objeto=nothing
   set archivo=nothing
   set archivo2=nothing
  %>

Igual necesitas permisos de escritura... ... pero si yo fuerá tú, dejaría de usar un lenguaje de script muerto... ...

gracias por tu comentario...
ahora bien
tu me hablas de scripts obsoletos y muertos , incluso hablas de arrepentimiento por tu vida pasada

entonces que me recomiendas hacer para darle una mejor solucion a este detalle de un simple y vano contador

salu2

pasarte a PHP...

(--likido:: ) escribió:

...creo que se te paso este pequeno detalle gslmaster...

por eso... dejarte de asp y pasarte de plano a php

asp es maligno... bueno no se tú

SALUDOS!

(--likido: escribió:

Lo mas seguro esque el hosting en el que queires meter el contador php, no tenga soporte para php

ASP está muerto y bien sepultado, ni ASP.NWT (su hijo) ha tenido la aceptación que M$ deseaba, pasate a php y consigue un proveedor que te de soporte para php (hoy en día es raro el que no te lo dé)

Peeeeeeeeero hay un problema si queremos adaptar el contador en el index y este es xhtml o html y la verdad no encuentro muy comodo pasar todo el contenido del index a otra hoja en PHP y despues hacer un auto-redirect del index al php solo para poder tener el contador en la pagina de entrada entonces creo que aqui si nos ayudaría usar asp o alguna cochinada asi para usar el counter en el index, por lo tanto, Como le hago para poner el counter en un xhtml ?