<!--- <br />I'm late to this discussion, but in case anyone needs this code, I'm doing my good deed for the day. Allen Levine kindly send me the code to post Livecycle data via CF, and so I am sending it on to you. I also do some REPlaces in my CF code to configure my lists into saveable strings:<br /><br />Livecycle Designer:<br />Insert a button object for the submit button.<br />Button Properties:<br />In field tab, Control Type=Submit<br />Submit tab, place your url for the following code.<br />Submit As= XML Data (XML)<br /><br />Here's the CF code to process the submit, which sends it to strings:<br /><br />XML capture and looping code courtesy of Allen Levine,<br />allen@oysterweb.com<br /><br />Capture The Actual XML Data To A Variable <br />GetHttpRequestData<br />Description<br />Makes HTTP request headers and body available to CFML pages. Useful for capturing SOAP request data, which can be delivered in an HTTP header.<br />about tostring -> Value to convert to a string; can be a simple value such as an integer, a binary object, or an XML document object.<br />---><br /><cfparam name="mfieldnames" type="string" default=""><br /><cfparam name="mfieldvalues" type="string" default=""><br /><cfparam name="mFieldNamesCheck" type="string" default=""><br /><cfparam name="tmpFieldNameEval" type="string" default=""><br /><br /><cfset x = GetHttpRequestData()><br /><cfset strXML = '#toString(x.content)#'><br /><cfif 1 eq 2> <br /> This is what the RAW XML packet Looks Like<BR><br /> <cfdump var="#strXML#"><br /> <cfabort><br /></cfif> <br /> <!--- Now We Parse The Actual XML <br /> xmlParse descrip -> Converts XML text into an XML document object.<br /> IsXmlDoc -> Description Determines whether the function parameter is a ColdFusion XML document object.---><br /> <cfset tsUpload = #Now()#><br /> <cfset parsedXML=xmlParse(strXML)><br /> <cfset isXML=isXmlDoc(parsedXML)><br /><br /> <!--- Check For Well Formatted XML Doc ---><br /> <cfif isXML EQ 'Yes'><br /> <!--- Get the root element ---><br /> <cfset theRoot = parsedXML.XmlRoot><br /> <!--- Get The Number Of Children To Use In Loop<br /> xmlChildren -> Using the corresponding structure entry names (that is, XmlChildren array entries), such as mydoc.employee.XmlChildren[1] ---><br /> <cfset num_Children_Root = arrayLen(theRoot.XmlChildren)><br /> <cfelse><br /> Problem. The XML does not appear to be well formatted.<br /> </cfif><br /> <cfoutput> <br /> <cfif 1 eq 1><br /> There Are #num_Children_Root# Children In The XML File.<BR><br /> Looping Through XML Elements: <BR><br /> </cfif><br /> <br /> <br /> <cfset mFieldNamesCheck=""><br /> <cfloop index="x" from="1" to="#num_Children_Root#"><br /> <cfset tmpFieldName = "#theRoot.XMLChildren[x].XmlName#"><br /> <cfset "#tmpFieldName#" = "#theRoot.XMLChildren[x].XmlText#"><br /> <cfset #tmpFieldNameEval# = "#evaluate(tmpFieldName)#"><br /> <br /><!-- Below is where the ordered pairs are turned into two lists. One list is column headers, the other list is column values.--> <br /><cfif 1 eq 1><br /> <cfif #tmpFieldNameEval# neq "" and #tmpFieldNameEval# neq 0><br /> <cfset mFieldNames=listappend(mFieldNames, #tmpFieldName#)><br /> <!--comma replacer here--changes , to | --><br /> <cfset tmpFieldNameEval=#Replace(tmpFieldNameEval, ",", "|", "all")#><br /> <!--apostrophe replacer here changes ' to @@", "all")#> <br /> <cfif not (#IsDate(tmpFieldNameEval)#)><br /> <cfset tmpFieldNameEval="'"&#tmpFieldNameEval#&"'"> <br /> </cfif> <br /> <cfif not (#Isnumeric(tmpFieldNameEval)#) and #IsDate(tmpFieldNameEval)#><br /> <cfset tmpFieldNameEval="#CreateODBCDate(tmpFieldNameEval)#"> <br /> </cfif> <br /> <cfset mFieldValues=listappend(mFieldValues, #tmpFieldNameEval#)><br /> </cfif> <!--only store information where fields are completed--><br /></cfif><br /><br /><cfif 1 eq 1><br /> <cfif 1 eq 1><br /> <cfset varCheckFieldNames = ListContainsNoCase(mFieldNamesCheck, "'"&tmpFieldName&"'")> <br /> <CFIF #varCheckFieldNames# is 0> <br /> <cfset mFieldNamesCheck=#listappend(mFieldNamesCheck, "'"&tmpFieldName&"'")#><br /> </CFIF> <br /> <cfoutput><br /> tmpFieldNameEval=#tmpFieldName#<br /><br /> varCheckFieldNames=#varCheckFieldNames#<br /><br /> mFieldNamesCheck=#mFieldNamesCheck#<br /><br /> </cfoutput> <br /> <cfif #varCheckFieldNames# neq 0><br /> <cfoutput><br /> mFieldNamesCheck=#mFieldNamesCheck#<br /><br /> I couldn't find in mFieldNamesCheck #tmpFieldName#<br /><br /><br /> </cfoutput> <br /> <cfset mFieldNames=listappend(mFieldNames, #tmpFieldName#)><br /> <!--comma replacer here--changes , to | --><br /> <cfset tmpFieldNameEval=#Replace(tmpFieldNameEval, ",", "|", "all")#><br /> <!--apostrophe replacer here changes ' to @@", "all")#> <br /> <cfif not (#IsDate(tmpFieldNameEval)#)><br /> <cfset tmpFieldNameEval="'"&#tmpFieldNameEval#&"'"> <br /> </cfif> <br /> <cfif not (#Isnumeric(tmpFieldNameEval)#) and #IsDate(tmpFieldNameEval)#><br /> <cfset tmpFieldNameEval="#CreateODBCDate(tmpFieldNameEval)#"> <br /> </cfif> <br /> <cfset mFieldValues=listappend(mFieldValues, #tmpFieldNameEval#)><br /> </cfif> <!--only store to mfieldnames and mfieldvalues when not in list mfieldnamesCheck --><br /> </cfif> <!--only store information where fields are completed--> <br /></cfif><br /><cfif 1 eq 1> <br /> <cfoutput><br /> #tmpFieldName#=#tmpFieldNameEval#<br /><br /> </cfoutput> <br /></cfif> <br />/cfloop>
