The site i was using changed the RSS to requiring a login... so i found another RSS feed.
The new feed location is : https://www.biblegateway.com/votd/get/
The script is as follows
The new feed location is : https://www.biblegateway.com/votd/get/
The script is as follows
Code:
Imports System.IO Sub Main(parm as object) Dim m_xmld As XmlDocument Dim m_node As XmlNode Dim CHverse as xmlNode dim tverse as xmlNode m_xmld = New XmlDocument m_xmld.Load("https://www.biblegateway.com/votd/get/") CHverse = m_xmld.SelectSingleNode("votd/reference") tverse = m_xmld.SelectSingleNode("votd/content") hs.speak ("The Verse for the day is from " & CHverse.InnerText.replace(":"," verse ") &". The Verse is . . " & tverse.InnerText,TRUE) ' hsp.waitms(250) hs.speak (". . . . . Again; This verse was from " & CHverse.InnerText.replace(":"," verse "),true ) End Sub
Comment