Ver Mensaje Individual
  #5 (permalink)  
Antiguo 13/06/2008, 08:50
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 7 meses
Puntos: 88
Respuesta: contador en nº romanos

este codigo que usas es para hacerlo tipo contador de visitas???

si es asi, entonces tendras que crear un valor "contador" pero en el objeto Application del global.asa

afectaria en este sentido
Cita:
<object runat="Server" scope="Application"
id="rstActiveUsers" progid="ADODB.Recordset">
</object>

<script language="VBScript" runat="Server">
Sub Application_OnStart()
Application("NumVisitas") = 0
End Sub

Sub Session_OnStart()
Session("Start") = Now()

Application.lock()
Application("NumVisitas") = Application("NumVisitas") + 1
Application.unlock()

End Sub
</script>
tomarias el valor de la variable application
Cita:
funcionromanos(Application("NumVisitas"))
ahora que si estas realizando este tipo de contador para el usuario.... entonces deberas de anexar el valor romano, en un campo del registro del usuario

cuando ingresa el usuario, tomas el valor anterior, le sumas uno, actualizas ese valor en la tabla, y lo despliegas en la pantalla

Cita:
temp=cdbl(rs.("visita").value)
temp=temp+1
rs("visita").value=temp

en la pantalla
response.write funcionromano(rs("visita"))
solo es indicativo lo anterior, espero captes la idea

__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra