<%
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_final_STRING
Command1.CommandText = "UPDATE empresas SET visitas = dani where dani = 1 + visitas"
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()
%>
EL fallo debe de estar en :
UPDATE empresas SET visitas = dani where dani = 1 + visitas
La tabla es empresas mientras visitas es un campo, lo que debe de hacer es sumar 1 visita cada vez que se ejecute este código.
Estoy deseperado ya por solucionarlo pues llevo dias sin pegar ojo,

.
Lo de la cerveza va en serio, pero para eso teneís que hacerme la visita de rigor a mi pueblo :)
ASTON ya tiene la suya guardada en mi bodega personal
Gracias de antemano amigos...