<% response.expires=-1 ' Stringa di connessione al DB SQLStrConn = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source="+server.MapPath("\")+"\cgi-bin\IPC.mdb; Persist Security Info = False" ' Istanzia l'oggetto Connection e quello Recordset Set cnn=Server.CreateObject("ADODB.Connection") set rs=Server.CreateObject("ADODB.recordset") ' Apre la connessione al DB cnn.Open SQLStrConn ' imposta la stringa SQL SQL="Select * from PrimoPiano where Attiva=-1 order by data desc;" set rs=cnn.Execute(SQL) TestoPP="" if not rs.EOF then ' Ci sono record rs.MoveFirst TestoPP=""+">> "+cstr(rs.fields("Data"))+" - "+rs.fields("Titolo") TestoPP=TestoPP+"

" TestoPP=TestoPP+""+rs.fields("Testo")+"" else TestoPP="Nessuna notizia da segnalare" TestoPP=TestoPP+"" end if rs.close ' imposta la stringa SQL SQL="Select * from News where Attiva=-1 order by data desc;" set rs=cnn.Execute(SQL) TestoNews="" ' ********************* ' Per diminuire/aumentare il n° di news da caricare nella home NewsDaCaricare=5 ' ********************* i=1 if not rs.EOF then ' Ci sono record TestoNews="" rs.MoveFirst ' Inizia la scansione delle news do while not rs.eof TestoNews=TestoNews+""+cstr(rs.fields("Data"))+"
"+rs.fields("Titolo") TestoNews=TestoNews+"
" TestoNews=TestoNews+""+left(rs.fields("Testo"),150)+"... [continua]"+"
"+" --------------------------------------------------------------------------------"+"" TestoNews=TestoNews+"
" rs.movenext i=i+1 if i>NewsDaCaricare then exit do loop else TestoNews="Nessuna notizia da segnalare" TestoNews=TestoNews+"" end if ' Chiude e libera Connection e Recordset rs.Close set rs=nothing cnn.Close set cnn=nothing %> Istituto Pugliese Consumo

 
Sito in modalità grafica | Sito accessibile | Sito ipovedenti
 
 

ISTITUTO PUGLIESE CONSUMO
 
 
CITTADINANZATTIVA
 
http://www.cittadinanzattivapuglia.it
 
SEGRETERIA REGIONALE
Via Cantatore 32 - 71016 S.Severo (Fg)
Tel. 329 2921273 Fax: 0882 221599
E-mail: toninodangelo@libero.it
sito nazionale www.cittadinanzattiva.it
 
Clicca qui per le sedi regionali
 
Cittadinanzattiva è un movimento di partecipazione civica, nato nel 1978 con il nome di Movimento federativo democratico, che opera in Italia e in Europa per la promozione e la tutela dei diritti dei cittadini e dei consumatori.

235 sono le assemblee territoriali della Cittadinanzattiva distribuite in tutta Italia, 76000 il numero dei cittadini che aderiscono a Cittadinanzattiva.

Cittadinanzattiva opera per:

  • rimuovere situazioni di sofferenza inutile e di ingiustizia, intervenendo direttamente a difesa del cittadino;
  • mobilitare le coscienze e cambiare i comportamenti;
  • attuare i diritti riconosciuti dalle leggi e favorire il riconoscimento di nuovi diritti;
  • offrire ai cittadini strumenti per far sentire più forte la propria voce;
  • costruire alleanze e collaborazioni indispensabili per risolvere i problemi e promuovere i diritti.

Cittadinanzattiva è fatta di cittadini in movimento che:

  • vogliono dare il proprio contributo per una società più "umana" e giusta;
  • vogliono aiutare gli altri a risolvere i problemi, e non soltanto risolvere i problemi degli altri;
  • promuovono la partecipazione, perché le cose non cambiano senza il contributo di tanti cittadini attivi;
  • intervengono in prima persona per modificare la realtà;
  • fanno politica da cittadini, perché credono che la politica non sia soltanto quella dei partiti, e si impegnano a costruire una democrazia "a più voci".

La missione di Cittadinanzattiva trova il suo fondamento nell’articolo 118, ultimo comma, della Costituzione, che recita: "Stato, regioni, province, città metropolitane, comuni favoriscono l'autonoma iniziativa dei cittadini, singoli e associati, per lo svolgimento di attività di interesse generale, sulla base del principio della sussidiarietà"
 
HOME