|
|
Vous êtes ici : Forums > Langage ASP > GLOBAL.ASA
GLOBAL.ASA
salut,
j'ai un probleme dan sle fichier global.asa le probleme est lorsque la page asp est en cour de telechargement elle ne telecharge pas elle reste un temps tres long sans telechargement svp je veux savoir pourquoi
vois mon code global.asa
merci davance
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Application_OnStart
VisitorCountFilename = Server.MapPath ("/accueil") & "\compteur.txt"
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set Out= FileObject.OpenTextFile (Server.MapPath ("/comptes") & "\compteur.txt", 1, FALSE, FALSE)
Application("visitors") = Out.ReadLine
Application("VisitorCountFilename") = VisitorCountFilename
END SUB
</SCRIPT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Application_OnEnd
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set Out= FileObject.CreateTextFile (Application("VisitorCountFilename"), TRUE, FALSE)
Out.WriteLine(application("visitors"))
END SUB
</SCRIPT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnStart
Application.lock
Application("visitors")= application("visitors") + 1
t_visitors = application("visitors")
Application.unlock
Session("VisitorID") = t_visitors
SET FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set Out= FileObject.CreateTextFile (Application("VisitorCountFilename"), TRUE, FALSE)
Application.lock
Out.WriteLine(t_visitors)
Application.unlock
END SUB
</SCRIPT>
Message posté le 14/03/2006
par rachid
Répondre à ce message |
|
|
|
A RETENIR CETTE SEMAINE |
21/11/2008 -
Microsoft Windows fête ses 23 ans !
Le célèbre système d'exploitation de Microsoft fête aujourd'hui son vingt-troisième anniversaire. C' ...
|
21/11/2008 -
Pratiques fondamentales pour un développement logiciel sûr
L'article de Micheal Howard vient d'être traduit en français par Kader Yildirim ! Ce document synthé ...
|
21/11/2008 -
Mise à jour de la méthode SDL pour éradiquer définitivement les Mécapoulets
Les Mécapoulets sont une menace perpétuelle pour les développeurs et les utilisateurs de leurs appli ...
|
20/11/2008 -
A la découverte des tests d’interfaces graphiques avec Visual Studio 2010
Microsoft introduit dans sa version 2010 de Visual Studio les « Coded UI Tests », ou « Tests d’inter ...
|
20/11/2008 -
PDC 2008 - Windows Azure vu par Grégory Renard
Grégory vous propose de découvrir en vidéo - et en 5 minutes - les annonces faites autour de Windows ...
|
20/11/2008 -
Microsoft prépare une suite antivirus gratuite
L’éditeur abandonne Live One Care, sa solution payante, au profit de Morro, une suite antivirus grat ...
|
19/11/2008 -
Comprendre le fonctionnement des Rules de WF
L'activité Policy va nous permettre de piloter nos workflows à partir de règles simples mais efficac ...
|
|
|
