Per contattarmi

Critiche

Ho inviato tre poesie per un concorso al sito Nuove Parole . Non ho vinto ma mi hanno inviato un loro giudizio critico che qui espongo ringraziandoli.

L’autore si dimostra all’altezza di sperimentare tematiche assai differenti tra loro, e lo fa scrivendo dei componimenti che vanno dall’autoanalisi interiore (come ne “Il vecchio pescatore”), al tema con variazioni introdotto dall’anastrofe (“Gocce d’inverno”), fino all’ambientazione storico-epica (“Il torneo”).
Il ritmo è tutto sommato discreto, ma in alcuni passaggi risente del forte vincolo imposto dalla metrica, costringendo talvolta l’autore all’uso di termini desueti che limitano l’immediatezza dei componimenti.

Antonio Pellati

<% ' ---------------------------------------------------------------------------------------------------------| ' | ' Autore: Antonio Pellati www.antoniopellati.it | ' | ' | ' ---------------------------------------------------------------------------------------------------------| Dim contatore, x, a, Id ' Dichiaro le variabili che mi servono | Id = Session.Contents("Identif")+1 ' Carico in Id quante volte è stata aperta la pagina | if Id = 1 then ' Se è la prima volta incrementa il contatore, | contatore = Server.MapPath("App_data/contatore.xml") ' Localizzo il file Xml che registra il numero di accessi | Set x = Server.CreateObject("Microsoft.XMLDOM") ' Creo l'oggetto XMLDOM | x.async = False ' Imposto l'oggetto come sincrono | x.load(contatore) ' Carico il file Xml | Set a = x.selectSingleNode("record/numero") ' Mi posiziono sul nodo Xml che mi interessa | a.text = CInt(a.text) + 1 ' Aggiorno di una unità il contatore | x.save(contatore) ' Salvo il nuovo valore | else ' Altrimenti mostra il numero dei visitatori senza incremento contatore = Server.MapPath("App_data/contatore.xml") ' Localizzo il file Xml che registra il numero di accessi | Set x = Server.CreateObject("Microsoft.XMLDOM") ' Creo l'oggetto XMLDOM | x.async = False ' Imposto l'oggetto come sincrono | x.load(contatore) ' Carico il file Xml | Set a = x.selectSingleNode("record/numero") ' Mi posiziono sul nodo Xml che mi interessa | end if Response.Write(" Ringrazio il visitatore N° " + a.text) ' Leggo gli accessi dal fila XMl | Session.Contents("Identif") = Id ' Incrementa il contatore di apertura della pagina | Set x = Nothing ' Un po di pulizia... :-) | ' ---------------------------------------------------------------------------------------------------------| %>