asp+Access通用的自动替换数据库中的字符串

                Next   
             Rs2.Movenext    
             Loop   
        Rs2.Close    
        Set Rs2=nothing    
        End If   
    Rs1.MoveNext    
    Loop   
Rs1.Close    
Set Rs1=Nothing   
Conn.close    
Set Conn=Nothing   
Set Re=Nothing   
Response.Write "替换完成"   

'自定义的替换函数    
Function myreplace(byval Tstr)    
If Tstr="" Or isnull(Tstr) Then     
 Exit Function   
Else   
    Re.Pattern=Str1    
    myReplace =Re.Replace(Tstr,Str2)    
End If   
End Function   
%> 

您可能感兴趣的文章:

asp常用的正则表达式实现字符串的替换ASP正则函数替换分页后的参数asp 图片正则 替换，替换前检查图片是不是本地地址的方法asp.net高效替换大容量字符实现代码asp.net(c#)判断远程图片是否存在asp.net保存远程图片的代码ASP保存远程图片到本地 同时取得第一张图片并创建缩略图的代码ASP替换、保存远程图片实现代码