asp 用InStr查找特定字符串的代码

答案：今天才发现这个函数的作用，原来可以查找特定的字符或者字符串。 

下面是我写的简单例子： 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 
<% Response.CodePage=65001%>  
<% Response.Charset="UTF-8" %>  
<% 
dim content_text,searchword_text 

'content是内容，searchword是要搜索的文字 
sub search(content,searchword) 
        if InStr(content,searchword) > 0 then 
                 Response.Write("找到") 
        Else 
                 Response.Write("没有找到") 
        End if 
end sub 

content_text = "搜索吧收集的代码和教程为阿会楠平时学习收集，网站的目标是方便自己的同时方便大家，本网站系统采用阿会楠自己写的系统,系统已经写了半年时间，主要时间放在程序的优化上，程序一直都在更新，欢迎大家加入Q群一起讨论学习。" 
searchword_text = "搜索吧" 

call search(content_text,searchword_text) 
%> 

上一个：asp验证Ip格式的函数
下一个：asp 将日期格式化为需要的格式