Puxa da bd e criar um xml para usar como RSS

[Elbrinner 0]

Estou pensando em puxa os resultados da bd e criar um arquivo xml para que minha hp possa se vistar por leitores de RSS.O processo seria o seguinte, eu puxaria os ultimos registros e guardaria o resultado usando FSO. No caso eu teria que executar o arquivo esse sempre que queira atualizar o arquivo xmlExister uma forma mas facil de fazer isso?

[rOcKLoCo 0]

Manda o endereço do RSS acessar o nome dessa página abaixo... simplesfalows

<%rssUrlItem = "http://www.seusite.com.br/pagina.asp?id=[id]"rssCharSet = "ISO-8859-1"rssTitulo = "Título do seu site"rssLink = "http://www.seusite.com.br/"rssDescricao = "Descrição do site"rss = "<?xml version=""1.0"" encoding="""&rssCharSet&""" ?>"rss = rss & "<rss version=""2.0"">"rss = rss & "<channel>"rss = rss & "<description>" & rssDescricao & "</description>"s = "SELECT ID, CAMPO2, CAMPO3 FROM TABELA"set rs = cn.Execute(s)if NOT rs.EOF then rss = rss & "<language>pt-br</language> " rss = rss & "<copyright>© Copyright 2001-"&Year(Now)&" Seu site</copyright> " while not rs.EOF  rss = rss & "<item><title>" & Server.HTMLEncode(rs("CAMPO1")) &_  "</title><link>" & Replace(rssUrlItem,"[id]",rs("ID")) &_  "</link><description>" & Server.HTMLEncode(rs("CAMPO2")) &_  "</description></item>"  rs.MoveNext wendend ifrss = rss & "</channel></rss>"rs.Closeset rs = nothingresponse.ContentType = "text/xml"response.write rss%>

[Elbrinner 0]

Legal mesmo, já testei aqui é funciona certinho. Só nao esto conseguindo colocar o & no querystring.

 

Tenho assim:

 

ASP [/tr][tr]& Replace(rssUrlItem,"[id]",rs("ID")&"cat="&rs("ID_cat"))&"opcao=3"[/tr]

 

o resultado fica assim:

 

http://www.minhahp.com/MP/default.asp?id=23cat=32opcao=3

 

eu quero que fique assim:

 

http://www.minhahp.com/MP/default.asp?id=23&cat=32&opcao=3

 

já tentei colocar assim: "&cat="&rs("ID_cat"))&" mais da erro.

 

obrigado pelo codigo

[rOcKLoCo 0]

assim:

Replace(rssUrlItem,"[id]",rs("ID")&"&cat="&rs("ID_cat"))&"&opcao=3"

[Elbrinner 0]

assim:

Replace(rssUrlItem,"[id]",rs("ID")&"&cat="&rs("ID_cat"))&"&opcao=3"

Já tentei assim, me dar esse erro:Se esperaba un carácter de punto y coma. Error al procesar el recurso http://www.minhapagina.com/mp/rss.asp. Línea 1, Posición 2...