En el html de la news, agrego la siguiente imagen:
Código HTML:
Ver original
<img src="http://www.rrhhmagazine.com/envios/tester_news_diaria.asp?ref=259" border="0" title="logo_rhm" />
Y la redireccion actualiza la base de datos sumando uno a las visitas...
Código ASP:
Ver original
<% response.ContentType="text/CSS" Const adOpenKeyset = 1 Const adLockOptimistic = 3 'Conectamos a base de datos para actualizar el contador if request.QueryString<>"" then ref=Request.QueryString("ref") Dim sql Dim con Dim rs2 Set rs2 = Server.CreateObject("ADODB.RecordSet") sql="select * from contadorsimple WHERE referencia='"&ref&"'" rs2.Open sql, con, adOpenKeyset, adLockOptimistic if not rs2.eof then contador = rs2("contador") rs2("contador")= contador + 1 rs2("fecha_ultima") = now() rs2("ipultima")=Request.ServerVariables("Remote_host") rs2.update rs2.close con.close end if else rs2.close set rs2=nothing con.close set con=nothing end if Response.Redirect "http://www.rrhhmagazine.com/intranet/img_nueva_news/logo_rhm.png" %>
Gracias anticipadas!!