| |||
Re: URGENTE!!! algun ejemplo cuenta clicks!!!! Este es uno muy basico, adaptalo a tus necesidades: estadisticas.asp
Código:
En cada banner debes poner como enlace este archivo asp y pasar como parametros el nombre del banner y llamarlo imagen, y la url real a donde debes llevar luego del click.<%@ Language=VBScript %> <% Option Explicit %> <% Const ForReading = 1 Dim objAbreArchivo, objFSO, strRuta, iCuenta strRuta = Request.QueryString("image") strRuta = strRuta & ".txt" strRuta = Server.MapPath(strRuta) Set objFSO = _ Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(strRuta) Then Set objAbreArchivo = _ objFSO.OpenTextFile(strRuta, ForReading) iCuenta = Cint(objAbreArchivo.ReadLine) + 1 objAbreArchivo.Close Else iCuenta = 1 End if Set objAbreArchivo = _ objFSO.CreateTextFile(strRuta, True) objAbreArchivo.WriteLine(iCuenta) objAbreArchivo.Close Set objAbreArchivo = Nothing Set objFSO = Nothing Response.Redirect(Request.QueryString("url")) %> Seria algo asi: estadisticas.asp?image=nombredelbanner&url=dir eccionpararedireccionar Saludos |