9 messaggi dal 19 gennaio 2002
Sto cercandodi mettere un contatore nel mio sito.
All'interno del global.asa nella sub session onstart ho messo questo codice:
Application.Lock
Dim strLinea, FileObject, Instream, intVisite, intTipo, OutStream

strFile = Server.MapPath("visite.txt")

' creo l'oggetto
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")

' apro il file
intTipo = 1 ' lettura
Set InStream = FileObject.OpenTextFile(strFile, intTipo, true)

' ciclo che legge tutte le linee
intVisite = InStream.ReadLine()
intVisite = Cint(intVisite) + 1

' libero risorse
InStream.Close
Set InStream = Nothing

intTipo = 2 ' scrittura
Set OutStream = FileObject.OpenTextFile(strFile, intTipo, true)
OutStream.WriteLine (intVisite)

' libero risorse
OutStream.Close
Set OutStream = Nothing

Set FileObject = Nothing
Session("counter")=intVisite
Application.UnLock


All'interno della pagina asp questo:
<nobr>
<%

for i = 1 to Len(Session("counter"))
Response.write "<IMG src=images/" & Mid(Session("counter"), i, 1) &".gif>"
next

%>
</nobr>

Nel server locale il PWS funziona, ma nel hosting che uso,Unix,che sfrutta il chiliasp...aime' no.
Chi sa darmi un aiuto???
Grazie.

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.