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.


9 messaggi dal 19 gennaio 2002
mi da errore Vbscripts di runtime '800a004c'
Path not found
booooo
Helppp


server.mappath non funzione nel global.asa

temo anche che su chili!asp le cose sia diverse da come funzionano su PWS.

<hr color="#31659C" noshade size=1>
Daniele Bochicchio
<b>Content manager di http://www.aspitalia.com</b>

ASP 3 per esempi il mio libro

Daniele Bochicchio | ASPItalia.com
I libri su Windows, HTML5, ASP.NET, VS, Entity Framework
Chief Digital Officer@icubed
Microsoft Regional Director for Italy
9 messaggi dal 19 gennaio 2002
E come posso risolvere il problema,dato che ho scaricato il manuale del chiliasp,ma ahime,e' in inglese,ed io di inglese,non so niente....???
Conosci qualche cosa,manuale,sito o alttro...pero' in italiano che tratti il chiliasp?
Grazie


9 messaggi dal 19 gennaio 2002
Incredibile ho risolto.
nella riga incriminata:
Set InStream = FileObject.OpenTextFile(strFile, intTipo, true)
mii e' bastato sostituire intTipo con 1.
Boh....

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.
Community
UTENTI ONLINE
    Corsi e consulenza

    Dal 1998 forniamo consulenza e formazione sulle tematiche trattate all'interno dei nostri siti, per alcune tra le maggiori realtà italiane.

    Corsi in aula:

    • C# Programming with .NET Framework
      Bologna - dal 01 al 04 settembre 2015
      Milano - dal 01 al 04 settembre 2015
      Roma - dal 01 al 04 settembre 2015
    • Cross-mobile apps with C# and Xamarin
      Bologna - dal 07 al 11 settembre 2015
      Milano - dal 07 al 11 settembre 2015
      Roma - dal 07 al 11 settembre 2015
    • Single Page Applications with AngularJS
      Bologna - dal 14 al 17 settembre 2015
      Milano - dal 14 al 17 settembre 2015
      Roma - dal 14 al 17 settembre 2015
    • Windows Presentation Foundation (WPF)
      Bologna - dal 28 al 30 settembre 2015
      Milano - dal 28 al 30 settembre 2015
      Roma - dal 28 al 30 settembre 2015
    • HTML5
      Bologna - dal 01 al 02 ottobre 2015
      Milano - dal 01 al 02 ottobre 2015
      Roma - dal 01 al 02 ottobre 2015

    Corsi on-site e consulenza su:

    In primo piano

    I più letti di oggi

    Media
    In evidenza
    MISC