<%
'kodu boş bir asp sayfası oluşturup çalıştırmalısın bir kereye mahsus. veritabanının yedeğini almalısın işlemden önce.
'örnek bir kayıt seti açtım. kendi veritabanına göre bağlantı kurmalısın

Set rs=Server.CreateObject("Adodb.Recordset")
Sorgu = "SELECT * FROM tabloadi"
rs.Open Sorgu, Baglanti, 3, 3

while not rs.eof
temizlenecekalan = "rs("sifre")

ayir = split(temizlenecekalan,"<div")
bul = ayir(1)

degistir = replace(temizlenecekalan,bul,"")
degistir = replace(degistir,"<div","")

'burada temizlemiş halini kaydediyoruz
rs("sifre") = trim(degistir)
rs.update

rs.movenext
wend

response.write "İşlem Bitti"

%>