Muy bien, puedes aplicarlo tú mismo. <%
'//Parte de procesamiento de datos
Contenido tenue,Num,I,strCodea
Yo=solicitud(yo)
Si len(I)=0 entonces I=0
Response.write <br><div align=center>El programa ha procesado actualmente &I& datos en un bucle</div><br>
strCodea=UploadFiles/News '//Necesita consultar si contiene una cadena
strCodeb=/UploadFiles/News '//Cadena reemplazada
strCodec=http://www.vevb.com/uploadfiles/news '//Reemplazar cadena
Establecer rs = servidor.CreateObject(adodb.recordset)
rs.open seleccionar contenido de noticias donde id=&I& y siteid=1 ordenar por id desc,conn,1,1
Si no (rs.eof o rs.bof) entonces
Contenido=rs(contenido)
Num=instr(contenido,strCodea)
Si Núm>0 entonces
Si derecha(izquierda(contenido,Num),2)=/ entonces
contenido=reemplazar(contenido,strCodeb,strCodec)
terminar si
terminar si
terminar si
Rs.cerrar
II=I+1
respuesta.write(<meta http-equiv=actualizar contenido=0;url=?I=&I>)
Configurar=Nada
%>