Re: Retrieving page contents via rendertag

[Sud]

Hey
I am not sure about render TAG but RQL yes, following is how I did it
but not sure how useful it will be here.

'Config Section
loginGUID = "<%inf_LoginGUID%>"
sessionKey = "<%inf_SessionKey%>"
'Read Content
set objIO = Server.CreateObject("RDCMSASP.RdPageData")
objIO.XmlServerClassName = "RDCMSServer.XmlServer"
set objXMLDOM = Server.CreateObject("Microsoft.XMLDOM")
var_pageURL="<%inf_previewPDFURL%>"
'response.write var_pageURL
set pageParams = Server.CreateObject( "Scripting.Dictionary" )
if var_pageURL <> "" then
    if InStr(var_pageURL, "?") <> 0 then
        getURL=Split(var_pageURL, "?")(0)
        'response.write getURL
    end if
end if
if getURL <> "" and NOT pageParams.Exists("url") then
    pageParams.add "url", getURL
end if
var_params = Split(Split(var_pageURL, "?")(1), "&")
for each param in var_params
    if NOT pageParams.Exists(Split(param, "=")(0)) then
        pageParams.add Split(param, "=")(0), Split(param, "=")(1)
        'response.write Split(param, "=")(0) & "|" & Split(param, "=")
(1) & "<br>"
    end if
next
'response.write pageParams("Action")
xmlString = "<IODATA loginguid='"& loginGUID &"' sessionkey='"&
sessionKey &"'><PREVIEW mode='0' projectguid='"&
pageParams("projectguid") &"' versionguid='' isolated='0'
generatedate='' templateguid='' rights1='-33570817' loginguid='"&
loginGUID &"' url='/cms/ioRD.asp'
querystring='Action=Preview&amp;projectguid="&
pageParams("projectguid") &"&amp;editlinkguid="&
pageParams("editlinkguid") &"&amp;parentpageguid="&
pageParams("parentpageguid") &"&amp;pageguid="& pageParams("pageguid")
&"&amp;targetcontainerguid="& pageParams("targetcontainerguid")
&"&amp;containerpageguid="& pageParams("containerpageguid")
&"&amp;projectvariantguid="& pageParams("projectvariantguid")
&"&amp;languagevariantid="& pageParams("languagevariantid")
&"&amp;islink="& pageParams("islink") &"&amp;querypagekeyvalue="&
pageParams("querypagekeyvalue") &"&amp;timestamp="&
pageParams("timestamp") &"' /></IODATA>"
resXML = objIO.ServerExecuteXML( xmlString, sError )
'response.write resXML

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