Pregunta: | 8047 - CONTARDOR GRAFICO ASP |
Autor: | Jaqueline Vera Espinoza |
hola a todos mi pregunta es como hacer, que una pagina web tenga un contador grafico, solamente lo hice con un contador simple, mi duda es la programacion cambia por completo.
gracias |
Respuesta: | Alejandro Cayssials |
En una pagina counter.asp poner lo siguiente:
<% Set FileObject = Server.CreateObject("Scripting.FileSystemObject") Dir = Request.ServerVariables("SCRIPT_NAME") Dir = StrReverse(Dir) Dir = Mid(Dir, InStr(1, Dir, "/")) Dir = StrReverse(Dir) HitsFile = Server.MapPath(Dir) & "\hits.txt" On Error Resume Next Set InStream= FileObject.OpenTextFile (HitsFile, 1, false ) OldHits = Trim(InStream.ReadLine) NewHits = OldHits + 1 Set OutStream= FileObject.CreateTextFile (HitsFile, True) OutStream.WriteLine(NewHits) %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"> <html> <head> <title>Graphic Counter</title> </head> <body> <% L=Len(NewHits) i = 1 For i = i to L num = Mid(NewHits,i,1) Display = Display & "<img src=""" & num & ".gif"">" Next Response.Write Display %> </body> </html> y luego, en un archivo de texto, llamado hits.txt poner 0 como valor inicial o el numero de visitas inicial del contador. Luego, para las imagenes, create los numeros y guardalos como 1.gif 2.gif 3.gif .... 9.gif 0.gif asi Espero que te sirva. Chau |