1、以下是ASP 取相關(guān)文章代碼，可以通過(guò)后臺(tái)增加關(guān)建字，然后前臺(tái)通過(guò)SQL搜索語(yǔ)句查詢(xún)出來(lái)。
Dim A:A = "手機(jī),電腦,電視,硬盤(pán)"
Function sqlKeyWord(obj,field) 
Dim temp:temp = split(obj,",") 
For i = 0 To ubound(temp) 
sqlKeyWord = sqlKeyWord & field&" like '%"&temp(i)&"%' or " 
Next 
sqlKeyWord = left(sqlKeyWord,len(sqlKeyWord)-3) 
End Function 
Dim xianguanSql:xianguanSql = "select id,title from [pingpai_title] where " + sqlKeyWord(A,"feilei")
取出SQL查詢(xún)語(yǔ)句是：[pingpai_title] where feilei like '%手機(jī)%' or feilei like '%電腦%' or feilei like '%電視%' or feilei like '%硬盤(pán)%'

2、ASP替換拆分代碼，可通過(guò)替換能解決常見(jiàn)的取包涵文章的方法。
Function key(eword)
       eword = Replace(eword,",","','")
key = eword
End Function
xianguanText=key(rs("xianguan"))
xianguanSql="select top 12 * from [pingpai_title] where [feilei] in('"&xianguanText&"') Order By [paixu] asc"

這樣就能解決in(‘’)里面的數(shù)據(jù)為 in('1','2','3',''4) ，這樣就能取出數(shù)據(jù)。