IL BLOG DI LUIGI BUONO: LA NUOVA SPORTIVA SUL SITO VIVITELESE

lunedì 10 novembre 2008

LA NUOVA SPORTIVA SUL SITO VIVITELESE

Desidero portare all'attenzione degli interessati che la foto della Nuova Sportiva del Golfo (al Femminile) è stata pubblicata anche sul sito http://www.vivitelese.it/ . Spero di aver fatto casa gradita a tutti. un saluto affettuoso

Nessun commento:

Posta un commento

<% rssURL = "http://news.studiocataldi.it/rss.asp" Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0") objXML.async = false objXML.setProperty "ServerHTTPRequest", True objXML.validateOnParse =false objXML.preserveWhiteSpace = false rssFile = objXML.Load(rssURL) 'Se ci sono errori stampo a video If Not rssFile Then Response.write "Non ci sono notizie
per favore avvisate il webmaster" 'Se NON ci sono errori proseguo... Else limite_max=15 limite_min=1 conta=0 'Recupero i dati dai nodi Item (e sotto nodi) Set objNodeList = objXML.getElementsByTagName("item") For Each objNode In objNodeList 'stampo a video... conta=conta+1 IF conta>=limite_min AND conta<=limite_max THEN For Each objNode2 In objNode.childNodes Select Case objNode2.nodeName Case "title" strTitle = objNode2.firstChild.nodevalue Case "link" strURL = objNode2.firstChild.nodevalue Case "description" strDesc = objNode2.firstChild.nodevalue End Select Next Response.write "" &_ Left(strTitle,280) & "
" & Left(strDesc,700) & "...
" END IF 'azzero tutto per il prossimo passaggio strTitle = "" strURL = "" strDescription = "" Next set objNodeList = Nothing End if %>
Fonte: www.studiocataldi.it