| Author |
 Topic  |
|
|
reisuli
Han Solo
256 Posts |
 Posted - 05/04/2004 : 10:20:15
|
Innanzitutto, complimenti per la nuova grafica della home della Federazione: più moderna, più pulita e quindi più visibile...
Poi, avrò mai il piacere di vedere i moduli per l'esenzione da farmaci dopanti annunciati ormai quindici giorni fa?
Hasta siempre
Max the Bear
|
|
|
enzo
Leia
Italy
436 Posts |
Posted - 05/04/2004 : 15:13:40
|
Peccato che funzioni solo su Microsoft Windows dotato di Microsoft Internet Explorer.
Io uso Netscape e Mozilla, su Windows e Linux, e non riesco ad andare
oltre la home page, dove gli stessi titoli dei menu' sono troncati.
Qualcuno che ha il Mac, puo' provare (Chris?)?
frodo.baggins@hobbit.it |
 |
|
|
Geppo
Luke
Italy
948 Posts |
Posted - 05/04/2004 : 15:45:26
|
Su Mac sembra tutto ok.
Legolas Greenleaf da Mirkwood |
|
|
|
chris
Obi Wan
Italy
2447 Posts |
Posted - 05/04/2004 : 15:48:22
|
Con Explorer 5.2 per Mac tutto funziona regolarmente... tranne i menu che compaiono SOTTO le news rotanti, e quindi inutilizzabili, almeno quelli scomparsi.
Il solito problema di non aver fatto i test prima della messa on line fanno sì che non si riesca ad fare statistiche sui punteggi...
divertente il redirect automatico su una pagina più piccola se il browser/computer non permette la visualizzazione grande...
Aragorn il Prode (Chris) |
|
|
|
anna
Luke
Italy
786 Posts |
Posted - 05/04/2004 : 17:05:08
|
Io uso Firefox di mozilla su Win e non ho alcun problema
Anna |
|
|
|
Rob
C3PO
8 Posts |
Posted - 06/04/2004 : 00:42:58
|
io uso mozilla su win e tutto ok
con linux non ho ancora provato, ma credo che non avrò molti problemi
Rob |
|
|
|
nne
Leia
Italy
347 Posts |
Posted - 06/04/2004 : 11:20:18
|
Qualche segretario ha gia' provato ad accedere alle Funzioni di controllo delle Societa' da quando e' cambiata la grafica del Sito Fitarco ??!!!
La funzione - tesseramento nuovi atleti 2004 - non funziona :
" impossibile visualizzare la pagina ..."
Ennio B.
Mirasole |
|
|
|
enzo
Leia
Italy
436 Posts |
Posted - 06/04/2004 : 11:46:05
|
Adesso mi funziona netscape 7.1 su windows xp, ma non anora mozilla su Linux.
Qualcuno legge allora questo forum ...
Vorrei quindi ribadire per la centesima volta una richiesta, visto che malgrado le
mie numerose e-mail alla Segreteria Fitarco da 3 anni a questa parte il problema sussiste.
L'ho anche detto personalmene a Matteo Pisani all'assemblea di Rovereto e mi ha detto:
"Non ho ancora messo mano a quel file", il che non e' vero perche' riporto qui sotto il file attuale, e ci sono parecchie sue modifiche.
Chiedo ancora PERCHE' LA FITARCO CONTINUA AD INIBIRMI L'ACCESSO AL SITO FERERALE, VISTO CHE SONO UN TESSERATO COME TANTI ALTRI.
Ogni volta che tento di accedere al sito federale da un certo indirizzo IP, mi viene inibito ed arrivano oltre 100 e-mail ad un mio amico (staff@uninetcom.it), il che gli da' un po' fastidio.
Chiedo la rimozione del blocco entro 24 ore.
Enzo.
<!-- #include FILE="pwd.asp" -->
<!--
<%
'
' costanti
'
db = "fitarco_italia_fitarco1"
db2 = "fitarco_italia_fitarco2"
db3 = "fitarco_italia_fitarco3"
evento = "statuto"
ricurvo = "Arco Olimpico"
offset_ore = 9
dim oServer
dim hit_pagina, nome_pagina
' funzioni servizio -------------------------------------------------------
function encode (n, m)
s = "" & n
while len(s)<m
s = "0" & s
wend
encode = s
end Function
function format_data (dv)
giorno = encode(day(dv),2)
if giorno="00" then
format_data = " "
else
format_data = giorno & "/" & encode(month(dv),2) & "/" & year(dv)
end if
end function
function format_time (dv, time_shift)
dv = dv + time_shift / 24
format_time = format_data (dv) & " " & _
encode(hour(dv),2) & ":" & encode(minute(dv),2) & ":" & encode(second(dv),2)
end function
function adesso
dv = now()
adesso = format_time (dv, 0)
end function
function oggi
dv = now()
oggi = encode_date(format_date(now()))
end function
function format_date(dv)
format_date = ""
on error resume next
if dv>0 then
format_date = encode(day(dv),2) & "/" & encode(month(dv),2) & "/" & year(dv)
end if
end function
function format_date_usa(dv)
format_date_usa = ""
on error resume next
if dv>0 then
format_date_usa = encode(month(dv),2) & "/" & encode(day(dv),2) & "/" & year(dv)
end if
end function
function format_date_offset(dv, offset)
format_date_offset = format_date (dv+offset/24)
end function
function encode_date (stringa)
dim mese(12)
dim splitted
mese( 1) = 31
mese( 2) = 28
mese( 3) = 31
mese( 4) = 30
mese( 5) = 31
mese( 6) = 30
mese( 7) = 31
mese( 8) = 31
mese( 9) = 30
mese(10) = 31
mese(11) = 30
mese(12) = 31
encode_date = 0
splitted = split (stringa, "/")
if Ubound(splitted)<2 then
exit function
end if
gg = splitted(0)
mm = splitted(1)
aa = splitted(2)
if aa<20 then
aa = aa + 2000
end if
if (aa<=0) or (mm<=0) or (gg<=0) or (mm>12) or (aa<1900) then
exit function
end if
if ((aa mod 4)=0) and (aa<>1900) then
mese(2) = 29
bisesto = aa-1
else
bisesto = aa
end if
basta = gg-mese(mm)
basta = basta>0
if basta then
exit function
end if
if aa>=1900 then
aa = aa - 1900
bisesto = bisesto - 1900
end if
giorni = (bisesto \ 4) + (aa * 365) + gg + 1
for imm=1 to mm-1
giorni = giorni + mese(imm)
next
encode_date = giorni
end function
function estrai_numero(s)
n = ""
for ii=1 to len(s)
c = mid(s,ii,1)
if (c>="0") and (c<="9") then
n = n & c
end if
next
if n="" then
n = 0
end if
n = n \ 1
estrai_numero = n
end function
sub separatore
%> <img src="traccia2.gif" width=100% height=21> <%
end sub
function add_hit (pagina)
nome_pagina = pagina
data_adesso = encode_date(format_date_offset(now(),offset_ore))
find_str = "pagina='" & pagina & "' and evento='" & evento & "'"
SQL = "SELECT * FROM hit where "&find_str
set oRs_SQL=oServer.execute(SQL)
if oRs_SQL.EOF then
ID = -1
else
ID = oRs_SQL("ID")
end if
oRs_SQL.close
set oRs_SQL = nothing
Set oRs_hit = Server.CreateObject("ADODB.RecordSet")
oRs_hit.Open "hit", "DSN="&db&";UID=;Password="&pwddb&";", adOpenKeyset, adLockOptimistic, adCmdTable
oRs_hit.Find "ID="&ID
if oRs_hit.EOF then
oRs_hit.addNew
oRs_hit("pagina")=pagina
oRs_hit("evento")=evento
oRs_hit("N" )=0
oRs_hit("data" )=0
oRs_hit.update
end if
N = oRs_hit("N") + 1
data = oRs_hit("data")
oRs_hit("N" ) = N
oRs_hit("data") = data_adesso
oRs_hit.update
oRs_hit.close
set oRs_hit = nothing
add_hit = N
hit_pagina = N
if (data-data_adesso)<>0 then
Set oRs_hit = Server.CreateObject("ADODB.RecordSet")
oRs_hit.Open "hit_data", "DSN="&db&";UID=;Password="&pwddb&";", adOpenKeyset, adLockOptimistic, adCmdTable
oRs_hit.addNew
oRs_hit("pagina")=pagina
oRs_hit("evento")=evento
oRs_hit("N") = N
oRs_hit("data") = data_adesso
oRs_hit.update
oRs_hit.close
set oRs_hit = nothing
end if
' controllo numero di pagine richieste dal client ----------------
remote_addr = request.serverVariables("REMOTE_ADDR")
' escludi uninetcom.it -------------------------------------------
if remote_addr="193.70.61.1" then
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = "webcontrol@fitarco-italia.org"
myMail.To = "arco@enzoviscuso.com"
myMail.To = "staff@uninetcom.it"
myMail.Subject = "Max page"
myMail.Body = "Max page exceeded for 193.70.61.1 : "&format_time (dv, 9)
myMail.Send
set myMail = Nothing
response.end
end if
SQL = "SELECT * FROM ip"
set oRs_IP=oServer.execute(SQL)
if not oRs_IP.eof then
' vediamo se deveono essere rimossi i record di ieri -----------
data = oRs_IP("data")
if data<>oggi then
set oRs_IP=oServer.execute("delete from IP")
end if
end if
' genera o incrementa il contatore del client -------------------
SQL = "SELECT * FROM ip where ip='"&remote_addr&"'"
set oRs_IP=oServer.execute(SQL)
if oRs_IP.eof then
N = 1
SQL = "INSERT INTO ip (data,ip,N) values ("&oggi&",'"&remote_addr&"',1)"
set oRs_IP=oServer.execute(SQL)
else
N = oRs_IP("N") + 1
SQL = "UPDATE ip set n="&n&" WHERE IP='"&remote_addr&"'"
set oRs_IP=oServer.execute(SQL)
end if
if N>999 then response.end
end function
sub connect1
Set oServer = Server.CreateObject("ADODB.Connection")
oServer.Open "DSN="&db&";UID=;Password="&pwddb&";"
end sub
sub top_2(pagina, titolo_, DIR)
call connect1
add_hit (pagina)
altro_titolo = titolo_
if altro_titolo="<img src=arcieri.jpg>" then altro_titolo = "rivista federale"
anno_ = year(date())
%>
<html><head><title>FITArco - <%=altro_titolo%></title>
<link rel="stylesheet" href="/menu_800.css">
<script language="JavaScript" src="/menu.js"></script>
<script language="JavaScript" src="/menu_items.js"></script>
<script language="JavaScript" src="/menu_tpl_center.js"></script>
</head>
<body bgcolor=ffffff align=center link=#ff6300 alink=#ff6300 vlink=#ff6300 topmargin="0" onResize="javascript:window.location.href = window.location.href">
<script language="JavaScript">
new menu (MENU_ITEMS, MENU_POS);
</script>
<center>
<table border="0" cellpadding="0" cellspacing="0" width="750">
<tr>
<td><img src="/images/spacer.gif" width="72" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="62" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="105" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="152" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="175" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="184" height="1" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="1" height="1" border="0" alt=""></td>
</tr>
<tr>
<td rowspan="3"><img name="intestazione_r1_c1" src="/images/intestazione_r1_c1.jpg" width="72" height="132" border="0" alt=""></td>
<td rowspan="3"><img name="intestazione_r1_c2" src="/images/intestazione_r1_c2.jpg" width="62" height="132" border="0" alt=""></td>
<td><img name="intestazione_r1_c3" src="/images/intestazione_r1_c3.jpg" width="105" height="108" border="0" alt=""></td>
<td><img name="intestazione_r1_c4" src="/images/intestazione_r1_c4.jpg" width="152" height="108" border="0" alt=""></td>
<td><img name="intestazione_r1_c5" src="/images/intestazione_r1_c5.jpg" width="175" height="108" border="0" alt=""></td>
<td><img name="intestazione_r1_c6" src="/images/intestazione_r1_c6.jpg" width="184" height="108" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="1" height="108" border="0" alt=""></td>
</tr>
<tr>
<td colspan="4"><img name="intestazione_r2_c3" src="/images/intestazione_r2_c3.jpg" width="616" height="19" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="1" height="19" border="0" alt=""></td>
</tr>
<tr>
<td colspan="4"><img name="intestazione_r3_c3" src="/images/intestazione_r3_c3.jpg" width="616" height="5" border="0" alt=""></td>
<td><img src="/images/spacer.gif" width="1" height="5" border="0" alt=""></td>
</tr>
</table>
<br>
<table width=650 cellspacing=0 cellpadding=0 border=0>
<tr><td>
<%
end sub
sub bottom_page(dir, link)
%>
</td></tr></table>
<hr>
<font face="Arial" size=2>
<% if link then %>
Questa pagina é stata vista <%=hit_pagina%> volte<br>
<% end if %>
</body></html>
<%
end sub
function get_stringa(oRs, campo)
dim stringa
stringa = oRs(campo)
if stringa<>"" then
stringa = replace (stringa, chr(13), "<br>")
end if
get_stringa = stringa
end function
function xqt(oRs, sql)
xqt = -1
on error resume next
'response.write(sql&"<br>")
set oRs=oServer.execute(sql)
zzzz = -2
zzzz = oRs.recordcount
if (zzzz=-1) and (InStr(uCase(sql), "SELECT")=1) then
nxqt = 0
while not oRs.eof
nxqt = nxqt + 1
oRs.movenext
wend
if nxqt>0 then oRs.movefirst
xqt = nxqt
'response.write("n rec="&nxqt&"<br>")
end if
end function
function piu_anno(data)
ggg = day(data)
mmm = month(data)
yyy = year(data)+1
piu_anno = encode_date(ggg&"/"&mmm&"/"&yyy)
end function
%>
-->
frodo.baggins@hobbit.it |
|
|
|
enzo
Leia
Italy
436 Posts |
Posted - 06/04/2004 : 12:51:20
|
Un esperto che si legga il precedente script
(http://www.fitarco-italia.org/service.inc ;
si tratta del'intestazione comune di tutte le pagine)
puo' rilevare alcune altre cose interessanti, oltre al
blocco di cui sopra.
Chi le scopre ...?
p.s.:
Se alcuni siti di arco stamattina non funzionano e' perche' il server e' andato in crash stanotte. Probabile attacco. Stanno lavorando per ripristinarlo.
frodo.baggins@hobbit.it |
|
|
|
chris
Obi Wan
Italy
2447 Posts |
Posted - 06/04/2004 : 13:15:28
|
ho trovato solo che dopo la 999a pagina richiesta al giorno viene bloccato l'accesso!
Aragorn il Prode (Chris) |
|
|
|
anna
Luke
Italy
786 Posts |
Posted - 06/04/2004 : 14:11:49
|
Personalmente ho sempre difficoltà a resistere su un sito dove ci sono contemporaneamente una lista di notizie che scorrono e un'animazione come quella sul box di sinistra del sito fitarco. Bella la grafica, ma non si può farla stare un po' più ferma?
Anna |
|
|
|
enzo
Leia
Italy
436 Posts |
Posted - 06/04/2004 : 14:25:34
|
Se ti riferisci al blocco dell'accesso a me, avviene alla prima pagina.
Per tutti gli altri avviene alla 999^, ma senza mandare l'email.
Anche questo blocco andrebbe rimosso.
Chi accede solitamente tante volte ad un sito? un motore di ricerca.
Per cui l'unico effetto e' quello di limitare la propagazione delle pagine ai motori.
Il blocco contro di me era stato messo 4 anni fa proprio perche' stavo facendo una operazione come quella che hai fatto recentemente tu - anzi, esattamene la stessa - cioe' stavo verificando le incongruenze degli arcieri nel db.
Attento!
frodo.baggins@hobbit.it |
|
|
|
chris
Obi Wan
Italy
2447 Posts |
Posted - 06/04/2004 : 14:59:18
|
Beh, devo dire che almeno, rispetto a 4 anni fa, hanno messo in un file separato (asp) il nome dei DB e le password di accesso. In teoria andrebbero messi nel global.asa...
Visto che il webmaster fitarco sembra leggere più questo forum che le email che gli vengono spedite, suggerirei anche di aprire la connessione al DB una sola volta all'inizio e richiuderla alla fine della generazione della pagina, e non ogni volta che si accede a una funzione/subroutine: trattandosi di database MDB si risparmia un tempo considerevole!
Ovviamente i file include che si trovano in un path virtuale accessibile dal web vanno chiamati con estensione ASP e non INC, che va riservata ai file accessibili esclusivamente in locale!
Sempre per il webmaster: passa al php... è decisamente più veloce e funzionale rispetto all'asp
Aragorn il Prode (Chris) |
|
|
|
alessandro filippi
Leia
Italy
536 Posts |
Posted - 06/04/2004 : 15:08:25
|
ciao
vi comunico il test fatto con mac, come ha detto chris con explorer 5,2 non funziona bene ma con Safari e sistem 10.3.3, tutto sembra procedere bene , qualcuno ha provato sotto mac con sistem 9,xx
ciao ale |
|
|
|
Geppo
Luke
Italy
948 Posts |
Posted - 06/04/2004 : 15:29:19
|
io, e parrebbe funzionare.
Legolas Greenleaf da Mirkwood |
|
|
|
chris
Obi Wan
Italy
2447 Posts |
Posted - 06/04/2004 : 15:42:28
|
con opera6.05 e win98se scarsa funzionalità dei menu a cascata
con mozilla 1.3.1 (e win98se) tutto OK
Il menu di sinistra resta sotto il box con le immagini in movimento
con Netscape 6.1 e Mac 8.6 tutto OK tranne che i menu restano sotto le news e come sopra. Non avviene il reindirizzamento alla versione "small"
Con opera 5.0 e mac 8.6... non compare il box con le immagini, non compare il box con le news, i menu a cascata funzionano. Non avviene il reindirizzamento alla versione "small".
Con Explorer 5.1 (scusate l'errore del post precedente!) e mac 8.6 i menu a cascata si trovano dietro i box animati (news e immagini), la barra del menu è leggermente più larga della riga che la deve contenere, facendo uno scalino.
Mancano i link a CONI, FITA ed EMAU!!! In compenso, nel sommario, c'è quello alla FIARC
Comunque vedo che a loro la banda non costa nulla!!! 250kB per la home page significa generare un traffico notevolissimo (1GB ogni 4096 visite) solo per la home!
PS: per linux sono senza monitor, quindi mi toccherà aspettare che torni un monitor... per assaporare il piacere della diretta!
Aragorn il Prode (Chris) |
|
|
|
enzo
Leia
Italy
436 Posts |
Posted - 07/04/2004 : 11:37:23
|
Volevo solo comunicare che, finalmente, dopo quasi 4 anni,
e' stata fatta la modifica che avevo richiesto.
Ovviamente avevo scritto anche personalmente al Segretario
Carboni, che ha sollecitamente fatto provvedere, e che ringrazio.
frodo.baggins@hobbit.it |
|
|
|
enzo
Leia
Italy
436 Posts |
|
| |
Topic |
|
Due cosucce...
