輸出 ASP 內容時的替換問題

僅供參考。

傳送輸出頁的原始檔和要查詢的內容新增到郵箱中，並直接傳送給您。

除了常規和 js 物件之外，還可以這樣做。

text_str=cstr(text_str) '格式化為字串而不會丟失您的排版。

要查詢的位置。

text_wz=10 '這裡假設是第 10 個。

text_wz1=text_wz-1 '這用於查詢陣列的下標位置。

要新增的內容。

text_add="ddd

分解該項將返回乙個陣列，以便對生成的陣列進行分隔。

text_arr=split(text_str,""初始化更改的資料。

text_new=""

迴圈瀏覽資料和插入的組合。

for i=lbound(text_arr) to ubound(text_arr)

if text_wz1=i then '如果滿足位置。

恢復標籤和原始內容，然後插入乙個新標籤。

如果其他位置不匹配，則可以恢復原始資料。

end if

text_new

如果你有很多這樣的資料，你可以寫乙個在其他地方很容易呼叫的程序。

對於這種效果，有幾種想法。

大方向。 1.提交時找到搜尋關鍵詞，然後替換成對應的html格式，CSS什麼的。

2.輸出時找到關鍵字，然後響應相應的html格式。

方法一：請求速度快但占用空間大，不利於日後維護，反之亦然。

然後，只需替換此步驟即可實現：

Opinion 使用表格驅動的方法來設計程式。

例如，樓上定義乙個配置來查詢關鍵字和特殊字元等，並設定相應的高亮格式。

我提出了乙個想法，用正式公式來檢測，但是這個演算法和正法應該不是很好實現，有很多現成的HTML匹配網、關鍵詞，要考慮引號、凝視等，如果這個演算法設計得好，程式會非常靈活！

我只是要向你展示正確的方向，並親自研究一下！

祝你好運，如果開發成功，可以考慮分享吧？

你好好看看替換功能，你就什麼都明白了，你可以去百度找這個函式的具體用法，但是不要用他處理太多的字串，會很慢，超過10000字應該沒問題。

太多了，你自己能看到嗎？

<%dim arydata

arydata = array("張三：123", "李四世：456", "王武：

789", "劉趙：147", "車七：258", "葛霸：

369", "黃九：159", "李旭：753")

dim d,i,t

set d = "")

for i = 0 to ubound(arydata)t = split(arydata(i),":")t(0),t(1)

nextdim strul, strli

strul = ""

strli = ": "

dim htm,li

for each k in d

li = replace(strli,"",k)li = replace(li,"",d(k))htm = htm & li

nexthtm = replace(strul,"",htm)%>

上面的程式是誰給你的？ 這很愚蠢。

像這個。 nr_img=replace(replace(replace(replace(replace(replace(replace(replace(replace(nr("nr"),img",img"),img", img"），談談IMG", img"),img", img"),img", img"),img", img"),img",img"),img", img"魯明）、IMG", img"只需將其替換為正規表示式即可。

此外，您的問題也可以直接替換為正規表示式。

我想出現在裡面"石網"顯示頁面時，內容顯示為拆除通知"

石網**不是所有我不知道的"石網"這三個字是**，我怎麼能幫你改。

自己做起來超級容易，但你怎麼能說它超級簡單呢？

我不再學習，只是抄**。

先修復你的字元編碼，在使用GB-2312的時候，有時候其他軟體不用這個，直接會出現亂碼。

這裡有乙個提示給你。

具體來說**，您可以自己修改它。

<%name="我們去打醬油吧"

actor="我們明天和後天去上學，我們不是每天都去上班，我們只是去醬油打架。 "

cc=""for i=1 to len(name)

c=mid(name,i,1)

if instr(cc,c)=0 thencc=cc&c

end if

nextactor=replace(actor,","")

actor=replace(actor,"","")actor=replace(actor,"","")actor

<%name="我們去打醬油吧"

actor="我們明天和後天去上學，我們不是每天都去上班，我們只是去醬油打架。 "

cc=""for i=1 to len(name)

c=mid(name,i,1)

if instr(cc,c)=0 thencc=cc&c

end if

nextactor=replace(actor,","")

actor=replace(actor,"","")actor=replace(actor,"","")actor

我認為不建議用普通的替換，這可能需要很多陳述，而且你的文字是不確定的。

我建議你看看常規的，你應該能夠區分帶有常規的單詞，以達到你想要的效果。

我想你需要在拆分和ubound函式的幫助下做到這一點。