Hola este es el codigo final que he puesto. Me funciona ahora bien pero hay cosas que
no me salen en el navegador como las palabras:
<url>,<loc>, </loc>,<lastmod>,</lastmod>,<changefreq>,</changefreq>, <priority>,</priority>,</url>.
Necesito que también aparezcan estas palabras.
Cita: do while not rs.eof
vari1="<url>"
vari2="<loc>http://www.midominio.com/ficha.asp?id=" & rs("id_franquicia") & "</loc>"
vari3="<lastmod>2006-04-04T01:00:00+01:00</lastmod>"
vari4="<changefreq>daily</changefreq>"
vari5="<priority>0.8</priority>"
vari6="</url>"
response.Write(vari1) & vbCrlf %> <br /> <%
response.Write(vari2) & vbCrlf %> <br /> <%
response.Write(vari3) & vbCrlf %> <br /> <%
response.Write(vari4) & vbCrlf %> <br /> <%
response.Write(vari5) & vbCrlf %> <br /> <%
response.Write(vari6) & vbCrlf %> <br /> <%
rs.movenext
loop