[Resolvido] Alguém consegue Transformar este codigo em asp vbscri

[directbull 0]

Alguém consegue Transformar este codigo em asp vbscript preciso de um Help

 

<%

AbreConexao

id = request.queryString("idbanner")

 

SQL = "update Banners set clicks = clicks + 1 where idbanner = "&id

Set rs = conexao.execute(SQL)

 

SQL = "select * from Banners where idbanner = "& id &""

SEt rs = conexao.execute(SQL)

 

response.redirect rs("url")

 

rs.close

FechaConexao

Set rs = nothing

 

%>

[hargon 64]

Isso já é ASP VBScript...

[directbull 0]

Isso já é ASP VBScript...

http://forum.imasters.com.br/public/style_emoticons/default/clap.gif Valeu Brigadão!