时间: 2021-07-31 作者:daque
<%' company: sabra inc' author: dave hoffenberg ' function: finds a value within a delimited list' freewarefunction listfind(value,list,delim)if list <> "" thenarr = split(list,delim)for i=0 to ubound(arr)if arr(i) = value thenmatch = 1exit forelsematch = 0 end ifnextlistfind = matchelselistfind = 0end ifend functionstrlist = "1,2,3"response.write listfind("1",strlist,",")response.write "<br>"strlist = "a-b-c"response.write listfind("a",strlist,"-")%>