Orienteering - Circolo Dozza ATC

<%@LANGUAGE="VBSCRIPT"%> <% Dim objFSO, objCountFile ' object vars for FSO and File Dim strCountFileName ' filename of count text file Dim iCount ' count variable Dim I ' standard looping var 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 %> Orienteering - Circolo Dozza ATC

Contacts : Tel. +39 51 231003 - Fax. +39 51 222165 - E-mail.orienteering@circolodozza.it

Home

d
g

Archivio gare
Tabella degli ultimi anni

PER INFORMAZIONI SU ALBERGHI, OSTELLI, CAMPEGGI contattare:

IAT - Informazione e Accoglienza Turistica
Piazza Maggiore 1 Bologna
Tel: 051.246541 Fax: 051.6393171
E-mail: TouristOffice@comune.bologna.it
Tutti i giorni dalle ore 9.00 alle ore 20.00

URP - Call Center Comune di Bologna
Tel: 051.203040
URL: www.comune.bologna.it
Dal lunedì al venerdì dalle ore 8.00 alle ore 19.30
Sabato dalle ore 8.00 alle ore 14.00