Mostrar el resultado de un Stored Procedure en XML

[MAR15]

Hola, Alguien me podría ayudar en este caso:

Tengo un Stored Procedure que se ejecuta en un ASP
______
<%@ language="vbscript" %>
<%

set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ="Driver={SQL erver};Server=IP;uid=xxx;Pwd=xxxx;database=xxx"

Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "EXEC PR_PORCENTAJE 1",Conn
x=RS(0)
Response.Write(x)
%>
________

El resultado que me arroja es un valor, por ejem. 95 Este resultado del Store debe formar parte del siguiente archivo XML (ver letras en negrita)

<Chart upperLimit="100" lowerLimit="0" baseFontColor="FFFFFF" majorTMNumber="11" majorTMColor="FFFFFF" majorTMHeight="8" minorTMNumber="5" minorTMColor="FFFFFF" minorTMHeight="3" pivotRadius="0" showHoverCap="1" hoverCapBorderColor="FFFFFF" hoverCapBgColor="333333" majorTMThickness="1" gaugeOuterRadius="100" gaugeOriginX="150" gaugeOriginY="150" gaugeScaleAngle="270" gaugeAlpha="50" dataStreamURL="RealTimeDataProvider/MeterData.asp?lowerLimit=0%26upperLimit=100" refreshInterval="5" decimalPrecision="0" placeValuesInside="1">
<colorRange>
<color minValue="0" maxValue="50" code="C1E1C1" />
<color minValue="50" maxValue="85" code="F6F164" />
<color minValue="85" maxValue="120" code="f70118" />
</colorRange>
<dials>
<dial value="65.45" bordercolor="FFFFFF" bgColor="000000,cccccc,000000" borderAlpha="0" baseWidth="10" topWidth="1" />
</dials>
<customObjects>
<objectGroup xPos="150" yPos="150" showBelowChart="1">
<object type="circle" xPos="0" yPos="0" radius="145" startAngle="0" endAngle="360" fillAsGradient="1" fillColor="cccccc,111111" fillPattern="linear" fillAlpha="100,100" fillRatio="50,50" fillDegree="45" />
<object type="circle" xPos="0" yPos="0" radius="120" startAngle="0" endAngle="360" fillAsGradient="1" fillColor="111111,cccccc" fillPattern="linear" fillAlpha="100,100" fillRatio="50,50" fillDegree="45" />
<object type="circle" xPos="0" yPos="0" radius="110" startAngle="0" endAngle="360" color="666666" />
</objectGroup>
<objectGroup xPos="150" yPos="150" showBelowChart="0">
<object type="circle" xPos="0" yPos="0" radius="10" startAngle="0" endAngle="360" borderColor="bebcb0" fillAsGradient="1" fillColor="cccccc,333333" fillAlpha="100,100" fillRatio="50,50" />
</objectGroup>
</customObjects>
</Chart>


Si alguien me puede ayudar se lo agradezco mucho.
MAR