Note that there are some explanatory texts on larger screens.

plurals
  1. POHow to get RSS feed through VBS Script and display contents in CMD
    primarykey
    data
    text
    <p>Hello there im trying to figure out how i can parse RSS feeds with VBS and display the contents into cmd. I got some code i have found around the net. this is what i got so far.</p> <p>Batchfile: </p> <pre><code>:news start scripts\xml\getxml.exe -N --directory-prefix=%temp% http://feeds.bbci.co.uk/news/rss.xml :newscheck if NOT EXIST %temp%\rss.xml ( ping 123.45.67.89 -n 1 -w 500 &gt; nul. goto newscheck ) start scripts\news\parsebbcnews.vbs ping 123.45.67.89 -n 1 -w 500 &gt; nul. :newsxmlparsecheck if NOT EXIST %temp%\bbcnews.txt ( ping 123.45.67.89 -n 1 -w 500 &gt; nul. goto newsxmlparsecheck ) set /p headline= &lt;%temp%\bbcnews.txt echo %headline% %speech% "%headline%" del %temp%\rss.xml del %temp%\bbcnews.txt goto start </code></pre> <p>then this starts the VBS: </p> <pre><code> Dim xmlDoc, objNodeList, plot Set wshShell = CreateObject( "WScript.Shell" ) tfolder = wshShell.ExpandEnvironmentStrings("%TEMP%") Set xmlDoc = CreateObject("Msxml2.DOMDocument") xmlDoc.load(tfolder &amp; "\rss.xml") Set objNodeList = xmlDoc.getElementsByTagName("channel/item/description") 'Node to search for Set objFSO = CreateObject("Scripting.FileSystemObject") ' Write all found results into forecast.txt Const ForWriting = 2 Set objTextFile = objFSO.OpenTextFile _ (tfolder &amp; "\bbcnews.txt", ForWriting, True) If objNodeList.length &gt; 0 then For each x in objNodeList plot=x.Text objTextFile.WriteLine(plot) Next 'just remove this? objTextFile.Close End If 'Extract todays data (first line) from 'forecast.txt' and write each data type to seperate line in today.txt Const ForReading = 1 Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile _ (tfolder &amp; "\bbcnews.txt", ForReading) strNextLine = objTextFile.Readline 'currentsplit = Split(strNextLine , ", ") Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile(tfolder &amp; "\headline.txt", ForWriting, True) objTextFile.WriteLine(strNextLine) </code></pre> <p>This gets 1 news rss feed from bbc. I want also to get more than one feed displayed.</p> <p>I did not create this code so i don't know how i can get the script and the similar code, to get rss from different sites. So basically what i want is to know how i can do this with a vb-script and display it in cmd.</p>
    singulars
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload