¿Error de sintaxis?

[Laika]

Hola

Quiero que mediante esta función se me ejecute el valor de la variable varias veces cogiendo cada vez el valor del recodset pero me da este error:


Constante de cadena sin terminar
variable=variable & vbCrlf & "<url>
----------------------------------^

Function generar_sitemaps()

Set Conn = Createobject("ADODB.Connection")
Set rs = CreateObject ("ADODB.RecordSet")
conn.open "bd"

sql="SELECT * FROM tabla1 where libro <> ''"
rs.open sql,conn

rs.movefirst

do while not rs.eof

variable=variable & vbCrlf & "<url>
<loc>http://www.midominio.com/ficha.asp?id=<%=rs("id_libro")%></loc>
<lastmod>2006-08-04T01:00:00+01:00</lastmod>
<changefreq>daily</changefreq>
<priority>0.8</priority>
</url>"

rs.movenext

response.write (variable)

loop

rs.close
Conn.close

End Function

[Alert]

Simple.... estas dejando el tag <% abierto....ponelo asi...

Código:

<%
Function generar_sitemaps()

Set Conn = Createobject("ADODB.Connection")
Set rs = CreateObject ("ADODB.RecordSet")
conn.open "bd"

sql="SELECT * FROM tabla1 where libro <> ''"
rs.open sql,conn

rs.movefirst

do while not rs.eof

variable=variable & vbCrlf & "<url><loc>http://www.midominio.com/ficha.asp?id=" & rs("id_libro") & "</loc><lastmod>2006-08-04T01:00:00+01:00</lastmod><changefreq>daily</changefreq><priority>0.8</priority></url>"

rs.movenext

response.write (variable)

loop

rs.close
Conn.close

End Function
%>

[Laika]

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.

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

[Myakire]

Pues por que seguramete el navegador las esta interpretando, debes de colocar en logar del "menor que" ( < ) si aquivalente en texto: &lt;

Revisa esta tabla

[Laika]

Gracias,

Es lo que necesitaba para que no me los interpretase el navegador