What's the error it reports?

On Jul 9, 10:17 am, DTMOW <[email protected]> wrote:
> Thanks Wayne!
>
> I'm still having some trouble with this....
>
> So I now have this and it errors out any idea on what I am doing
> wrong? Thanks again for your help.
>
> function sendXML (XMLString)
>   set objData = server.CreateObject("RDCMSASP.RdPageData") '*
>   objData.XmlServerClassName="RDCMSServer.XmlServer" '*
>   sendXML = objData.ServerExecuteXml(XMLString, sErrors)
>   if sErrors <> "" then
>     response.write "Errors occured: " & sErrors & chr(13)
>   end if
>   objData = NULL
> end function
>
> xmlString = "<IODATA>" &_
>                "<ADMINISTRATION action='login' name='owtemp'
> password='12345'/>" &_
>             "</IODATA>"
>
> xmlFile = sendXML(XMLString)
> Set xmlDoc = server.CreateObject("Msxml2.DOMDocument.4.0")
> xmlDoc.loadXML(xmlFile)
>
> Set RDxmlNodeList = xmlDoc.getElementsByTagName("LOGIN")
> LOGINGUID  = RDxmlNodeList.item(0).getAttribute("guid")
>
> xmlString = "<IODATA loginguid='" & LOGINGUID & "'>" &_
>   "<ADMINISTRATION action='validate' guid='" & LOGINGUID &"'
> useragent='script'>" &_
>     "<PROJECT guid='6C8A3094541911D4BDAB004005312B7C'/>" &_
>   "</ADMINISTRATION>" &_
> "</IODATA>"
>
> xmlFile2 = sendXML(XMLString)
> xmlDoc.loadXML(xmlFile2)
> Set RDxmlNodeList2 = xmlDoc.getElementsByTagName("SERVER")
> SESSIONKEY   =  RDxmlNodeList2.item(0).getAttribute("guid")
>
> set xmlDoc = nothing

-- 
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