<!--#include file="../Include/Const.Asp" -->
<!--#include file="../Include/ConnSiteData.Asp" -->
<!--#include file="../Include/Version.Asp" -->
<!--#include file="CheckAdmin.Asp"-->
<%
Dim Result
Result = request.QueryString("Result")
Dim Keyword
Keyword = request.Form("Keyword")
Select Case Result
    Case "News"
        response.redirect ("Ky_News.Asp?Result=Search&Keyword="&server.urlencode(Keyword)&"&Page=1")
    Case "Product"
        response.redirect ("Ky_Product.Asp?Result=Search&Keyword="&server.urlencode(Keyword)&"&Page=1")
    Case "Case"
        response.redirect ("Ky_Case.Asp?Result=Search&Keyword="&server.urlencode(Keyword)&"&Page=1")
    Case "Video"
        response.redirect ("Ky_Video.Asp?Result=Search&Keyword="&server.urlencode(Keyword)&"&Page=1")
    Case Else
End Select
%>