<% @ language="javascript" %>
if(搜索记录的判断语句) {
Response.Write("<script>alert('null');top.location.href='zzp.asp';</script>");
Response.End();
}

解决方案 »

  1.   

    或者
    <% @ language="vbscript" %>
    if 搜索记录的判断语句 then
    Response.Write "<script>alert('null');top.location.href='zzp.asp';</script>"
    Response.End
    end if
      

  2.   

    search.asp ( ancSearch is a anchor)
    Sub ancSearch_onMouseUp()
    Dim varRet
    Dim strUrl
    Dim strTitle
    Dim strPath
    strTitle = "SearchResult"
    strUrl   = "fkrKozaSel.asp?KOJINCD=" & Document.all.item("txtfkrKozaSel").value
    strPath  = "" Call MakeDialogPath(strUrl,strTitle,strPath)
    varRet=window.showModalDialog(strPath,,"dialogwidth:400px;dialogheight:300px;dialogtop:234px;dialogleft:362px") If Trim(varRet) <> "" Then

    Document.All.Item("spnMeik").innertext = varRet

    End If
    End SubSearchResult.asp
    if rs is not nothing then set isSearch=true else set isSearch=falseSub imgOk_onClick()
    Dim strMoji
    strMoji =  Document.all.Item("isSearch").Value
    Window.Parent.ReturnValue = strMoji

    Window.Parent.CloseEnd Sub