La conexion a la base:
set RSmenu5=Server.CreateObject("ADODB.Recordset")
SQLmenu5="SELECT * FROM textos where CONCEPTO = '"&RSmenu4("concepto")&"'"
RSmenu5.Open SQLmenu5, Conn
set RSbuscarart=Server.CreateObject("ADODB.Recordset")
SQLbuscarart="SELECT * FROM artistas"
RSbuscarart.Open SQLbuscarart, Connart
el código:
texto = RSmenu5("TEXTOS")
do while not RSbuscarart.eof
textoconenlaces = replace(texto,RSbuscarart("apellido1"),"<a href='ver_enlace.asp?idpalabra="&RSbuscarart("id") &"'>"&RSbuscarart("apellido1")&"</a>")
RSbuscarart.MoveNext
loop
response.write textoconenlaces
Como ves es lo mismo, no me da ningún error pero no aparecen los enlaces, en cambio si pongo el response.write textoconenlaces dentro del loop si aparecen pero claro el texto se multiplica por el numero de palabras que tengo en la base.
Un saludo