Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/08/2002, 18:33
zeus_bsas
 
Fecha de Ingreso: junio-2002
Ubicación: Buenos Aires, Argentina
Mensajes: 876
Antigüedad: 22 años, 11 meses
Puntos: 0
Re: URGENTE!!! algun ejemplo cuenta clicks!!!!

Este es uno muy basico, adaptalo a tus necesidades:

estadisticas.asp

Código:
   <%@ 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"))
  %>
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.

Seria algo asi:
estadisticas.asp?image=nombredelbanner&url=dir eccionpararedireccionar

Saludos