Global.asa
#1
Posted 25/11/2004, 11:20
Eu estou fzdo um site em um servidor gratuito (www.brinkster.com) e gostaria de saber mais sobre o global.asa, porque eu fiz todo o conteudo dele, mas não esta acessando. Eu posso colokar esse arquivo qm qq pasta!? Tenho que indicar ele dentro do meu arquivo?! por favor, expliquem o que sabem sobre o global.asa!
Caso queiram ver o conteudo:
'O comando acima define que o código será escrito na linguagem VBScript
'e será executado no servidor
Sub Application_OnStart
'Comando executado quando o primeiro usuário acessar o aplicativo
'Trava-se a variável para que mais de um processo não a acesse simultaneamente
Application.Lock
'Visitantes atuais no site
Application("UsuariosAtuais")=0
'Total de visitas
Application("TotalVisitas")=0
'Destrava as variáveis
Application.UnLock
End Sub
Sub Application_OnEnd
'Comando executado quando o servidor for desligado
End Sub
Sub Session_OnStart
'Comandos executados quando um usuário entrar no site
'Trava-se a variável para que mais de um processo não a acesse simultaneamente
Application.Lock
'Soma 1 aos visitantes atuais no site
Application("UsuariosAtuais")=Application("UsuariosAtuais")+1
'Soma 1 ao total de visitas
Application("TotalVisitas")=Application("TotalVisitas")+1
'Destrava as variáveis
Application.UnLock
End Sub
Sub Session_OnEnd
'Comandos executados quando o usuário sai do site
'Trava-se a variável para que mais de um processo não a acesse simultaneamente
Application.Lock
'Subtrai 1 aos visitantes atuais no site
Application("UsuariosAtuais")=Application("UsuariosAtuais")-1
'Destrava as variáveis
Application.UnLock
End Sub
Desde já agradeço,
Bruno Salgado.
#2
Posted 25/11/2004, 11:45
Global.asa
<script LANGUAGE=VBSCRIPT RUNAT=SERVER>
Sub Application_OnStart
Application("Totalvisitas") = 0
End sub
Sub Application_OnEnd
End sub
Sub Session_OnStart
Application.Lock
Application("Visitasatuais") = Application("Visitasatuais") +1
Application.Unlock
End sub
Sub Session_OnEnd
Application.Lock
Application("Visitasatuais") = Application("Visitasatuais") -1
Application.Unlock
End sub
</SCRIPT>
E para acessar coloque isso na página que vc quer ver a quantidade de usuários online: <% =application("visitasatuais") %>
Espero ter ajudado...
Valeu
Não sei assinar... ehehehe
----------------------------------------------------------------------------
#3
Posted 25/11/2004, 11:49
#4
Posted 25/11/2004, 12:28
Não sei assinar... ehehehe
----------------------------------------------------------------------------
#5
Posted 25/11/2004, 13:28
Se vc quiser usar esse recurso terá que pagar um servidor ASP ou então tentar fazer essa aplicação sem o Global.asa.
ASP ...............llllllllllllllllllllllllllllllllll
ASP.net...........llllllllllllllllllllllllllllllllll
SQL server..... llllllllllllllllllllllllllllllllll
MySQL............llllllllllllllllllllllllllllllllll
#6
Posted 25/11/2004, 13:55
mas, eu tinha um server na minha casa e colokei na pasta raiz do site e tudo mais, soh que nao funcionava tb, sabe de alguma hipotese?
#7
Posted 23/12/2004, 01:41
Edição feita por: Coutrahh, 23/12/2004, 02:10.
#8
Posted 23/12/2004, 02:25
mas pr aexibir q vc teria q incluir ele na pg. Pra contar nao, pq a contagem seria so ao acessar o diretorio raiz da pg.
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#9
Posted 23/12/2004, 02:29
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)