廣告法禁用詞語之ASP替換函式

最近一直有客戶反映，**被某些公司或個人舉報到工商局，說**上面有什麼專利，抗氧化，最高端，世界級等字眼。客戶被舉報5次，一共罰了幾千塊錢，最多一次3000元，對於小企業或剛成立不久的創業公司也是一筆不小的費用。後來客戶找到我們，說能不能把**上面的新廣告法禁用的詞替換掉。

以下是asp替換函式**

function myreplace(mystring) '廣告法片語

str="最、最佳、最具、最愛、最賺、最優、最優秀、最好、最大、最大程度、最高、最高端、最高檔、最奢侈、最低、最低階、最低價、最底、最便宜、時尚最低價、最流行、最受歡迎、最時尚、最聚攏、最符合、最舒適、最先、最先進、最先進科學、最先進加工工藝、最先享受、最後、最後一波、最新、最新科技、最新科學、第

一、中國第

一、全網第

一、銷量第一"

str=split(str,"、")

for i= 0 to ubound(str)

mystring=replace(mystring,str(i),"**")

myreplace=mystring

end function