<!--#include file="../Include/Const.Asp" -->
<!--#include file="../Include/ConnSiteData.Asp" -->
<!--#include file="../Include/System_Language.asp" -->
<!--#include file="../Include/Keyicms_safe.Asp" -->
<!--#include file="../Html/html_Config.Asp"-->
<!--#include file="../Html/html_Function.Asp"-->
<%
key = request("key")
Page =  CInt(request.QueryString("Page"))

If key = "" Then
	response.Write "<script>alert('输入内容为空或有误，请重新输入。');history.back()</scripth>"
	response.End
End If

If Page < 1 Then
	response.Redirect "Index_m.Asp?key="&server.URLEncode(key)&"&Page=1"
End If

Call SiteInfo()

replace_code = ReadFromUTF(mTemplatePath&"/html/Search.dwt","utf-8")
replace_code = ReplaceCommon(replace_code, mTemplatePath, "Mobile")

replace_code = replace(replace_code, "{keyicms:key}", key)

replace_code = Search(replace_code, Page, "Mobile", request.ServerVariables("QUERY_STRING"))
replace_code = HtmlTo(replace_code, "", "", "Mobile", "")

response.Write replace_code
%>