Split 法式代码
attribs="阛阓名^^快餐店名^^报停名"
names=Split(attribs,"^^")
i=0
for each name in names
response.write names(i)&"
"
i=i+1
next
法式拆分成果：
阛阓名
快餐店名
报停名
按照 Split 成果天生 SQL 语句
attribs="阛阓名^^快餐店名^^报停名"
names=Split(attribs,"^^")
i=0
sql="select top 10 * from TableName where"
for each name in names
if names(i)="阛阓名" then
sql=sql+" or 阛阓 like '%"&names(i)&"%'"
end if
if names(i)="快餐店名" then
sql=sql+" or 快餐店 like '%"&names(i)&"%'"
end if
if names(i)="报停名" then
sql=sql+" or 快餐店 like '%"&names(i)&"%'"
end if
i=i+1
next
sql=sql+" Ordey by Id DESC"
sql=WordStr(sql, "where or", "where")
response.write sql
法式运转成果：
select top 10 * from TableName where 阛阓 like '%阛阓名%' or 快餐店 like '%快餐店名%' or 快餐店 like '%报停名%' Ordey by Id DESC
备注：
描写
前往基于 0 的一维数组，此中包罗指定命目标子字符串。
语法
Split(expression[, delimiter[, count[, start]]])
Split 函数的语法有以下参数：
参数 描写
expression 必选。字符串抒发式，包罗子字符串和分开符。若是 expression 为零长度字符串，Split 前往空数组，即不包罗元素和数据的数组。
delimiter 可选。用于标识子字符串边界的字符。若是省略，利用空格 ("") 作为分开符。若是 delimiter 为零长度字符串，则前往包罗全部 expression 字符串的单位素数组。
count 可选。被前往的子字符串数量，-1 唆使前往一切子字符串。
compare 可选。唆使在计较子字符串时利用的比拟范例的数值。有关数值，请参阅“设置”局部。
设置
compare 参数能够有以下值：
常数 值 描写
vbBinaryCompare 0 履行二进制比拟。
vbTextCompare 1 履行文本比拟。
vbDatabaseCompare 2 履行基于数据库（在此数据库中履行比拟）中包罗的信息的比拟。
mystr="1,2,3,4,5" mystr=split(mystr,",") for i=0 to ubound(mystr) response.write mystr(i) next '前往值为123456mystr="xlei.net/http/student/x/index.asp" mystr=split(mystr,"/http/student") for i=0 to ubound(mystr) response.write mystr(i) next '前往值为xlei.net/x/index.aspmystr="1网站2网页3页面4设想5法式" mystr=split(mystr,"批在") for i=0 to ubound(mystr) response.write mystr(i) next '前往值为1234批是在56
