Remove the PreExecute tags, preview or publish the page, copy the source
into a file and run it separately under IIS. This will point out any errors
and you can correct them in the template and go again.

Cheers,

Gavin

On 10 October 2011 02:41, CS <[email protected]> wrote:

> Hi all,
>
> I am very new to Reddot. What I am trying to do is fetch the RSS feeds
> of a third party site and show the titles with link in our site. So, I
> started testing a simple ASP code inside the IoRangePreExecute tags.
> the below code worked fine.
>
> <!IoRangePreExecute>
> <%
> Dim strMessage
> strMessage = "Test begins here<br/>Testing ASP<br/>"
> Response.Write (strMessage)
> Response.Write ("<br>Testing HTML code here <br/>")
> Response.Write ("The time on the server is: " & Time())
> %>
> <!/IoRangePreExecute>
>
> Then I googled and found the below code similar to my requirement
>
> <!IoRangePreExecute>
> <%
> Dim objHTTP ' this object is used to call the RSS Feed remotely
> Dim RSSURL,RSSFeed ' these variables hold the URL and Content for the
> RSS Feed
> Dim xmlRSSFeed ' this variable hold the XML data in a DOM Object
> Dim objItems,objItem, objChild ' these variables are used to
> temporarily hold data from the various RSS Items
> Dim title,description,link '  these are local variables that will hold
> the data to be displayed
> Dim OutputHTML_1,OutputHTML_2,OutputHTML_3 ' these variables will hold
> the HTML that was converted from the RSS Feed
>
> ' change the RSSURL variable to the exact URL of the RSS Feed you want
> to pull
> RSSURL = "http://news.google.com/news?
> pz=1&cf=all&ned=in&hl=en&output=rss"
>
> ' this code requests the raw RSS/XML and saves the response as a
> string <RSSFeed>
> Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
> objHTTP.open "GET",RSSURL,false
> objHTTP.send
> RSSFeed = objHTTP.responseText
>
> ' this code takes the raw RSSFeed and loads it into an XML Object
> Set xmlRSSFeed = Server.CreateObject("MSXML2.DomDocument.4.0")
> xmlRSSFeed.async = false
> xmlRSSFeed.LoadXml(RSSFeed)
>
> ' this code disposes of the object we called the feed with
> Set objHTTP = Nothing
>
> ' this is where you determine how to display the content from the RSS
> Feed
>
> ' this code grabs all the "items" in the RSS Feed
> Set objItems = xmlRSSFeed.getElementsByTagName("item")
>
> ' this code disposes of the XML object that contained the entire feed
> Set xmlRSSFeed = Nothing
>
> ' loop over all the items in the RSS Feed
> For x = 0 to objItems.length - 1
>        ' this code places the content from the various RSS nodes into local
> variables
>        Set objItem = objItems.item(x)
>        For Each objChild in objItem.childNodes
>                Select Case LCase(objChild.nodeName)
>                        Case "title"
>                                  title = objChild.text
>                        Case "link"
>                                  link = objChild.text
>                        Case "description"
>                                  description = objChild.text
>                End Select
>        Next
>        ' Here are some various display samples.
>        Response.Write ("<a href=""" & link & """>" & title & "</a><br />" &
> description & "<br /><br />")
> Next
> %>
> <!/IoRangePreExecute>
>
> Once I publish the above code on our stage server, I am getting email
> saying
> -------------------------
> Errors:
> RequestPageFromPageBuilder: Page 1024, Pagebuilder send:
> BuildPage_PreExecute: The remote server returned an error: (500)
> Internal Server Error.
> -------------------------
>
> not sure what might be causing this error. So, I modified the above
> code to see where the error actually getting started. I removed almost
> most of the lines and here is the code I tried:
>
> <!IoRangePreExecute>
> <%
> Dim objHTTP ' this object is used to call the RSS Feed remotely
> Dim RSSURL,RSSFeed ' these variables hold the URL and Content for the
> RSS Feed
> Dim xmlRSSFeed ' this variable hold the XML data in a DOM Object
> Dim objItems,objItem, objChild ' these variables are used to
> temporarily hold data from the various RSS Items
> Dim title,description,link '  these are local variables that will hold
> the data to be displayed
> Dim OutputHTML_1,OutputHTML_2,OutputHTML_3 ' these variables will hold
> the HTML that was converted from the RSS Feed
>
> ' change the RSSURL variable to the exact URL of the RSS Feed you want
> to pull
> RSSURL = "http://news.google.com/news?
> pz=1&cf=all&ned=in&hl=en&output=rss"
>
> ' this code requests the raw RSS/XML and saves the response as a
> string <RSSFeed>
> Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
> %>
> <!/IoRangePreExecute>
>
> In the above code, I only have objHTTP object is getting initialized.
> For this piece of code itself I am getting the same error as shown
> below:
> -------------------------
> Errors:
> RequestPageFromPageBuilder: Page 1024, Pagebuilder send:
> BuildPage_PreExecute: The remote server returned an error: (500)
> Internal Server Error.
> -------------------------
>
> It would be great if someone help me on this.
>
> Thanks :)
>
> --
> You received this message because you are subscribed to the Google Groups
> "RedDot CMS Users" group.
> To post to this group, send email to [email protected].
> To unsubscribe from this group, send email to
> [email protected].
> For more options, visit this group at
> http://groups.google.com/group/reddot-cms-users?hl=en.
>
>

-- 
You received this message because you are subscribed to the Google Groups 
"RedDot CMS Users" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to 
[email protected].
For more options, visit this group at 
http://groups.google.com/group/reddot-cms-users?hl=en.

Reply via email to