<% 'con esto recogemos las variables pasadas por get 'son los códigos de la galeria grupo = request("codgr") grupo2 = request("codgr2") Set cnnDB = server.createobject("ADODB.Connection") cnnDB.Open "OVOGYM" 'aumentamos las visitas donde el código del grupo sea el que nos han pasado por get Sql="UPDATE GRUPOS SET VISITAS=VISITAS+1 WHERE CODGRUPO LIKE '" & grupo &"'" set rsinfo = cnnDB.execute(Sql) 'cerramos el objeto de conexión cnnDB.Close set cnnDB = Nothing %>