Thanks, but how change here the date format?
'Loop through each of the XML RSS Feed items and place it in an HTML table
For Each sarryRSSFeedItem In objRSSFeedItem
'Web Wiz NewsPad RSS Feed Item childNodes
'0 = title
'1 = link
'2 = description (post)
'3 = pubDate
'4 = guid (perminent link)
'5 = WebWizNewsPad:pubDateISO (ISO international date)
strHTML = strHTML & " <tr class=""tableRow"">" & _
vbCrLf & " <td>" & _
vbCrLf & " <li><strong><a href=""" & sarryRSSFeedItem.childNodes(1).text & """>" & sarryRSSFeedItem.childNodes(0).text & "</a></strong>" & _
vbCrLf & " <em> - " & FormatDateTime(sarryRSSFeedItem.childNodes(5).text, 1) & "</em></li>" & _
vbCrLf & " </td>" & _
vbCrLf & " </tr>"
Next