% Dim objFSO, objCountFile Dim strCountFileName Dim iCount Dim bUseImages Dim I bUseImages = CBool(Request.QueryString("images")) strCountFileName = Server.MapPath(Request.ServerVariables("SCRIPT_NAME") & ".cnt") Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objCountFile = objFSO.OpenTextFile(strCountFileName,1,True) If Not objCountFile.AtEndOfStream Then iCount = CLng(objCountFile.ReadAll) Else iCount = 0 End If objCountFile.Close Set objCountFile = Nothing iCount = iCount + 1 Set objCountFile = objFSO.CreateTextFile(strCountFileName, True) objCountFile.Write iCount objCountFile.Close Set objCountFile = Nothing Set objFSO = Nothing %>
| Home | Chi siamo | Progetti | Iniziative | Foto | Sostienici | Vagabondanews | Contatti | Download | Forum | Link | Area privata | Crediti |
![]() |
GIOCHIAMO LA PACE
IGRAMO MIRU ZIMA 08-09 |
||||||||||||
LE ISCRIZIONI SI CHIUDONO IL 12 DICEMBRE 2008
|
|||||||||||||
| IL PROGETTO SARÀ DISPONIBILE TRA POCHI GIORNI | |||||||||||||
| PENSIERI E PAROLE - LEGGI I RACCONTI DEI VOLONTARI DELL'ESTATE 2007 | |||||||||||||
| Scarica PENSIERI E PAROLE 2007 | |||||||||||||
![]() |
|||||||||||||
| INFO E CONTATTI: info@vagabondidipace.org o igramomiru@vagabondidipace.org | |||||||||||||
| oppure Roby: 3290024714 (preferibilmente dopo le ore 19:00) |