原始问题:如何使用 asp 中的 instr 函数判断多个以逗号分隔的字符串存在于给定文本中?
解决方法:
残念ながら、提供的代码无法正确地检测多个字符串。原始代码使用 instr 函数,该函数仅能查找第一个匹配项。为了检测多个字符串,需要使用循环来遍历所有可能的字符串。
改进代码如下:
<% Dim aa, ipList, ip, found aa = Request.ServerVariables("REMOTE_ADDR") ipList = Array("99.88", "110.52", "43.80.235", "11.9.67.180") found = False For Each ip In ipList If InStr(aa, ip) > 0 Then found = True Exit For End If Next If found Then Response.Write "ok" Response.End End If %>
此代码为每个可能的字符串进行逐个检查,并在其中一个字符串匹配时设置 found 变量为 true。因此,它可以正确地检测多个字符串的存在。