<!--#include file="../p_inc/Include_func.asp"-->
<!--#include file="../p_inc/openconn.asp"-->
<%
IF Not ChkPost() Then
	response.Redirect "./"
	response.End()
End IF
Response.Buffer=True
response.contenttype="text/html;charset=gb2312"
Dim id
murl=checkStr(request("murl"))

set rs=conn.execute("select top 10 m_url from qingtiandh_List where m_url like '%"&murl&"%' And m_look=1")
IF Not rs.Eof Then
	str= "以下可能有您的网址:"&vbcrlf
	Do While Not rs.Eof
		m1=rs(0)
		str=str&m1&vbcrlf
		rs.MoveNext
	Loop
	Response.Write str
Else
	Response.Write "no"
End IF
%>


