Fiz um conta clique só que tem um problema ele não esta redirecionando!
clicks.asp
<%
' Valor para url
url=trim(request.querystring("url"))
' se a url não for detectada ele
' mostra todos os links
if url="" then %>
<html>
<title>Yeshua DIGITAL STUDIO Redir</title>
<head>
<base target="_blank">
</head>
<body bgcolor="#FFFFFF">
<a href="clicks.asp?url=http://www.yahoo.com">Yahoo</a>
</body>
</html>
<%
' se a url for detectada ele adiciona para o bd
' e redireciona para o site
else
%>
<%
' Pegar IP
ip=request.servervariables("remote_addr")
' Nome do bd
accessdb="clicks.mdb"
' Cria uma conexão com o bd
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
'
set rs = server.createobject("ADODB.Recordset")
' SQL vai inserir IP, url e clique
sql = "insert into clicks (url,ip) values('"& url &"','"& ip &"')"
' insere valores no bd
rs.open sql, cn
' fecha connection
set rs=nothing
' redirecionamento da url
Response.Redirect "url"
%>
<% end if ' final da checagem se a url é válida %>
Pergunta
victormartins
Fiz um conta clique só que tem um problema ele não esta redirecionando!
clicks.asp
<% ' Valor para url url=trim(request.querystring("url")) ' se a url não for detectada ele ' mostra todos os links if url="" then %> <html> <title>Yeshua DIGITAL STUDIO Redir</title> <head> <base target="_blank"> </head> <body bgcolor="#FFFFFF"> <a href="clicks.asp?url=http://www.yahoo.com">Yahoo</a> </body> </html> <% ' se a url for detectada ele adiciona para o bd ' e redireciona para o site else %> <% ' Pegar IP ip=request.servervariables("remote_addr") ' Nome do bd accessdb="clicks.mdb" ' Cria uma conexão com o bd cn="DRIVER={Microsoft Access Driver (*.mdb)};" cn=cn & "DBQ=" & server.mappath(accessdb) ' set rs = server.createobject("ADODB.Recordset") ' SQL vai inserir IP, url e clique sql = "insert into clicks (url,ip) values('"& url &"','"& ip &"')" ' insere valores no bd rs.open sql, cn ' fecha connection set rs=nothing ' redirecionamento da url Response.Redirect "url" %> <% end if ' final da checagem se a url é válida %>Vlw <_<
Link para o comentário
Compartilhar em outros sites
7 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.