Redirect的应用

     最近由于工作的需要，设计一个网页要求去做判断某家公司有没有在公司的网站上做广告，如果做了则要显示这家公司的广告，如果没有则显示这家公司的资源信息，下面就让我们来实现它的过程吧。

    <%

         com=request("company")       '先是接受从另一张表中传过来的公司名
         com=replace(com,"'","")
         com=replace(com,";","")
  
        sql="select * from 表名 where 公司名='"&com&"'  "     

           rs.open sql,conn,1,1
   
        if  rs.eof  and rs.bof then        '去判断这个公司是不是存在

             response.Write""
       else
            show=rs("companyshow")  '这里的companyshow存放的是那个相对应的公司的做的广告的页面
            show=trim(show)
    

   
   if rs("company")<>com  then           ’再去判断这个公司是不是是存在，不存在跳转到主页
          response.Redirect("主页")
  else
    if rs("company_show")<>"" then                ’去判断有没有广告
        response.redirect"flack/"&show&"?company="&com&" "    ’有广告则执行有广告的页面
    else
     response.Redirect"ABC.asp?company="&com&" "     ’没有的话则显示资源的页面
    end if


     rs.close
     set rs=nothing
  end if
   end if  
 %>

看到上面的代码，用REDIRECT很简单的做到了你想要的东西。

这里要特别注意Redirect它是有””号里的变量的用法，在它那里的变量加引号跟在SQL的用法是不一样的。