Modifica Home Page

[Goldm3mb3r]

Salve a tutti,
sto realizzando il sito di un piccolo comune nel template della mia
home page sono previsti dei box con i Bandi e con i comunicati.
A questo punto io vi chiedo posso semplicemente inserire all'interno
del template i comandi <!--|COMUNICATI|--> o <!--|BANDI|-->(a
proposito per i bandi è quello??) oppure devo implementare del codice
asp ???


Vi prego aiutatemi !! Sono un pò in ritardo :(((

Qualcuno poi sa rispondere al mio quesito del 9 Aprile ???

Aiutoooo !! :D

[pietrocap]

Sì, devi anche modificare del codice asp. questi sono i passi da
compiere.

1. Il css di default deve essere validato, altrimenti non riuscirai a
modificare il modello di default. Se lo stai facendo in locale apri il
db, tabella modelli_css ed inserisci 1 nel campo "validato".

2. Modifica il modello predefinito inserendo <!--|BANDI|--> sotto <!--|
COMUNICATI|-->, ovvero:

<!--|COMUNICATI|-->
<!--|BANDI|-->

3. edita il file default.asp inserendo il codice relativo ai bandi
sotto quello che gestisce l'inserimento dei comunicati. alla fine
otterrai questo risultato:

'SOSTITUISCI CONTENUTI
If Len(INC_COMUNICATI) > 0 then
PAGINA_HTML = replace(PAGINA_HTML, "<!--|COMUNICATI|-->",
INC_COMUNICATI)
Else
PAGINA_HTML = replace(PAGINA_HTML, "<!--|COMUNICATI|-->", "")
End if
'Gestione bandi
If Len(INC_BANDI) > 0 then
PAGINA_HTML = replace(PAGINA_HTML, "<!--|BANDI|-->", INC_BANDI)
Else
PAGINA_HTML = replace(PAGINA_HTML, "<!--|BANDI|-->", "")
End if

4. edita la pagina inc_home.asp ed inserisci il codice per la gestione
dei bandi sotto quello dei comunicati. Io ne ho approfffittato per
modificare anche il codice dei comunicati inserendo i comunicati in un
div con id="comunicati".
Sotto ho inserito il codice per la gestione dei bandi inserendolo in
un div con id="bandi". questo è il risultato:

'----- INSERIMENTO DI NOTIZIE E COMUNICATI ------

INC_COMUNICATI = null

select case(CMS_DB)
case "MYSQL"
sql = "Select * from " & application("prefix") & "comunicati where
visibile_" & Session("language") & "=1 order by disp_da desc limit 3"
case "SQL","ACCESS"
sql = "Select TOP 3 * from " & application("prefix") & "comunicati
where visibile_" & Session("language") & "=1 order by disp_da desc"
end select

SET RS = conn.execute(sql)
numrows=0
If rs.EOF AND rs.BOF Then
else
INC_COMUNICATI = INC_COMUNICATI & "<div id=""comunicati""><!--
INIZIA RIQUADRO COMUNICATI -->" & vbcrlf
INC_COMUNICATI = INC_COMUNICATI & "<h2>Comunicati e notizie</h2>" &
vbcrlf
while not rs.eof

if right(fixstring(rs("title_" & Session("language")),"d"),1) =
"." then
oggettocomunicato = left(fixstring(rs("title_" &
Session("language")),"d"),len(fixstring(rs("title_" &
Session("language")),"d"))-1)
else
oggettocomunicato = fixstring(rs("title_" &
Session("language")),"d")
end if

INC_COMUNICATI = INC_COMUNICATI & "<div class=""box""><!-- BOX --
>" & vbcrlf
INC_COMUNICATI = INC_COMUNICATI & "<h3><a href=""comunicato.asp?
id=" & rs("ID") & """>" & oggettocomunicato & "</a>.</h3>" & vbcrlf
INC_COMUNICATI = INC_COMUNICATI & "<p>" & "Notizia di " &
formatdatetime(rs("disp_da"),1) & ".</p>" & vbcrlf
INC_COMUNICATI = INC_COMUNICATI &"</div><!-- /BOX -->" & vbcrlf

rs.movenext
NumRows = NumRows + 1
Wend
INC_COMUNICATI = INC_COMUNICATI & "<p>Elenco completo <a
href=""comunicati.asp"">comunicati e notizie</a>.</p>" & vbcrlf
INC_COMUNICATI = INC_COMUNICATI & "</div><!-- FINISCE RIQUADRO
COMUNICATI -->" & vbcrlf
end if
rs.close
set rs=nothing

'----- INSERIMENTO DI BANDI ------

INC_BANDI = null

select case(CMS_DB)
case "MYSQL"
sql = "Select * from " & application("prefix") & "bandi where
visibile=1 order by scadenza_data desc limit 3"
case "SQL","ACCESS"
sql = "Select TOP 3 * from " & application("prefix") & "bandi where
visibile=1 order by scadenza_data desc"
end select

SET RS = conn.execute(sql)
numrows=0
If rs.EOF AND rs.BOF Then
else
INC_BANDI = INC_BANDI & "<div id=""bandi""><!-- INIZIA RIQUADRO
BANDI -->" & vbcrlf
INC_BANDI = INC_BANDI & "<h2>Bandi di gara e concorsi</h2>" &
vbcrlf
while not rs.eof

if right(fixstring(rs("oggetto_" & Session("language")),"d"),1) =
"." then
oggettobando = left(fixstring(rs("oggetto_" &
Session("language")),"d"),len(fixstring(rs("oggetto_" &
Session("language")),"d"))-1)
else
oggettobando = fixstring(rs("oggetto_" &
Session("language")),"d")
end if

INC_BANDI = INC_BANDI & "<div class=""box""><!-- BOX -->" & vbcrlf
INC_BANDI = INC_BANDI & "<h3><a href=""bando.asp?id=" & rs("ID") &
""">" & oggettobando & "</a>.</h3>" & vbcrlf
INC_BANDI = INC_BANDI & "<p>" & "Scadenza: " &
formatdatetime(rs("scadenza_data"),1) & ".</p>" & vbcrlf
INC_BANDI = INC_BANDI &"</div><!-- /BOX -->" & vbcrlf

rs.movenext
NumRows = NumRows + 1
Wend
INC_BANDI = INC_BANDI & "<p>Elenco completo <a
href=""bandi.asp"">dei bandi</a>.</p>" & vbcrlf
INC_BANDI = INC_BANDI & "</div><!-- FINISCE RIQUADRO BANDI -->" &
vbcrlf

end if
rs.close
set rs=nothing


5. E' tutto, a parte altre personalizzazioni del css o del codice in
inc_home.asp per applicare gli stili che più ti piacciono.

LE STESSE OPERAZIONI VANNO FATTE ANCHE SE VUOI INSERIRE AD ESEMPIO LE
ULTIME DELIBERE NELLA HOME PAGE.

ABBIAMO MESSO I COMUNICATI IN HOME PAGE PER DARE DELLE DRITTE NEL CASO
QUALCUNO AVESSE VOLUTO INSERIRE ANCHE I BANDI O ALTRO.

INFATTI SE CI FAI ATTENZIONE NON HO FATTO ALTRO CHE APPLICARE LO
STESSO METODO GIA' APPLICATO AI COMUNICATI ;)

P.S.: specifica sempre il tipo di database che stai utilizzando quando
inserisci un post in questo gruppo ;)

Ringraziami per averti impegnato il weekend :) :) :)

Scherzi a parte, buon lavoro!

Inserirò quanto prima questo post nelle FAQ su Fruibile su
http://www.pietrocappai.info.

Salvo Vitale se è sempre dell'idea di occuparsi del wiki con la guida
di Fruibile su http://guida.fruibile.it potrebbe magari inserirlo lì,
creando un'apposita sezione "Personalizzare Fruibile" ;)

[faro]

On 11 Apr, 20:43, pietrocap <pietro...@carloforte.net> wrote:


> Salvo Vitale se è sempre dell'idea di occuparsi del wiki con la guida

> di Fruibile suhttp://guida.fruibile.itpotrebbe magari inserirlo lì,

> creando un'apposita sezione "Personalizzare Fruibile" ;)

Caro Pietro,

certamente sono sempre dell'idea di occuparmi del wiki. Mi scuso per
la mia assenza, dovuta a vari impegni di lavoro.
Sto facendo un po' di prove sulla mia demo locale al momento.
E ci sono ancora alcune perplessità che dovremo vedere assieme.
Mi faccio sentire presto!
Ciao,
Salvo