<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>

<%
dim content_text,searchword_text 


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




if InStr(content,searchword_text) > 0 then 
Response.Write("找到") 
Else 
Response.Write("没有找到") 
End if 





%>
</body>
</html>
