Très bien, vous pouvez l'appliquer vous-même. <%
'//Partie traitement des données
dim Contenu, Numéro, I, strCodea
Je = demande (je)
Si len(I)=0 alors I=0
Response.write <br><div align=center>Le programme a actuellement traité les données &I& en boucle</div><br>
strCodea=UploadFiles/News '//Besoin de demander s'il contient une chaîne
strCodeb=/UploadFiles/News '//Chaîne remplacée
strCodec=http://www.vevb.com/uploadfiles/news '//Remplacer la chaîne
Définir rs = server.CreateObject (adodb.recordset)
rs.open sélectionner le contenu À partir des actualités où id=&I& et siteid=1 trier par id desc,conn,1,1
Sinon (rs.eof ou rs.bof) alors
Contenu=rs(contenu)
Num=instr(contenu,strCodea)
Si Nombre>0 alors
Si droite(gauche(contenu,Num),2)=/ alors
content=remplacer(content,strCodeb,strCodec)
finir si
finir si
finir si
Rs.fermer
II=I+1
réponse.write(<meta http-equiv=refresh content=0;url=?I=&I>)
Setrs=Rien
%>