| 发表于:2007-07-07 21:51:581楼 得分:20 |
function doreplace(strrep) dim strtest,bad,i strtest= "你好 ¦明天 ¦今天 ¦后天 ¦想你 " bad = split(strtest, " ¦ ") for i=0 to ubound(bad) strrep=replace(strrep,bad(i),string(len(bad(i)), "× ")) '在strrep中寻找bad(i) '并用string(len(bad(i)), "× ")替换 '也就是长度为len(bad(i)的多个 "× " next response.write(strrep) end function | | |
|