|
|
|
|
|
|
|
|
Oferecemos:
Inglês
Informática
Karatê
Seguro
escolar
Atendimento
psicológico
Sala de
vídeo
Recreação
|
|
secretaria@horizontedacultura.com.br
|
|
|
|
Esta página está em construção! 
|
|
Obrigado pela sua
visita!
Envie suas sugestões!
Atualizada em
27/10/2007
Copyright©
2000-2007 CEHC
Todos os direitos
reservados
|
|
|
|
|
|
|
|
|
|
|
|
<%
application.lock
set banco = server.createObject("adodb.connection")
banco.open("contador")
comando = "select * from contador where log = 'mario'"
registro = banco.execute(comando)
application("vcont") = registro("cont") + 1
altera = "update contador set cont = " & cstr(application("vcont")) & " where log = 'mario'"
banco.execute(altera)
application.unlock
banco.close
set banco = nothing
%>